SDSEARCH
(GIN Macro)
Defined in: MACROS RME10
Used in: CLOSEMT867, CONSERNO6, DEAD867, LIBINSEC864, LIBSEC867, MODE866, NEWOWN865, NEWPW867, RENAMDIR, RENAMEMT867, SETPC867, UNLOADMT867, XENON
- SDSEARCH.mac.txt
7*L8 ...[??? SDSEARCH SECT FILE FGN 4 DOC 7*W2 # MACRO TO FIND AN ENTRY IN :SYSTEM.DOCUMENT 7B*L #MAC SDSEARCH 7BT= MAC1 STEP %D 7C#W #STR %A 7CSG #STR 7D#6 ( 7DRQ BNZ 3 MAC5 7F?B GEOERR 1,NOSYSDOC 7FR2 MAC5 7G=L ) 7GQ= #STR %A 7H9W BZE 3 %A 7H=^ ...#STR BOTH,%E 7H#4 ...( 7H*7 ... FSHCODE A,M1SDSEARCH 7HB= ...( 7HC* ... JBS MAC1,3,BNFSHMCB 7HDD ...M1SDSEARCH 7HFH ...) 7HGL ... FSHCODE B,M2SDSEARCH 7HHP ...( 7HJS ... JBC MAC1,3,BNFSHMCB 7HKX ...M2SDSEARCH 7HM2 ...) 7HN5 ...) 7HPG LDN 0 27 7J96 TXU 0 FRH(3) 7JNQ BCS MAC1 7K8B #STR NONS,%B 7KN2 ( 7L7L BRN MAC2 7LM= MHDDR 4HHDDR 7M6W MAC2 SMO FX1 7MLG LDX 0 MHDDR 7N66 TXU 0 1(3) 7NKQ BCC MAC3 7P5B ) 7PK2 #STR NAME,%B 7Q4L ( 7QJ= LDX 0 1(3) 7R3W BNZ 0 MAC1 7RHG ) 7S36 #STR NAME,%B 7SGQ #SKI 7T2B BRN MAC1 7TG2 MAC3 7T^L #STR N,%B 7WF= ( 7WYW LDX 0 AMT%B(3) 7XDG #STR GEOG,%B 7XY6 #SKI 7YCQ ANDN 0 #777 7YXB TXU 0 %C 7^C2 BCS MAC1 7^WL ) 82B= #STR N,%B 82TW #SKI 83*G ( 83T6 MHUNT 2,FILE,FABSNB 84#Q ADX 2 HDREC(2) 84SB LDX 0 A1-6(2) 85#2 TXU 0 3(3) 85RL BCS MAC1 86?= LDX 0 A1-5(2) 86QW TXU 0 4(3) 87=G BCS MAC1 87Q6 LDX 0 A1-4(2) 889Q TXU 0 5(3) 88PB BCS MAC1 8992 LDX 0 A1-3(2) 89NL ANDN 0 #777 8=8= TXU 0 6(3) 8=MW BCS MAC1 8?7G LDX 0 A1-2(2) 8?M6 BZE 0 MAC4 8#6Q ANDN 0 #7777 8#LB ERX 0 7(3) 8*62 ANDN 0 #7777 8*KL BNZ 0 MAC1 8B5= MAC4 8BJW ) 8C4G #NOR