*        %GOTO PLSCTM;                  /*                              03000000
         MACRO                                                          06000000
         TXCTMD                                                         09000000
*        ASSEMLBER VERION OF THIS DSECT NOT SUPPORTED                   12000000
         MEND  */                                                       15000000
*%PLSCTM:;                                                              18000000
*/*                                                                  */ 21000000
*/*      CTERM FORMAT                                                */ 24000000
*/*                                                                  */ 27000000
* DECLARE                                                               30000000
* 1 IEDXCTMD BASED(XCTMPTR),            /* CTERM COMMAND             */ 33000000
*  2 XCTMCMD,                                                           36000000
*   3 XCTMCODE CHAR(3),                 /* COMMAND CODE              */ 39000000
*    4 XCTMNETS CHAR(1),                /*  NETWORK SERVICES         */ 42000000
*    4 XCTMSESS CHAR(1),                /*  SESSION SERVICES         */ 45000000
*    4 XCTMREQ  CHAR(1),                /*  CTERM REQ                */ 48000000
*   3 XCTMFMT  CHAR(1),                 /* FORMAT                    */ 51000000
*   3 XCTMTYPE CHAR(1),                 /* TYPE                      */ 54000000
*    4 XCTMTERM BIT(4),                 /* TYPE OF TERMINATE @YM08991*/ 55000010
*    4 *        BIT(4),                 /* UNUSED            @YM08991*/ 56000010
*   3 XCTMSNA  CHAR(2),                 /* SECONDARY LU ADDR         */ 57000000
*   3 XCTMRSN  CHAR(1),                 /* REASON                    */ 60000000
*   3 XCTMRQID,                         /* REQUESTOR ID              */ 63000000
*    4 XCTMRLEN FIXED(8),               /*  LEN OF REQUESTOR ID DATA */ 66000000
*    4 XCTMRID  CHAR(0),                /*  REQUESTOR ID DATA        */ 69000000
*   3 XCTMPWRD,                         /* PASSWORD                  */ 72000000
*    4 XCTMPLEN FIXED(8),               /*  LEN OF PASSWORD DATA     */ 75000000
*    4 XCTMPSWD CHAR(0);                /*  PASSWORD DATA            */ 78000000
* DCL XCTMTRMF BIT(4) CONSTANT('0010'B);/* FORCED TERMINATE  @YM08991*/ 81000010
* DCL XCTMTRMO BIT(4) CONSTANT('0001'B);/* ORDERLY TERMINATE @YM08991*/ 84000010