(GIN Macro)
Defined in: MACRO COMPRO
Used in: CONNECTA867, EXPRESS864, HLSEVENT867, NORMALUS864
B6X# ...[??? TEMPQ SECT CENT FGN 21 DOC B776 [ THE FOLLOWING MACRO IS TO SET UP AN ENTRY IN TEMP. HLSQ FOR B7LQ [ A PARTICULAR JOB B86B #MAC TEMPQ B8L2 SETNCORE AHLS,2,ADATA,JUNSWAP B95L STOZ A1(2) B9K= LDN 0 A1(2) B=4W LDN 1 A1+1(2) B=JG MOVE 0 AHLS-1 B?46 STO %B HLSJONO(2) B?HQ ORS %A HLSYONQ(2) B#3B ORS %A HLSWAIT B#H2 FJOCA 1,FX2,N B*2L LDX 0 JMISC(1) B*G= STO 0 HLSSTAT(2) B*^W LDX 1 2 BBFG LDN 2 BHTEMP BB^6 LDX 2 BPTR(2) BCDQ CHAIN 1,2 BCYB FON #33 BDD2 #NOR