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

**Defined in:** [[george:source:MACRO_COMPRO|MACRO COMPRO]]

**Used in:** [[george:source:ALASB867|ALASB867]], [[george:source:COMPROA867|COMPROA867]]

<code - GETCLB.mac.txt>
 FWHD ...[??? GETCLB SECT CENT FGN 21 DOC
 FWR=    #MAC  GETCLB
 FX=W          SETNCORE +AVELINE+ALB,%A,CLB  
 FXQG          LDN   6  A1(%A)   
 FY=6          LDN   7  A1+1(%A) 
 FYPQ          STOZ     A1(%A)   
 F^9B          MOVE  6  ALB-1
 F^P2    #NOR
</code>