EDIT SUP24CS,SSUP24S
M/COMF(/D/END)/D1I<ERCC08.COMSF>
(A/!SSERIES/I/;/P1)*
T(A/!PSERIES;/R-1P1)*
T(R/GPC(/I/DCU(/P1)*
TA/MAXPROCS=/R3I/32/
E
PARM PARMX,STACK,NOCHECK
IMP SSUP24S,SSUP24,,.OUT