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

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

**Used in:** [[george:source:MESSBA|MESSBA]], [[george:source:MESSBG|MESSBG]], [[george:source:MESSBH|MESSBH]], [[george:source:MESSCG|MESSCG]]

<code - TWINNING.mac.txt>
 KR?L    #   
 KRR=    # **********************************************************************
 KS=W    # *            EXOFILE TWINNING SYSTEM MACROS                           
 KSQG    # *                                                                     
 KT=6    # *         A)RESTORE TIME MACROS:-                                     
 KTPQ    # *            TWINNING,DECOM,TWINTRCE,DEDICATE,UNDEDICATE              
 KW9B    # *         B)MACROS USED BY RTMS:-                                     
 KWP2    # *            R,TWSET                                                  
 KX8L    # *         C)STATUS TEST MACROS:-                                      
 KXN=    # *            JSHARED,JUNDE,JDED                                       
 KY7W    # *         D)MESSAGE SENDING MACROS:-                                  
 KYMG    # *            CHAREA,CHFILE,GETAREA,FIPPER,AUTWIN,ANYUSERS,PHOLD,BUTTON
 K^76    # *         E)OTHERS:-                                                  
 K^LQ    # *            TWINCT,TWTRACE,TESTLINK,TWAIT,TCLOSE                     
 L26B    # *                                                                     
 L2L2    # **********************************************************************
 L35L    #   
 L3K=    [???                                TWINNING
 L44W    #                                   ********
 L4JG    #MAC  TWINNING  
 L546    #   
 L5HQ    #STR  %A
 L63B    #SKI
 L6H2    !!    MUST HAVE ON OR OFF PARAMETER 
 L72L    #STR  %A
 L7G=          TWSET %A,CDUM,3   
 L7^W    #NOR
</code>