(GIN Macro)
Defined in: MACROS HL
Used in: UNSAVE867
2^^D ...[??? CHJOBLOC SECT CENT FGN 5 DOC 329= # 32NW # CHJOBLOCK MACRO 338G # SEARCHES DOWN JOB QUEUE AND CHAINS JOB BLOCK IN JOB 33N6 # NUMBER ORDER.FINALLY UPDATES FIRST BLOCK IN QUEUE 347Q # 34MB #MAC CHJOBLOCK 3572 LDX 1 %A 35LL LDN 2 BJOBQ 366= MCHJOBLOCK1 36KW LDX 2 FPTR(2) 375G TXU 2 CXJO 37K6 BCC MCHJOBLOCK2 384Q LDX 0 JOBNUM(2) 38JB TXL 0 JOBNUM(1) [J WHILE JOB 3942 BCS MCHJOBLOCK1 [NUMBER GREATER THAN QUEUE 39HL #SKIP K6CHJOB>5-5 3=3= ( 3=GW TXU 0 JOBNUM(1) 3?2G BCS MCHJOBLOCK2 3?G6 GEOERR 0,CHJOBLOK 3?^Q ) 3#FB MCHJOBLOCK2 3#^2 LDX 2 BPTR(2) 3*DL CHAIN 1,2 3*Y= #NOR