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

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

**Used in:** [[george:source:BACKMAP864|BACKMAP864]], [[george:source:BMCNTRL866|BMCNTRL866]]

<code - CHECKBL.mac.txt>
 C6WQ ...#     THIS CALLS A SUBROUTINE IN STEP TO CHECK RECORD HEADERS   
 C7BB ...#MAC  CHECKBL   
 C7W2 ...#STR  %A,1  
 C8*L ...      LDX   1  %A                  [SKIPPED IF %A=1 
 C8T= ...#STR  %B,2  
 C9#W ...      LDX   2  %B                  [SKIPPED IF %B=2 
 C9SG ...      CALL  0  (HCHBL)  
 C=#6 ...      BRN      %C   
 C=RQ ...#NOR
</code>