*/*******************************************************************/ 00020041 */* IHASHDR */ 00050041 */* MACCOMP - SC1CM */ 00130041 */* MACSTAT - @G17SP2F */ 00170041 */* MACMEAN - SHDR MEANS SLIP HEADER */ 00190041 */* THE IHASHDR MAPS THE SLIP HEADER. THIS CONTROL BLOCK IS */ 00250041 */* POINTED TO BY THE CVTRTMS FIELD IN THE CVT. THE SHDR POINTS */ 00330041 */* TO THE FIRST AND LAST SLIP CONTROL ELEMENTS(SCE). STORAGE IS */ 00370041 */* FROM FIXED SQA (SP245). IEECB905 GETS, BUILDS, AND FREES THE */ 00390041 */* SHDR. */ 00450041 */* */ 00490041 */*******************************************************************/ 00540041 DCL 1 SHDR BASED(CVTRTMS) BDY(DWORD), 00590041 2 SHDRCBID CHAR(4), /* CONTROL BLOCK ID = SHDR */ 00800041 2 SHDRPFC PTR(31), /* IEAVTSLP USE COUNT */ 00850041 2 SHDRCTFW CHAR(8) BDY(WORD),/*TO DELETE ENTRIES,MUST CDS */ 00855041 3 SHDRCTR PTR(31), /* PROCESSOR SERIALIZATION CTR*/ 00860041 3 SHDRFWD PTR(31), /* FORWARD PTR TO SCE CHAIN */ 00890041 2 SHDRBKWD PTR(31), /* BACKWARD PTR TO SCE CHAIN */ 00950041 2 SHDRFLGS BIT(8), /* FLAGS */ 01000041 3 SHDRFRR BIT(1), /* IEAVTSLP FRR ENTERED */ 01200041 3 SHDRDELP BIT(1), /*DELETE IS PENDNG ON PREV SCE*/ 01250041 3 * BIT(6), /* RESERVED */ 01270041 2 SHDRSEQ BIT(8), /* SEQUENCE BYTE */ 01300041 2 SHDRIDCT PTR(15), /* CTR FOR GENERATING SCE ID */ 01450041 2 SHDRPROC PTR(31); /* SLIP PROCESSOR IEAVTSLP */ 01500041