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

**Defined in:** [[george:source:MACROS_SHFS|MACROS SHFS]]

**Used in:** [[george:source:CANCRVX864|CANCRVX864]], [[george:source:DTWRONG867|DTWRONG867]], [[george:source:FHDIRTWO864|FHDIRTWO864]], [[george:source:FREEZE864|FREEZE864]], [[george:source:INCRCUBX860|INCRCUBX860]], [[george:source:MACRALAS864|MACRALAS864]], [[george:source:MONFILEA864|MONFILEA864]], [[george:source:MULTIPLX864|MULTIPLX864]], [[george:source:NORMALUS864|NORMALUS864]], [[george:source:REGEN865|REGEN865]], [[george:source:RETRIEVE864|RETRIEVE864]]

<code - TRANCHKN.mac.txt>
 5P6G    [???  TRANCHKN SECT FILE FGN 1 DOC  
 5PL6    #MAC  TRANCHKN  
 5Q5Q          HUNT     1,FSH,FSHREQ 
 5QKB    #STR  %D
 5R52          BNG   1  %D   
 5RJL    #DEF  MTC%B=1   
 5S4=          LF       1,FSHCODENUM,0   
 5SHW    #UNS  MTCEQUAL  
 5T3G    (   
 5TH6          SBN   0  %A   
 5W2Q          LDX   1  FX1  
 5WGB          BNZ   0  %C   
 5X22    )   
 5XFL    #UNS  MTCGREATER
 5X^=    (   
 5YDW          NGX   0  0
 5YYG          ADN   0  %A   
 5^D6          LDX   1  FX1  
 5^XQ          BPZ   0  %C   
 62CB    )   
 62X2    #UNS  MTCLESS   
 63BL    (   
 63W=          SBN   0  %A   
 64*W          LDX   1  FX1  
 64TG          BPZ   0  %C   
 65*6    )   
 65SQ    #FRE  MTCEQUAL,MTCLESS,MTCGREATER   
 66#B    #NOR
</code>