(GIN Macro)
Defined in: MACROS WELL
Used in:
LH9= ...[ LHNW ...#MAC NEWJOBLIST LJ8G ...#STR @,%A LJN6 ...( LK7Q ...#SKI JWPHASE4<1$1 LKMB ...( LL72 ...#STR %A LLLL ...( LM6= ...! NOT ALLOWED LMKW ...#EXI LN5G ...) LNK6 ...#OPT JDTABLES4=1 LP4Q ...#OPT JDTABLES3=0 LPJB ...) LQ42 ...#DEF 20?=FACILNO-FACILITIES LQHL ...#STR %A LR3= ...#DEF 20?=1 LRGW ...#SKI 20?*(JDTABLES4-JDTABLES3)<1$1 LS2G ...( LSG6 ...! NO ROOM FOR NEW FACILITY LS^Q ...#EXI LTFB ...) LT^2 ...#SKI JWPHASE4 LWDL ...( LWY= ...#MEN JOBDATA LXCW ...#TRA JDTABLES3 LXXG ... 12H%B LYC6 ...#STR %A LYWQ ...#DEF 20?=%A*4096 L^BB ...#STR %A L^W2 ...#SKI M2*L ...#DEF 20?=FACILITIES*4096^#40000000 M2T= ...#DEF 20?=20?+%C M3#W ...#STR COUNT,%E M3SG ...#SKI M4#6 ...#DEF 20?=20?^#4000 M4RQ ... +20? M5?B ...#ALT JDTABLES3=0? M5R2 ...#END M6=L ...) M6Q= ...#STR %A M79W ...#SKI M7PG ...( M896 ...#MEN BMSAVJOB M8NQ ... NEWJOBLI @,JL,%C,%D M98B ...#SKI JWPHASE4 M9N2 ...( M=7L ...#MEN JDWRITE M=M= ... NEWJOBLI @,JD,%C,%D M?6W ...) M?LG ...#ALT FACILITIES=FACILITIES+1 M#66 ...) M#KQ ...#EXI M*5B ...) M*K2 ...#TRA %BTEMPLATE1 MB4L ... +34?+0?]+3 MBJ= ... +34?+0?]+%D MC3W ...#TRA %BTEMPLATE2 MCHG ...#REP 4 MD36 ... +34?+0?]+%D MDGQ ...#SKI JWPHASE4 MF2B ... +34?+0?]+%D MF7J ...#UNS FPRJW MF#Q ... +34?+0?]+%D MFG2 ...#TRA %BTEMPLATE3 MF^L ... +34?+0?]+3 MGF= ...#TRA %BTEMPLATE3+1+(FACILITIES*3) MGYW ... %C,+34?+0?-3]+(34?+0?-2]),%D MHDG ...#END MHY6 ...#NOR