{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: SDSEARCH)}} ====== SDSEARCH ====== (GIN Macro) **Defined in:** [[george:source:MACROS_RME10|MACROS RME10]] **Used in:** [[george:source:CLOSEMT867|CLOSEMT867]], [[george:source:CONSERNO6|CONSERNO6]], [[george:source:DEAD867|DEAD867]], [[george:source:LIBINSEC864|LIBINSEC864]], [[george:source:LIBSEC867|LIBSEC867]], [[george:source:MODE866|MODE866]], [[george:source:NEWOWN865|NEWOWN865]], [[george:source:NEWPW867|NEWPW867]], [[george:source:RENAMDIR|RENAMDIR]], [[george:source:RENAMEMT867|RENAMEMT867]], [[george:source:SETPC867|SETPC867]], [[george:source:UNLOADMT867|UNLOADMT867]], [[george:source:XENON|XENON]] 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