STARTACT
(GIN Macro)
Defined in: MACROS LEF
Used in: BMSJRNL866, BSUNJAM867, CARTCONT867, DTQUEST860, DTREST860, DTSCAN860, DTSTART867, DTSUBSA867, DTWRONG867, INCTAPES867, IPBLOG866, LIBLOAD867, LISTEND867, LISTFREE867, LISTNEXT867, LISTNIP865, LISTOPEN867, LISTPROC867, LISTSEAR867, PERFLOGS866, RELPER867, SCHEDENX860, UNLOADMT867, WLC867, WLE862
- STARTACT.mac.txt
GDKJ ...[??? STARTACT SECT DEVT FGN 2 DOC GDTB #MAC STARTACT GF2J ...#STR %A,RET GF7Q ...( GF*2 #STR %B GFSL ( GG#= #OPT M1STARTACT=1 GGRW CALL %B M2STARTACT GH?G #SKI M1STARTACT GHR6 ( GJ=Q BRN M3STARTACT GJQB MSTARTACT GK=2 ) GKPL ) GL9= #STR %B GLNW #SKI M1STARTACT GM8G ( GMN6 #STR %B GN7Q SBX %B FX1 GNMB #SKI G%AACT GP72 #SKI GPLL ( GQ6= BBUS B%AACT,FLAGACT,M7STARTACT GQKW FLIPS FLAGACT,B%AACT GR5G BRN M5STARTACT GRK6 M6STARTACT GS4Q PAIR %E,%F GSJB M5STARTACT GT42 GETACT %C,%D GTHL LDX 2 BPTR(2) GW3= LDX 0 M6STARTACT(1) GWGW STO 0 ALINK1(2) GX2G LDX 0 M6STARTACT+1(1) GXG6 STO 0 ALINK2(2) GX^Q FPUT GYFB M7STARTACT GY^2 LDX 1 FX1 G^DL ) G^Y= #SKI G%AACT H2CW ( H2XG LDX 2 B%AACT H3C6 BNG 2 M7STARTACT H3WQ ORX 2 GSIGN H4BB STO 2 B%AACT H4W2 ERX 2 GSIGN H5*L FPUT H5T= M7STARTACT H6#W ) H6SG LDX 2 FX2 H7#6 #STR %B H7RQ ( H8?B ADX %B FX1 H8R2 EXIT %B 0 H9=L ) H9Q= M3STARTACT H=9W ) H=PG #STR %B H?96 ( H?NQ #SKI M1STARTACT H#8B ( H#N2 #FRE M1STARTACT H*7L #DEF M2STARTACT=MSTARTACT H*M= #DEF M1STARTACT=0 HB6W ) HBLG ) HBPL ...) HBSQ ...#STR %A,RET HBXW ...#STR HC32 ... LONGON #170 [WAKE UP DUMP TAPE SCHEDULER HC66 #NOR