LINK ,map
IP1oX
IP22oX
IOPT3oX
IGEN3oX
CSERV01oX
.END
P0Y
MODIFY P0Y
SATISFY REFS
.ALL
SATISFY DATA
.ALL
SUPPRESS
.ALL
RETAIN
ICL9CEZIBMIMP
SUPPRESS DATA
.ALL
CLOSE
NEWGEN P0Y,IBMoX
d .all