MACRO/OBJ:LB:[1,1]FDT FDT
MACRO/OBJ:LB:[1,1]VFDT VFDT+FDT
FOR/F4P/SW:(/NOTR) TRACE
MAC GTLIN
MAC GETPUT
LINK/OPT/MAP:TRACE/TASK:LB:[11,1]TRACE TRACE,GTLIN,GETPUT
ASG=TI:3
ASG=SY:1:2:4
TASK=$$$FDT
LIBR=F4PRES:RO
MAXBUF=256
/
INS LB:[11,1]TRACE