BG,BG;1/-SP=BG,[1,1]SYSLIB/LB:$SHORT / TASK=...BAC PRI=1 UNITS=1 ASG=TI:1 ACTFIL=1 //