edit poneb01s,Up1s
i<itrimp_usysponeas>
ta/%inc/
d1i<itrimp_hostcodes>
a'
d1i<itrimp_tform2s>
m/%constlonglongreal/
(a/r'/a16d/'/i/'/)154
e
imp Up1s,.null
offer Up1s,ZEPZ01