GETAFURB [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: GETAFURB)}}
====== GETAFURB ======
(GIN Macro)

**Defined in:** [[george:source:ACCESSMACROS|ACCESSMACROS]]

**Used in:** [[george:source:INSERTWO6|INSERTWO6]], [[george:source:LEXIFIND5|LEXIFIND5]], [[george:source:USELEX5|USELEX5]]

<code - GETAFURB.mac.txt>
 *B^N ...[??? GETAFURB SECT FILE FGN 19 DOC  
 *C9G    #     THIS ATTEMPTS TO LEAVE THE CURRENT BLOCK IN THE FILE CHAIN AS A   
 *CP6    #     FILE/USAGE  BLOCK [IT MAY NOT RE THERE AFTER COMING UP
 *D8Q    #MAC  GETAFURB  
 *DNB    #STR  %A
 *F82    (   
 *FML          LDCT  0  %A   
 *G7=          SMO      FX2  
 *GLW          STO   0  ACOMMUNE7
 *H6G          DOWN     PERUSFIL,7   
 *HL6    )   
 *J5Q    #STR  %A
 *JKB    #SKI
 *K52          DOWN     PERUSFIL,27  
 *KJL    #NOR
</code>