SPACECT [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: SPACECT)}}
====== SPACECT ======
(GIN Macro)

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

**Used in:** [[george:source:BMXEMS83|BMXEMS83]], [[george:source:CPOBJ6|CPOBJ6]], [[george:source:INLOOP84|INLOOP84]], [[george:source:LISTDIR867|LISTDIR867]], [[george:source:LISTDIRF867|LISTDIRF867]], [[george:source:LPOBJ6|LPOBJ6]], [[george:source:LPTWO7|LPTWO7]], [[george:source:TPOBJ867|TPOBJ867]]

<code - SPACECT.mac.txt>
 22FL    [   
 22^=    [                                    TONY HAMILTON  
 23DW    [   
 23YG    [     MACROS AS FOLLOWS 
 24D6    [   
 24XQ    [     SPACECT   
 25CB    [     ORELP 
 25X2    [     CHECKSTATE
 26BL    [     FDRMON
 26W=    [     FDRMOFF   
 27*W    [     FDRMTEST  
 27TG    [     FDRMCHECK 
 28*6    [     FDRMAUTO  
 28SQ    [     FDRMAUTX  
 29#B    [     FDRMQUERY 
 29S2    [     JNOTFDRM  
 2=?L    [     OLPEND
 2=R=    [     AUTSTART  
 2?=W    [     AUTFIN
 2?QG    [     AUTFAIL   
 2#=6    [     JAUTON
 2#PQ    [     JAUTOFF   
 2*9B    [     JAUTFAIL  
 2*P2    [     CLAUTFAIL 
 2*YS ...[     TRTYPE1   
 2B8L    [     ASTABLES  
 2BN=    [     ASTYPE
 2BS7 ...[     INCHECK   
 2BY4 ...[     INMOP 
 2C3^ ...[     OUTMOP
 2C5X ...[     FHONLINE  
 2C7W    [   
 2CCN ...[??? SPACECT SECT FILE FGN 7 DOC
 2CMG    [     J TO %C IF X%A ALL SPACES;ELSE COUNT TRAILING SPACES IN X%B   
 2D76    #MAC  SPACECT   
 2DLQ          BXE   %A ACES,%C             [J IF ALL SPACES 
 2F6B          LDX   0  ACES 
 2FL2          LDN   %B 3
 2G5L    M1SPACECT   
 2GK=          SLL   0  6
 2H4W          SLL   %A 6
 2HJG          BXE   0  %A,M2SPACECT        [J IF REST ARE SPACES
 2J46          BCT   %B M1SPACECT
 2JHQ    M2SPACECT   
 2K3B    #NOR
</code>