edit poneb02s,VP1S
i<itrimp_VAXponeas>
ta/%inc/
d1i<itrimp_hostcodes>
a'
d1i<itrimp_tform2s>
m/%constlonglongreal/
TA/HOST=/I/VAX
/D1P-2
e
PARM NOCHECK
VAXIMP VP1S,VP1XX
TRANSFER VP1XX,ERCVAX(ERCC07,PEATHAG)VP1.OBJ,FILE,BIN