*declare an integer DATA var1 TYPE i. *declare a constant decimal CONSTANTS myconstant TYPE p DECIMALS 1 VALUE '6.6'.