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

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

**Used in:** [[george:source:IPALL864|IPALL864]], [[george:source:PERFCHAP866|PERFCHAP866]], [[george:source:RITEFAIL864|RITEFAIL864]], [[george:source:SJLOOP864|SJLOOP864]]

<code - TRANSRET.mac.txt>
 66S2    [???  TRANSRET SECT FILE FGN 1 DOC  
 67?L    #MAC  TRANSRET  
 67R=          LDX   2  FX2  
 68=W          LDX   0  ATYPE(2) 
 68QG          SRL   0  12   
 69=6          SBN   0  IPCA+FSHARED 
 69PQ          BZE   0  MTRANSRET
 6=9B          GEOERR   1,WRONGACT   
 6=P2    MTRANSRET   
 6?8L          ACROSS   FSHTRANC,2   
 6?N=    #NOR
</code>