CLUFSL/PI/-HD/LI,CLUFSL/MA/WI/-SP,CLUFSL= LB:[1,1]SYSLIB/LB:CMPAL EDDATX CATBX D2CLNK C2DATE A2CLNK S2CLNK C2WDAY ADD64 SUB64 MUL64 DIV64 ;C18CLU ;CLUC18 / STACK=0 PAR=GEN:0:17000 CMPRT=$CMPCS GBLXCL=$DIV,$MUL GBLXCL=$CDTB GBLXCL=$DAT,$TIM //