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

**Defined in:** [[george:source:MACROS_LLS|MACROS LLS]]

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

<code - SETRTP.mac.txt>
 3HRQ    #MAC  SETRTP
 3J?B    #STR  %A,1  
 3JR2          LDX   1  %A   
 3K=L          FLIPS    JCLASS(1),,14
 3KQ=          FPCAJO   1
 3L9W          ADX   1  %B   
 3LPG          LDX   0  GSIGN
 3M96          SMO      %B   
 3MNQ          ORS   0  ACR1(1)  
 3N8B          LDX   1  FX1  
 3NN2          LDX   2  FX2  
 3P7L    #NOR
</code>