INPUT(*INLIB.ICL9LPCOMPILE&.ICL9LPCTSYSIF&.ICL9LPLIBNUC&
    .ICL9LPJCLPROCS&.SFLCTM&.SFLGENERAL&.SFLFORCT&
    .ICL9CELPUT&.ICL9CEOMFOUT&.ICL9CESERVICES&.ICL9CENCODE3&
    .ICL9LPCTETXT&.ICL9LPEHMTM)
NEWMODULE(*OUTLIB.ICL9LPCOMPILER(2000))
ASSOCIATEMODULES(ICL9LPCOMPILE&ICL9LPCTSYSIF&ICL9LPLIBNUC&ICL9CELPUT)
ISOLATEOBJECTS(ICL9CEZOMFOUT)
RETAIN(PASCALCOMPILE&PASCAL&PA)
SUPPRESS
PERFORM