offer gldpos
parm nocheck,nolist
edit opt03s,gldpos
i<itrimp_gldoptas>
ta/%inc/
d1i<itrimp_hostcodes>
a'
d1i<itrimp_tform2s>
a'
d1i<tripcnsts>
e
imp gldpos,.null
offer gldpos,ercs01