R MACRO VL3C.OBJ,VL3C.LST/C=LISTIT,VL1C,VL3