INPUT(*INLIB.ICL9LPLIBNUC&.ICL9CERTENV&.ICL9CERTNEWCTM&.SFLCTM&
    .ICL9LPPMPACKAGE&.ICL9LPEHMTM&.ICL9CERTNDIAG&
    .ICL9LPJCLPROCS&.SFLGENERAL&.SFLFORRT&.ICL9CERTOCP&.ICL9CERTEDINDUMS&
.ICL9CERTJSVAR&
    .ICL9LPREALIO)
NEWMODULE(*OUTLIB.ICL9LPRTSUPPORT(2000))
ASSOCIATEMODULES(ICL9LPLIBNUC&ICL9CERTENV&ICL9CERTNEWCTM&SFLCTM)
ASSOCIATEMODULES(ICL9LPPMPACKAGE&ICL9LPEHMTM&ICL9CERTNDIAG)
ISOLATEOBJECTS(ICL9LPREALIO)
RETAIN(PASCALRUN&PARUN&
ICL9HERRMESSP&
ICL9LPPMPROCL&
ICL9LPPMPROCR&
ICL9LPWRITELINE&
ICL9LPFILEDECL&
ICL9LPWRITEBSTR&
ICL9LPCHARCODEIS&
ICL9LPGETCHARTAB&
ICL9LPRANGEERROR&
ICL9LPCASEERROR&
ICL9LPCLOCK&
ICL9LPDATETIME&
ICL9LPSIN&
ICL9LPCOS&
ICL9LPARCTAN&
ICL9LPLN&
ICL9LPEXP&
ICL9LPSQRT&
ICL9LPNEW&
ICL9LPDISPOSE&
ICL9LPREADLINE&
ICL9LPGETRECORD&
ICL9LPPUTRECORD&
ICL9LPRESET&
ICL9LPREWRITE&
ICL9LPREADRERR&
ICL9LPREADINT&
ICL9LPREADREAL&
ICL9LPPAGE&
ICL9LPWRITECHAR&
ICL9LPWRITESTR&
ICL9LPWRITEWDSTR&
ICL9LPWRITEINT&
ICL9LPWRITEREAL&
ICL9LPWRITEBOOL&
ICL9LPINITRUN&
ICL9LPFINISHRUN&
ICL9LPHALT)
SUPPRESS
PERFORM