LINK
ERCC07.PP1Y
ERCC07.PP2Y
ERCC07.POPTY
ERCC07.PGENY
ERCC07.CSERV01Y
ERCS04.QFILES_QCODE4Y
ERCS04.QFILES_QPUT15Y
.END
P0Y
MODIFY P0Y
SATISFY REFS
.ALL
SATISFY DATA
.ALL
RENAME
ICL9CEZPERQIMP,S#PERQIMP
.END
SUPPRESS
.ALL
RETAIN
S#PERQIMP
SUPPRESS DATA
.ALL
CLOSE
NEWGEN P0Y,PERQ01Y