!RAT TRU.RAT >TRU.FTN
MCR F4P TRU=TRU/NOTR/NOCK
MAC GTLIN
MAC RUNSYS
MAC GETPUT
LINK/MULT/OPT/READ TRU,GTLIN,RUNSYS,GETPUT
TASK=$$$TRU
ASG=TI:1
/