*     %GOTO PLSRST;                     /* BILINGUAL HEADER             02000010
         MACRO                                                          04000010
         TRSTD                                                          06000010
.*A000000-999999                                               @Y17XAXF 08000010
         MEND                                                           10000010
*        */                                                             12000010
*%PLSRST:;                                                              14000010
*/*                                                                  */ 16000010
*/*      RESOURCE SEGMENT TABLE (POST NCP5)                          */ 18000010
*/*                                                                  */ 20000010
* DECLARE                                                               22000010
*   1 RSTSEG   BASED BDY(BYTE),         /* SEGMENT HDR FORMAT        */ 24000010
*    2 RSTTYPE  CHAR(1),                /* SEGMENT TYPE              */ 26000010
*    2 RSTSEGHL CHAR(1),                /* SEGMENT HDR SIZE          */ 28000010
*    2 RSTNOENT CHAR(2),                /* NO OF ENTRIES IN SEQMENT  */ 30000010
*    2 RSTSEGSZ CHAR(4),                /* SEGMENT SIZE              */ 32000010
*    2 RSTENTSZ CHAR(2),                /* ENTRY SIZE                */ 34000010
*    2 RSTHUNQE CHAR(4),                /* HDR UNIQUE FLD (VAR LEN)  */ 36000010
*     3 RSTPSNAN CHAR(2),               /*  NO OF PRE-SNA ENTRIES    */ 38000010
*     3 RSTOTENT CHAR(2);               /*  TOTAL NO. OF ENTRIES     */ 40000010
* DECLARE                                                               42000010
*   1 RSTHDR   BASED BDY(BYTE),         /* HEADER SEG ENTRY FORMAT   */ 44000010
*    2 RSTSEGTY CHAR(1),                /* SEGMENT TYPE              */ 46000010
*    2 RSTSGOFF CHAR(4),                /* OFFSET TO SEGMENT         */ 48000010
*    2 RSTNULL  CHAR(1);                /* HWORD ALIGNMENT PAD       */ 50000010
* DECLARE                                                               52000010
*   1 RSTSYSEN BASED BDY(BYTE),         /* SYSTEM SEG ENTRY FORMAT   */ 54000010
*    2 RSTRELSE CHAR(2),                /* RELEASE LEVEL             */ 56000010
*    2 RSTMODLV CHAR(2),                /* MODIFICATION LEVEL        */ 58000010
*    2 RSTGENTP CHAR(2),                /* TYPE OF GEN               */ 60000010
*    2 RSTNCPSA CHAR(2),                /* NCP SUBAREA               */ 62000010
*    2 RSTSALTH CHAR(2),                /* SUBAREA ID LENGTH         */ 64000010
*    2 RSTNBFSZ CHAR(2);                /* NCP BUFFER SIZE           */ 66000010
* DECLARE                                                               68000010
*   1 RSTHOST  BASED BDY(BYTE),         /* HOST SEG ENTRY FORMAT     */ 70000010
*    2 RSTHSTSA CHAR(2),                /* HOST NODE SUBAREA         */ 72000010
*    2 RSTKEYLN CHAR(2),                /* HOST UNIT SIZE            */ 74000010
*    2 RSTUNITN CHAR(2),                /* NO OF UNITS IN HOST BUFFER*/ 76000010
*    2 RSTBUFPD CHAR(2);                /* BUFFER PADSIZE            */ 78000010
*/*                                                                  */ 80000010
*/*      VALUES FOR RSTTYPE                                          */ 82000010
*/*                                                                  */ 84000010
* DCL RSTHDSEG BIT(8) CONSTANT('80'X);  /* HEADER SEGMENT            */ 86000010
* DCL RSTSYSEG BIT(8) CONSTANT('01'X);  /* SYSTEM SEGMENT            */ 88000010
* DCL RSTHSTSG BIT(8) CONSTANT('02'X);  /* HOST SEGMENT              */ 90000010
* DCL RSTPATHS BIT(8) CONSTANT('03'X);  /* PATH SEGMENT              */ 92000010
* DCL RSTRSORC BIT(8) CONSTANT('04'X);  /* RESOURCE SEGMENT          */ 94000010
* DCL RSTEND   BIT(8) CONSTANT('FF'X);  /* END OF RST SEGMENT        */ 96000010