(********************************************************************************************************************************) (* Created: 14-SEP-1999 11:32:39 by OpenVMS SDL EV1-50 *) (* Source: 17-SEP-1998 13:55:58 PADO_3:[ANSI_V31P_AVMS.KIT]SS7_K_COMMON_.SDL;1 *) (********************************************************************************************************************************) MODULE SS7_K_COMMON_ ; [HIDDEN] TYPE (**** Pre-declared data types ****) $BYTE = [BYTE] -128..127; $WORD = [WORD] -32768..32767; $QUAD = [QUAD,UNSAFE] RECORD L0:UNSIGNED; L1:INTEGER; END; $OCTA = [OCTA,UNSAFE] RECORD L0,L1,L2:UNSIGNED; L3:INTEGER; END; $UBYTE = [BYTE] 0..255; $UWORD = [WORD] 0..65535; $UQUAD = [QUAD,UNSAFE] RECORD L0,L1:UNSIGNED; END; $UOCTA = [OCTA,UNSAFE] RECORD L0,L1,L2,L3:UNSIGNED; END; $UOCTAQUAD = [OCTA(2),UNSAFE] RECORD L0,L1,L2,L3,L4,L5,L6,L7:UNSIGNED; END; $PACKED_DEC = [BIT(4),UNSAFE] 0..15; $DEFTYP = [UNSAFE] INTEGER; $DEFPTR = [UNSAFE] ^$DEFTYP; $BOOL = [BIT(1),UNSAFE] BOOLEAN; $BIT2 = [BIT(2),UNSAFE] 0..3; $BIT3 = [BIT(3),UNSAFE] 0..7; $BIT4 = [BIT(4),UNSAFE] 0..15; $BIT5 = [BIT(5),UNSAFE] 0..31; $BIT6 = [BIT(6),UNSAFE] 0..63; $BIT7 = [BIT(7),UNSAFE] 0..127; $BIT8 = [BIT(8),UNSAFE] 0..255; $BIT9 = [BIT(9),UNSAFE] 0..511; $BIT10 = [BIT(10),UNSAFE] 0..1023; $BIT11 = [BIT(11),UNSAFE] 0..2047; $BIT12 = [BIT(12),UNSAFE] 0..4095; $BIT13 = [BIT(13),UNSAFE] 0..8191; $BIT14 = [BIT(14),UNSAFE] 0..16383; $BIT15 = [BIT(15),UNSAFE] 0..32767; $BIT16 = [BIT(16),UNSAFE] 0..65535; $BIT17 = [BIT(17),UNSAFE] 0..131071; $BIT18 = [BIT(18),UNSAFE] 0..262143; $BIT19 = [BIT(19),UNSAFE] 0..524287; $BIT20 = [BIT(20),UNSAFE] 0..1048575; $BIT21 = [BIT(21),UNSAFE] 0..2097151; $BIT22 = [BIT(22),UNSAFE] 0..4194303; $BIT23 = [BIT(23),UNSAFE] 0..8388607; $BIT24 = [BIT(24),UNSAFE] 0..16777215; $BIT25 = [BIT(25),UNSAFE] 0..33554431; $BIT26 = [BIT(26),UNSAFE] 0..67108863; $BIT27 = [BIT(27),UNSAFE] 0..134217727; $BIT28 = [BIT(28),UNSAFE] 0..268435455; $BIT29 = [BIT(29),UNSAFE] 0..536870911; $BIT30 = [BIT(30),UNSAFE] 0..1073741823; $BIT31 = [BIT(31),UNSAFE] 0..2147483647; $BIT32 = [BIT(32),UNSAFE] UNSIGNED; (*** MODULE SS7_K_COMMON_ IDENT X02.03-001 ***) (*-------------------------------------------------------------------------- *) (*---------------------------------------------------------------------------- *) (* *) (* CONSTANTS *) (* *) (*--------------------------------------------------------------------------- *) (* *) (* Symbols used to define the item code of the indication *) (* routines item list (when enabling the indications). *) (* *) CONST SS7_K_SCCP_N_UNITDATA = 30; SS7_K_SCCP_N_MGT_MSG = 31; SS7_K_SCCP_USER_DISTRIB_INDICATION = 32; SS7_K_SCCP_N_NOTICE = 33; SS7_K_SCCP_N_TRAFFIC = 34; SS7_K_MTP_TRANSFER = 35; SS7_K_MTP_USER_DISTRIB_INDICATION = 36; SS7_K_MTP_INDICATION = 37; (* *) (* Symbols used to define the MTP-INDICATION type in the SS7$MTP_NETWORK_INDICATION routine *) (* *) CONST SS7_K_MTP_PAUSE_IND = 60; SS7_K_MTP_RESUME_IND = 61; SS7_K_MTP_STATUS_IND = 62; SS7_K_MTP_UPU = 63; SS7_K_MTP_CONGESTION = 64; (* *) (*Symbols used to define the nodes and applications state *) (* *) CONST SS7_K_DIST_APPLI_DOWN = 70; SS7_K_DIST_APPLI_UP = 71; SS7_K_DIST_APPLI_CONGESTED = 72; SS7_K_DIST_APPLI_UNCONGESTED = 73; SS7_K_NODE_UP = 74; SS7_K_NODE_DOWN = 75; SS7_K_DIST_APPLI_RESTRICTED = 76; SS7_K_DIST_APPLI_UNRESTRICTED = 77; (* Symbols used to define the MTP-INDICATION type in the SS7$MTP_NETWORK_INDICATION routine *) (* *) CONST SS7_K_SCCP_N_STATE_IND = 80; SS7_K_SCCP_N_PC_STATE_IND = 81; SS7_K_SCCP_N_COORD_IND = 82; SS7_K_SCCP_N_COORD_CNF = 83; (* Symbols used to define the SCCP Management Messages *) (* *) CONST SS7_K_SCCP_USER_IN_SERVICE = 0; SS7_K_SCCP_USER_OUT_OF_SERVICE = 1; SS7_K_SCCP_PC_ACCESSIBLE = 0; SS7_K_SCCP_PC_INACCESSIBLE = 1; SS7_K_SCCP_PC_CONGESTED = 2; (* *) (* Maximum length of a message sent by the user to the user distribution *) (* *) CONST SS7_K_MAX_LENGTH_USER_MSG = 255; (* *) (* Maximum length of a message sent by the user to n_unitdata_req *) (* *) CONST SS7_K_MAX_LENGTH_SCCP_USER_DATA = 2630; END.