TRAN=TRAN,BCPLIB/LB
/
EXTSCT=$$FSR1:4100
STACK=7000
LIBR=SYSRES:RO
TASK=...TRA
//