SFCA

(GIN Macro)

Defined in: RING-MACROS

Used in: CLOSEALT864, CLOSEFUL867, CLOSEND867, CREALEX864, INCMON865, INCRCUBS860, INCRCUBX860, LISTRING864

SFCA.mac.txt
 CQMJ ...[??? SFCA SECT FILE FGN 20 DOC  
 CQXB    #MAC  SFCA  
 CRC2    #OPT  M2SFCA=%B<4$4<1   
 CRWL    #STR  %C
 CSB=    #OPT  M3SFCA=%C<4$4<1<%C
 CSTW    #OPT  M3SFCA=0  
 CT*G    #OPT  M4SFCA=M2SFCA$1&M3SFCA
 CTT6    #OPT  M5SFCA=M2SFCA^M3SFCA$1
 CW#Q    #STR  %A,0  
 CWSB    (   
 CX#2    #STR  %A
 CXRL          LDX   0  %A   
 CY?=    )   
 CYQW    #SKI  M4SFCA$1  
 C^=G    (   
 C^Q6          LDX   %B FX2  
 D29Q          ADN   %B FILERING 
 D2PB    )   
 D392    #SKI  M4SFCA
 D3NL    (   
 D48=          LDX   %C FX2  
 D4MW          ADN   %C FILERING 
 D57G    )   
 D5M6    #STR  %A
 D66Q    (   
 D6LB          ADN   0  1
 D762    M1SFCA  
 D7KL    )   
 D85=    #SKI  M2SFCA
 D8JW          LDX   %B FPTRF(%B)
 D94G    #SKI  M5SFCA
 D9J6    (   
 D=3Q          SMO      %B   
 D=HB          LDX   %B FPTRF
 D?32    )   
 D?GL    #SKI  M4SFCA
 D#2=          LDX   %C FPTRF(%C)
 D#FW    #STR  %A
 D#^G          BCT   0  M1SFCA   
 D*F6    #STR  %C
 D*YQ    (   
 DBDB    #STR  %B,%C 
 DBY2    (   
 DCCL    #SKI  M4SFCA$1  
 DCX=          LDX   %C %B   
 DDBW    #SKI  M4SFCA
 DDWG          LDX   %B %C   
 DFB6    )   
 DFTQ    #SKI  M2SFCA
 DG*B          ADX   %C FBACKPOINT(%B)   
 DGT2    #SKI  M4SFCA
 DH#L          ADX   %C FBACKPOINT(%C)   
 DHS=    #SKI  M5SFCA
 DJ?W    (   
 DJRG          SMO      %B   
 DK?6          ADX   %C FBACKPOINT   
 DKQQ    )   
 DL=B    )   
 DLQ2    #STR  %C
 DM9L    (   
 DMP=    )   
 DN8W    #FRE  M2SFCA
 DNNG    #FRE  M3SFCA
 DP86    #FRE  M4SFCA
 DPMQ    #FRE  M5SFCA
 DQ7B    #NOR