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

**Defined in:** [[george:source:MACS_MISW|MACS MISW]]

**Used in:** 

<code - TRANSERR.mac.txt>
 BYHL    #MAC  TRANSERR  
 B^3=    #SKI           %A["IF NUMBER IS 0,THE OLD MESSAGE WILL NOT BE CHANGED"  
 B^GW    (   
 C22G    #MEN  PROFLAG   
 C2G6    #TRA  K50PROFLAG
 C2^Q    #SKI           %A<37-37 
 C3FB                   %A,%AH%B 
 C3^2    #SKI           %A>36-36 
 C4DL                   36,36H%B 
 C4Y=    #END
 C5CW    #MEN           MULTIPLX 
 C5XG    #TRA  K60MULTIPLX   
 C6C6    #SKI           %A<37-37 
 C6WQ                   %A,%AH%B 
 C7BB    #SKI           %A>36-36 
 C7W2                   36,36H%B 
 C8*L    #END
 C8T=    #UNS JSKI36 
 C9#W    (   
 C9SG    #MEN  IPBMOPB   
 C=#6    #TRA  K50IPBMOPB
 C=RQ    )   
 C??B    #UNS JSKI36<1$1 
 C?R2    (   
 C#=L    #MEN  IPBMOP
 C#Q=    #TRA  K50IPBMOP 
 C*9W    )   
 C*PG    #SKI           %A<37-37 
 CB96                   %A,%AH%B 
 CBNQ    #SKI           %A>36-36 
 CC8B                   36,36H%B 
 CCN2    #END
 CD7L    )   
 CDM=    #NOR
</code>