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

**Defined in:** [[george:source:MACROS_EWDAS|MACROS EWDAS]]

**Used in:** [[george:source:SHARE866|SHARE866]]

<code - SHAREOFF.mac.txt>
 ^?DW    #MAC  SHAREOFF  
 ^?YG    #   
 ^#D6    #STR  %A
 ^#XQ          LDX   0  %A           [IF %A PRESENT  
 ^*CB    #STR  %A
 ^*X2    #SKI
 ^BBL          LDX   0  CPPTR(2)     [IF %A ABSENT   
 ^BW=          '171  0  4
 ^C*W          BNG   0  %B           [^ IF REJECTED  
 ^CTG    #NOR
</code>