ecce ib7_put,put
f/off/
f/off/s/on/
%c
copy put,ib7_trput
parm opt
imp ib7_put,puty
copy puty,ib7_optputy
parm nocheck
imp ib7_put,puty
copy puty,ib7_puty
parm
imp ib7_trput,puty
copy puty,ib7_trputy
newgen ib7,ibmsce7