*COMDECK 3270CMSG 
************************************************************************
*                                                                      *
*         3270 TIP  CANNED MESSAGES                                    *
*                                                                      *
************************************************************************
          SPC    3
          NAM    CM3270 
          SPC    3
* 
*         CHARACTER EQUATIONS 
* 
          EQU    CLPAD($55) 
          EQU    CTPAD($FF) 
          EQU    CSYN($32)
          EQU    CDLE($10)
          EQU    CACK0($70) 
          EQU    CACK1($61) 
          EQU    CEOT($37)
          EQU    CNAK($3D)
          EQU    CENQ($2D)
          EQU    CRVI($7C)
          EQU    CWACK($6B) 
* 
*         MACRO DEFINITIONS 
* 
MSGEBC    MAC    NM,C1,C2 
          EQU    "NM"(*)
          ENT    "NM" 
          IFC    "C2",EQ, 
          VFD    N16/$0A04
          EIF 
          IFC    "C2",NE, 
          VFD    N16/$0B04
          EIF 
          NLS 
          VFD    N16/0,X8/CLPAD,X8/CSYN,X8/CSYN,X8/CSYN 
          IFC    "C2",NE, 
          VFD    X8/"C1",X8/"C2",X8/CTPAD 
          EIF 
          IFC    "C2",EQ, 
          VFD    X8/"C1",X8/CTPAD 
          EIF 
          LST 
          EMC 
          EJT 
* 
*         CANNED MESSAGES 
* 
          MSGEBC M3EAK0,CDLE,CACK0
          MSGEBC M3EAK1,CDLE,CACK1
          MSGEBC M3EEOT,CEOT
          MSGEBC M3ENAK,CNAK
          MSGEBC M3EENQ,CENQ
          MSGEBC M3EWAK,CDLE,CWACK
*         MSGEBC M3ERVI,CDLE,CRVI 
          SPC    2
          END 
