!*** MODULE $NSARECDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! +
 !  Security Auditing record definitions
 ! -
	PARAMETER NSA$C_REC_MAXLENGTH = '00000400'X  !  Maximum record size
	PARAMETER NSA$K_REC_MAXLENGTH = '00000400'X  !  Maximum record size
	PARAMETER NSA$S_REC_MAXLENGTH = '00000400'X  !  Maximum record size
 ! +
 !  Audit record type definitions
 ! -
	PARAMETER NSA$K_RECTYP_FIL = '00000001'X  !  File access
	PARAMETER NSA$K_RECTYP_SYSUAF = '00000002'X  !  System UAF
	PARAMETER NSA$K_RECTYP_NETUAF = '00000003'X  !  Network UAF
	PARAMETER NSA$K_RECTYP_LOGB = '00000004'X  !  Login breakin detection
	PARAMETER NSA$K_RECTYP_LOGI = '00000005'X  !  Successful login
	PARAMETER NSA$K_RECTYP_LOGF = '00000006'X  !  Login failure
	PARAMETER NSA$K_RECTYP_LOGO = '00000007'X  !  Logout
	PARAMETER NSA$K_RECTYP_VOL = '00000008'X  !  Volume operations
	PARAMETER NSA$K_RECTYP_GBL = '00000009'X  !  Global section access
	PARAMETER NSA$K_RECTYP_INSTAL = '0000000A'X  !  INSTALL operations
	PARAMETER NSA$K_RECTYP_RIGHTS = '0000000B'X  !  Rights database operations
	PARAMETER NSA$K_RECTYP_AUDIT = '0000000C'X  !  SET AUDIT operations
	PARAMETER NSA$K_RECTYPNUM = '0000000C'X
 ! +
 !  Audit record subtype and ID definitions
 ! -
 !  File access
	PARAMETER NSA$K_RECTYP_FIL_SUCC = '00000001'X  !  Successful file access
	PARAMETER NSA$K_RECTYP_FIL_FAIL = '00000002'X  !  File access failure
	PARAMETER NSA$K_RECTYPNUM_FIL = '00000002'X
	PARAMETER NSA$K_RECID_FIL_SUCC = '00010001'X
	PARAMETER NSA$K_RECID_FIL_FAIL = '00020001'X
 !  Global section access
	PARAMETER NSA$K_RECTYP_GBL_SUCC = '00000001'X  !  Successful Global section access
	PARAMETER NSA$K_RECTYP_GBL_FAIL = '00000002'X  !  Global section access failure
	PARAMETER NSA$K_RECTYPNUM_GBL = '00000002'X
	PARAMETER NSA$K_RECID_GBL_SUCC = '00010009'X
	PARAMETER NSA$K_RECID_GBL_FAIL = '00020009'X
 !  System UAF
	PARAMETER NSA$K_RECTYP_SYSUAF_ADD = '00000001'X  !  System UAF record addition
	PARAMETER NSA$K_RECTYP_SYSUAF_DEL = '00000002'X  !  System UAF record deletion
	PARAMETER NSA$K_RECTYP_SYSUAF_MOD = '00000003'X  !  System UAF record modification
	PARAMETER NSA$K_RECTYP_SYSUAF_COP = '00000004'X  !  System UAF record copied
	PARAMETER NSA$K_RECTYP_SYSUAF_REN = '00000005'X  !  System UAF record renamed
	PARAMETER NSA$K_RECTYPNUM_SYSUAF = '00000005'X
	PARAMETER NSA$K_RECID_SYSUAF_ADD = '00010002'X
	PARAMETER NSA$K_RECID_SYSUAF_DEL = '00020002'X
	PARAMETER NSA$K_RECID_SYSUAF_MOD = '00030002'X
	PARAMETER NSA$K_RECID_SYSUAF_COP = '00040002'X
	PARAMETER NSA$K_RECID_SYSUAF_REN = '00050002'X
 !  Network UAF
	PARAMETER NSA$K_RECTYP_NETUAF_ADD = '00000001'X  !  Network UAF record addition
	PARAMETER NSA$K_RECTYP_NETUAF_DEL = '00000002'X  !  Network UAF record deletion
	PARAMETER NSA$K_RECTYP_NETUAF_MOD = '00000003'X  !  Network UAF record modification
	PARAMETER NSA$K_RECTYPNUM_NETUAF = '00000003'X
	PARAMETER NSA$K_RECID_NETUAF_ADD = '00010003'X
	PARAMETER NSA$K_RECID_NETUAF_DEL = '00020003'X
	PARAMETER NSA$K_RECID_NETUAF_MOD = '00030003'X
 !  Login breakin detection
	PARAMETER NSA$K_RECTYP_LOGB_DIA = '00000001'X  !  Dialup interactive breakin detection
	PARAMETER NSA$K_RECTYP_LOGB_LOC = '00000002'X  !  Local interactive breakin detection
	PARAMETER NSA$K_RECTYP_LOGB_REM = '00000003'X  !  Remote interactive breakin detection
	PARAMETER NSA$K_RECTYP_LOGB_NET = '00000004'X  !  Network breakin detection
	PARAMETER NSA$K_RECTYP_LOGB_DET = '00000005'X  !  Detached process breakin detection
	PARAMETER NSA$K_RECTYPNUM_LOGB = '00000005'X
	PARAMETER NSA$K_RECID_LOGB_DIA = '00010004'X
	PARAMETER NSA$K_RECID_LOGB_LOC = '00020004'X
	PARAMETER NSA$K_RECID_LOGB_REM = '00030004'X
	PARAMETER NSA$K_RECID_LOGB_NET = '00040004'X
	PARAMETER NSA$K_RECID_LOGB_DET = '00050004'X
 !  Successful login
	PARAMETER NSA$K_RECTYP_LOGI_BAT = '00000001'X  !  Batch process login
	PARAMETER NSA$K_RECTYP_LOGI_DIA = '00000002'X  !  Dialup interactive login
	PARAMETER NSA$K_RECTYP_LOGI_LOC = '00000003'X  !  Local interactive login
	PARAMETER NSA$K_RECTYP_LOGI_REM = '00000004'X  !  Remote interactive login
	PARAMETER NSA$K_RECTYP_LOGI_NET = '00000005'X  !  Network login
	PARAMETER NSA$K_RECTYP_LOGI_SUB = '00000006'X  !  Subprocess login
	PARAMETER NSA$K_RECTYP_LOGI_DET = '00000007'X  !  Detached process login
	PARAMETER NSA$K_RECTYPNUM_LOGI = '00000007'X
	PARAMETER NSA$K_RECID_LOGI_BAT = '00010005'X
	PARAMETER NSA$K_RECID_LOGI_DIA = '00020005'X
	PARAMETER NSA$K_RECID_LOGI_LOC = '00030005'X
	PARAMETER NSA$K_RECID_LOGI_REM = '00040005'X
	PARAMETER NSA$K_RECID_LOGI_NET = '00050005'X
	PARAMETER NSA$K_RECID_LOGI_SUB = '00060005'X
	PARAMETER NSA$K_RECID_LOGI_DET = '00070005'X
 !  Login failure
	PARAMETER NSA$K_RECTYP_LOGF_BAT = '00000001'X  !  Batch process login failure
	PARAMETER NSA$K_RECTYP_LOGF_DIA = '00000002'X  !  Dialup interactive login failure
	PARAMETER NSA$K_RECTYP_LOGF_LOC = '00000003'X  !  Local interactive login failure
	PARAMETER NSA$K_RECTYP_LOGF_REM = '00000004'X  !  Remote interactive login failure
	PARAMETER NSA$K_RECTYP_LOGF_NET = '00000005'X  !  Network login failure
	PARAMETER NSA$K_RECTYP_LOGF_SUB = '00000006'X  !  Subprocess login failure
	PARAMETER NSA$K_RECTYP_LOGF_DET = '00000007'X  !  Detached process login failure
	PARAMETER NSA$K_RECTYPNUM_LOGF = '00000007'X
	PARAMETER NSA$K_RECID_LOGF_BAT = '00010006'X
	PARAMETER NSA$K_RECID_LOGF_DIA = '00020006'X
	PARAMETER NSA$K_RECID_LOGF_LOC = '00030006'X
	PARAMETER NSA$K_RECID_LOGF_REM = '00040006'X
	PARAMETER NSA$K_RECID_LOGF_NET = '00050006'X
	PARAMETER NSA$K_RECID_LOGF_SUB = '00060006'X
	PARAMETER NSA$K_RECID_LOGF_DET = '00070006'X
 !  Logout
	PARAMETER NSA$K_RECTYP_LOGO_BAT = '00000001'X  !  Batch process logout
	PARAMETER NSA$K_RECTYP_LOGO_DIA = '00000002'X  !  Dialup interactive logout
	PARAMETER NSA$K_RECTYP_LOGO_LOC = '00000003'X  !  Local interactive logout
	PARAMETER NSA$K_RECTYP_LOGO_REM = '00000004'X  !  Remote interactive logout
	PARAMETER NSA$K_RECTYP_LOGO_NET = '00000005'X  !  Network logout
	PARAMETER NSA$K_RECTYP_LOGO_SUB = '00000006'X  !  Subprocess logout
	PARAMETER NSA$K_RECTYP_LOGO_DET = '00000007'X  !  Detached process logout
	PARAMETER NSA$K_RECTYPNUM_LOGO = '00000007'X
	PARAMETER NSA$K_RECID_LOGO_BAT = '00010007'X
	PARAMETER NSA$K_RECID_LOGO_DIA = '00020007'X
	PARAMETER NSA$K_RECID_LOGO_LOC = '00030007'X
	PARAMETER NSA$K_RECID_LOGO_REM = '00040007'X
	PARAMETER NSA$K_RECID_LOGO_NET = '00050007'X
	PARAMETER NSA$K_RECID_LOGO_SUB = '00060007'X
	PARAMETER NSA$K_RECID_LOGO_DET = '00070007'X
 !  Volume operations
	PARAMETER NSA$K_RECTYP_VOL_MOU = '00000001'X  !  Volume mounts
	PARAMETER NSA$K_RECTYP_VOL_DMOU = '00000002'X  !  Volume dismounts
	PARAMETER NSA$K_RECTYPNUM_VOL = '00000002'X
	PARAMETER NSA$K_RECID_VOL_MOU = '00010008'X
	PARAMETER NSA$K_RECID_VOL_DMOU = '00020008'X
 !  INSTALL operations
	PARAMETER NSA$K_RECTYP_INSTAL_ADD = '00000001'X  !  Add known file
	PARAMETER NSA$K_RECTYP_INSTAL_REM = '00000002'X  !  Remove known file
	PARAMETER NSA$K_RECTYPNUM_INSTAL = '00000002'X
 !  Rights database operations
	PARAMETER NSA$K_RECTYP_RIGHTS_CRE = '00000001'X  !  Create rights database
	PARAMETER NSA$K_RECTYP_RIGHTS_ADD = '00000002'X  !  Add identifier
	PARAMETER NSA$K_RECTYP_RIGHTS_REM = '00000003'X  !  Remove identifier
	PARAMETER NSA$K_RECTYP_RIGHTS_MOD_ID = '00000004'X  !  Modify identifier
	PARAMETER NSA$K_RECTYP_RIGHTS_MOD_HO = '00000005'X  !  Modify identifier holder
	PARAMETER NSA$K_RECTYP_RIGHTS_GRANT = '00000006'X  !  Grant identifier
	PARAMETER NSA$K_RECTYP_RIGHTS_REVOK = '00000007'X  !  Revoke identifier
	PARAMETER NSA$K_RECTYPNUM_RIGHTS = '00000007'X
 !  SET AUDIT operations
	PARAMETER NSA$K_RECTYP_AUDIT_ENA_AL = '00000001'X  !  Enable alarm
	PARAMETER NSA$K_RECTYP_AUDIT_DIS_AL = '00000002'X  !  Disable alarm
	PARAMETER NSA$K_RECTYP_AUDIT_ENA_JL = '00000003'X  !  Enable journal
	PARAMETER NSA$K_RECTYP_AUDIT_DIS_JL = '00000004'X  !  Disable journal
	PARAMETER NSA$K_RECTYPNUM_AUDIT = '00000004'X
 ! +
 !  SYSUAFF stuff
 ! -
	STRUCTURE /sysuaff_bits/
	    UNION
	        MAP
	        INTEGER*4 nsa$q_sysuaff(2)		 !  SYSUAFF flags:
	        END MAP
	        MAP
	            PARAMETER nsa$S_access = 1
	            PARAMETER nsa$V_access = 0		 !   ACCESS modified
	            PARAMETER nsa$S_account = 1
	            PARAMETER nsa$V_account = 1		 !   ACCOUNT modified
	            PARAMETER nsa$S_astlm = 1
	            PARAMETER nsa$V_astlm = 2		 !   ASTLM modified
	            PARAMETER nsa$S_batch = 1
	            PARAMETER nsa$V_batch = 3		 !   BATCH modified
	            PARAMETER nsa$S_biolm = 1
	            PARAMETER nsa$V_biolm = 4		 !   BIOLM modified
	            PARAMETER nsa$S_bytlm = 1
	            PARAMETER nsa$V_bytlm = 5		 !   BYTLM modified
	            PARAMETER nsa$S_cli = 1
	            PARAMETER nsa$V_cli = 6			 !   CLI modified
	            PARAMETER nsa$S_clitables = 1
	            PARAMETER nsa$V_clitables = 7		 !   CLITABLES modified
	            PARAMETER nsa$S_cputime = 1
	            PARAMETER nsa$V_cputime = 8		 !   CPUTIME modified
	            PARAMETER nsa$S_defprivileges = 1
	            PARAMETER nsa$V_defprivileges = 9	 !   DEFPRIVILEGES modified
	            PARAMETER nsa$S_device = 1
	            PARAMETER nsa$V_device = 10		 !   DEVICE modified
	            PARAMETER nsa$S_dialup = 1
	            PARAMETER nsa$V_dialup = 11		 !   DIALUP modified
	            PARAMETER nsa$S_diolm = 1
	            PARAMETER nsa$V_diolm = 12		 !   DIOLM modified
	            PARAMETER nsa$S_directory = 1
	            PARAMETER nsa$V_directory = 13		 !   DIRECTORY modified
	            PARAMETER nsa$S_enqlm = 1
	            PARAMETER nsa$V_enqlm = 14		 !   ENQLM modified
	            PARAMETER nsa$S_expiration = 1
	            PARAMETER nsa$V_expiration = 15		 !   EXPIRATION modified
	            PARAMETER nsa$S_fillm = 1
	            PARAMETER nsa$V_fillm = 16		 !   FILLM modified
	            PARAMETER nsa$S_flags = 1
	            PARAMETER nsa$V_flags = 17		 !   FLAGS modified
	            PARAMETER nsa$S_interactive = 1
	            PARAMETER nsa$V_interactive = 18	 !   INTERACTIVE modified
	            PARAMETER nsa$S_jtquota = 1
	            PARAMETER nsa$V_jtquota = 19		 !   JTQUOTA modified
	            PARAMETER nsa$S_lgicmd = 1
	            PARAMETER nsa$V_lgicmd = 20		 !   LGICMD modified
	            PARAMETER nsa$S_local = 1
	            PARAMETER nsa$V_local = 21		 !   LOCAL modified
	            PARAMETER nsa$S_maxdetach = 1
	            PARAMETER nsa$V_maxdetach = 22		 !   MAXDETACH modified
	            PARAMETER nsa$S_maxjobs = 1
	            PARAMETER nsa$V_maxjobs = 23		 !   MAXJOBS modified
	            PARAMETER nsa$S_maxacctjobs = 1
	            PARAMETER nsa$V_maxacctjobs = 24	 !   MAXACCTJOBS modified
	            PARAMETER nsa$S_network = 1
	            PARAMETER nsa$V_network = 25		 !   NETWORK modified
	            PARAMETER nsa$S_owner = 1
	            PARAMETER nsa$V_owner = 26		 !   OWNER modified
	            PARAMETER nsa$S_password = 1
	            PARAMETER nsa$V_password = 27		 !   PASSWORD modified
	            PARAMETER nsa$S_pbytlm = 1
	            PARAMETER nsa$V_pbytlm = 28		 !   PBYTLM modified
	            PARAMETER nsa$S_pflags = 1
	            PARAMETER nsa$V_pflags = 29		 !   PFLAGS modified
	            PARAMETER nsa$S_p_restrict = 1
	            PARAMETER nsa$V_p_restrict = 30		 !   P_RESTRICT modified
	            PARAMETER nsa$S_pgflquota = 1
	            PARAMETER nsa$V_pgflquota = 31		 !   PGFLQUOTA modified
	            PARAMETER nsa$S_prclm = 1
	            PARAMETER nsa$V_prclm = 32		 !   PRCLM modified
	            PARAMETER nsa$S_primedays = 1
	            PARAMETER nsa$V_primedays = 33		 !   PRIMEDAYS modified
	            PARAMETER nsa$S_priority = 1
	            PARAMETER nsa$V_priority = 34		 !   PRIORITY modified
	            PARAMETER nsa$S_privileges = 1
	            PARAMETER nsa$V_privileges = 35		 !   PRIVILEGES modified
	            PARAMETER nsa$S_pwdlifetime = 1
	            PARAMETER nsa$V_pwdlifetime = 36	 !   PWDLIFETIME modified
	            PARAMETER nsa$S_pwdminimum = 1
	            PARAMETER nsa$V_pwdminimum = 37		 !   PWDMINIMUM modified
	            PARAMETER nsa$S_quepriority = 1
	            PARAMETER nsa$V_quepriority = 38	 !   QUEPRIORITY modified
	            PARAMETER nsa$S_remote = 1
	            PARAMETER nsa$V_remote = 39		 !   REMOTE modified
	            PARAMETER nsa$S_sflags = 1
	            PARAMETER nsa$V_sflags = 40		 !   SFLAGS modified
	            PARAMETER nsa$S_s_restrict = 1
	            PARAMETER nsa$V_s_restrict = 41		 !   S_RESTRICT modified
	            PARAMETER nsa$S_shrfillm = 1
	            PARAMETER nsa$V_shrfillm = 42		 !   SHRFILLM modified
	            PARAMETER nsa$S_tqelm = 1
	            PARAMETER nsa$V_tqelm = 43		 !   TQELM modified
	            PARAMETER nsa$S_uic = 1
	            PARAMETER nsa$V_uic = 44		 !   UIC modified
	            PARAMETER nsa$S_wsdefault = 1
	            PARAMETER nsa$V_wsdefault = 45		 !   WSDEFAULT modified
	            PARAMETER nsa$S_wsextent = 1
	            PARAMETER nsa$V_wsextent = 46		 !   WSEXTENT modified
	            PARAMETER nsa$S_wsquota = 1
	            PARAMETER nsa$V_wsquota = 47
	            BYTE %FILL (6)				 !   WSQUOTA modified
	        END MAP
	    END UNION
	END STRUCTURE	! sysuaff_bits
 ! +
 !  Record header offset definitions
 ! -
	PARAMETER NSA$M_REC_FLAGS_PKTCON = '00000001'X
	PARAMETER NSA$C_RECHDR_LENGTH = '0000004C'X
	PARAMETER NSA$K_RECHDR_LENGTH = '0000004C'X
	STRUCTURE /NSARECHDRDEF/
	    UNION
	        MAP
	        INTEGER*4 NSA$L_REC_ID			 !  Record identification longword
	        END MAP
	        MAP
	            INTEGER*2 NSA$W_REC_TYPE		 !  Record type
	            INTEGER*2 NSA$W_REC_SUBTYPE		 !  Record subtype
	        END MAP
	    END UNION
	    BYTE      NSA$B_REC_SEQNUM		 !  This records sequence number
	    BYTE      NSA$B_REC_SEQLAST		 !  Last records sequence number
	    UNION
	        MAP
	        BYTE      NSA$B_REC_FLAGS		 !  Record flags byte
	        END MAP
	        MAP
	            PARAMETER NSA$S_REC_FLAGS_PKTCON = 1
	            PARAMETER NSA$V_REC_FLAGS_PKTCON = 0	 !  Last packet in record is
 !  continued in next record
	        BYTE %FILL (1)
	        END MAP
	    END UNION
	    BYTE      NSA$B_REC_PKTNUM		 !  Number of data packets in record
	    INTEGER*2 NSA$W_REC_PKTOFF		 !  Offset to first packet
	    INTEGER*2 NSA$W_REC_PKTHDRSIZ		 !  Data packet header size
	    INTEGER*4 NSA$L_REC_EPID		 !  Extended PID
	    INTEGER*4 NSA$Q_REC_TIME(2)		 !  Event time (EXE$GQ_SYSTIME)
	    CHARACTER*16 NSA$T_REC_CLUSNAM		 !  Cluster node name
	    CHARACTER*16 NSA$T_REC_PROCNAM		 !  Process name
	    CHARACTER*12 NSA$T_REC_USERNAM		 !  username
	    CHARACTER*8 NSA$T_REC_ACCTNAM		 !  Account name
	END STRUCTURE	! NSARECHDRDEF
 ! +
 !  Data packet type definitions
 ! -
	PARAMETER NSA$K_PKTTYP_IMGNAM = '00000001'X  !  Image name packet
	PARAMETER NSA$K_PKTTYP_FACMOD = '00000002'X  !  File access mode
	PARAMETER NSA$K_PKTTYP_PRIVUSED = '00000003'X  !  Privilege used to access file
	PARAMETER NSA$K_PKTTYP_FILNAM = '00000004'X  !  File name
	PARAMETER NSA$K_PKTTYP_DEVNAM = '00000005'X  !  Device name
	PARAMETER NSA$K_PKTTYP_LOGNAM = '00000006'X  !  Logical name
	PARAMETER NSA$K_PKTTYP_VOLNAM = '00000007'X  !  Volume name
	PARAMETER NSA$K_PKTTYP_VOLSNAM = '00000008'X  !  Volume set name
	PARAMETER NSA$K_PKTTYP_NODENAM = '00000009'X  !  Node name
	PARAMETER NSA$K_PKTTYP_USERNAM = '0000000A'X  !  User name
	PARAMETER NSA$K_PKTTYP_PASSWORD = '0000000B'X  !  Password
	PARAMETER NSA$K_PKTTYP_UIC = '0000000C'X  !  User identification code
	PARAMETER NSA$K_PKTTYP_VOLPRO = '0000000D'X  !  Volume protection
	PARAMETER NSA$K_PKTTYP_MOUFLG = '0000000E'X  !  Mount flags
	PARAMETER NSA$K_PKTTYP_DMOUFLG = '0000000F'X  !  Dismount flags
	PARAMETER NSA$K_PKTTYP_NODEID = '00000010'X  !  Node ID
	PARAMETER NSA$K_PKTTYP_EPID = '00000011'X  !  Extended PID
	PARAMETER NSA$K_PKTTYP_SYSUAFF = '00000012'X  !  System UAF record fields
	PARAMETER NSA$K_PKTTYP_STATUS = '00000013'X  !  Status longword
	PARAMETER NSA$K_PKTTYP_SECNAM = '00000014'X  !  Global section name
	PARAMETER NSA$K_PKTTYP_PRIVS = '00000015'X  !  Full privilege mask
	PARAMETER NSA$K_PKTTYP_INSFLG = '00000016'X  !  Install flags
	PARAMETER NSA$K_PKTTYP_IDNAME = '00000017'X  !  Identifier name
	PARAMETER NSA$K_PKTTYP_IDVAL = '00000018'X  !  Identifier value
	PARAMETER NSA$K_PKTTYP_IDATTR = '00000019'X  !  Identifier attributes
	PARAMETER NSA$K_PKTTYP_HOLDER = '0000001A'X  !  Identifier holder
	PARAMETER NSA$K_PKTTYP_AUDIT = '0000001B'X  !  Audit item
	PARAMETER NSA$K_PKTTYP_DEFUSERNAM = '0000001C'X  !  Default proxy name
	PARAMETER NSA$K_PKTTYP_OLDUSERNAM = '0000001D'X  !  Old proxy name
	PARAMETER NSA$K_PKTTYP_OLDDEFUNAM = '0000001E'X  !  Old default local proxy name
	PARAMETER NSA$K_PKTTYP_OLDNODENAM = '0000001F'X  !  Old remote node name
	PARAMETER NSA$K_PKTTYPNUM = '0000001F'X
 ! +
 !  Data packet offset definitions
 ! -
	PARAMETER NSA$C_PKTHDR_LENGTH = '00000004'X
	PARAMETER NSA$K_PKTHDR_LENGTH = '00000004'X
	PARAMETER NSA$M_PKT_INS_OPEN = '00000002'X
	PARAMETER NSA$M_PKT_INS_HDR = '00000004'X
	PARAMETER NSA$M_PKT_INS_SHARE = '00000008'X
	PARAMETER NSA$M_PKT_INS_EXEC = '00000010'X
	PARAMETER NSA$M_PKT_INS_WRITE = '00000020'X
	PARAMETER NSA$M_PKT_INS_PRIV = '00000040'X
	PARAMETER NSA$M_PKT_INS_PROT = '00000080'X
	PARAMETER NSA$M_PKT_INS_NOPRG = '00000100'X
	PARAMETER NSA$M_PKT_INS_ACC = '00000200'X
	PARAMETER NSA$M_PKT_INS_RESIDENT = '00000400'X
	STRUCTURE /NSAPKTDEF/
	    INTEGER*2 NSA$W_PKT_TYPE		 !  Packet data type
	    INTEGER*2 NSA$W_PKT_SIZE		 !  Packet size
	    ! unsupported type CHARACTER*0 NSA$T_PKT_DATA
	    UNION
	        MAP
	        CHARACTER*444 NSA$T_PKT_IMGNAM		 !  Image name
	        END MAP
	        MAP
	        INTEGER*4 NSA$L_PKT_FACMOD		 !  File access mode
	        END MAP
	        MAP
	        INTEGER*4 NSA$L_PKT_PRIVUSED		 !  Privilege used to access file
	        END MAP
	        MAP
	        CHARACTER*444 NSA$T_PKT_FILNAM		 !  File name
	        END MAP
	        MAP
	        CHARACTER*64 NSA$T_PKT_DEVNAM		 !  Device and access port name
	        END MAP
	        MAP
	        CHARACTER*255 NSA$T_PKT_LOGNAM		 !  Logical name
	        END MAP
	        MAP
	        CHARACTER*12 NSA$T_PKT_VOLNAM		 !  Volume name
	        END MAP
	        MAP
	        CHARACTER*12 NSA$T_PKT_VOLSNAM		 !  Volume set name
	        END MAP
	        MAP
	        CHARACTER*6 NSA$T_PKT_NODENAM		 !  Node name
	        END MAP
	        MAP
	        CHARACTER*32 NSA$T_PKT_USERNAM		 !  User name
	        END MAP
	        MAP
	        CHARACTER*32 NSA$T_PKT_PASSWORD		 !  Password
	        END MAP
	        MAP
	        INTEGER*4 NSA$L_PKT_UIC			 !  Volume UIC
	        END MAP
	        MAP
	        INTEGER*2 NSA$W_PKT_VOLPRO		 !  Volume protection
	        END MAP
	        MAP
	        INTEGER*4 NSA$L_PKT_MOUFLG		 !  Mount flags
	        END MAP
	        MAP
	        INTEGER*2 NSA$W_PKT_DMOUFLG		 !  Dismount flags
	        END MAP
	        MAP
	        INTEGER*4 NSA$Q_PKT_NODEID(2)		 !  Node ID
	        END MAP
	        MAP
	        INTEGER*4 NSA$L_PKT_EPID		 !  Extended PID
	        END MAP
	        MAP
	        INTEGER*4 NSA$Q_PKT_SYSUAFF(2)		 !  System UAF record fields
	        END MAP
	        MAP
	        INTEGER*4 NSA$L_PKT_STATUS		 !  Status longword
	        END MAP
	        MAP
	        CHARACTER*54 NSA$T_PKT_SECNAM		 !  Global section name
	        END MAP
	        MAP
	        INTEGER*4 NSA$Q_PKT_PRIVS(2)		 !  Full privilege mask
	        END MAP
	        MAP
	        UNION
	            MAP
	            INTEGER*4 NSA$L_PKT_INSFLG		 !  Install flags
	            END MAP
	            MAP
	                PARAMETER NSA$S_PKT_INS_OPEN = 1
	                PARAMETER NSA$V_PKT_INS_OPEN = 1	 !  /OPEN
	                PARAMETER NSA$S_PKT_INS_HDR = 1
	                PARAMETER NSA$V_PKT_INS_HDR = 2		 !  /HEADER_RESIDENT
	                PARAMETER NSA$S_PKT_INS_SHARE = 1
	                PARAMETER NSA$V_PKT_INS_SHARE = 3	 !  /SHARE
	                PARAMETER NSA$S_PKT_INS_EXEC = 1
	                PARAMETER NSA$V_PKT_INS_EXEC = 4	 !  /EXECUTE
	                PARAMETER NSA$S_PKT_INS_WRITE = 1
	                PARAMETER NSA$V_PKT_INS_WRITE = 5	 !  /WRITE
	                PARAMETER NSA$S_PKT_INS_PRIV = 1
	                PARAMETER NSA$V_PKT_INS_PRIV = 6	 !  /PRIVILEGE
	                PARAMETER NSA$S_PKT_INS_PROT = 1
	                PARAMETER NSA$V_PKT_INS_PROT = 7	 !  /PROTECTED
	                PARAMETER NSA$S_PKT_INS_NOPRG = 1
	                PARAMETER NSA$V_PKT_INS_NOPRG = 8	 !  /NOPURGE
	                PARAMETER NSA$S_PKT_INS_ACC = 1
	                PARAMETER NSA$V_PKT_INS_ACC = 9		 !  /ACCOUNTING
	                PARAMETER NSA$S_PKT_INS_RESIDENT = 1
	                PARAMETER NSA$V_PKT_INS_RESIDENT = 10	 !  /RESIDENT
	            BYTE %FILL (2)
	            END MAP
	        END UNION
	        END MAP
	        MAP
	        CHARACTER*32 NSA$T_PKT_IDNAME		 !  Identifier name
	        END MAP
	        MAP
	        INTEGER*4 NSA$L_PKT_IDVAL		 !  Identifier value
	        END MAP
	        MAP
	        INTEGER*4 NSA$L_PKT_IDATTR		 !  Identifier attributes
	        END MAP
	        MAP
	        INTEGER*4 NSA$Q_PKT_HOLDER(2)		 !  Identifier holder
	        END MAP
	        MAP
	        ! unsupported type CHARACTER*0 NSA$R_PKT_AUDIT  !  Audit item (not used)
	        END MAP
	        MAP
	        CHARACTER*32 NSA$T_PKT_DEFUSERNAM	 !  Default proxy name
	        END MAP
	        MAP
	        CHARACTER*32 NSA$T_PKT_OLDUSERNAM	 !  Old proxy name
	        END MAP
	        MAP
	        CHARACTER*32 NSA$T_PKT_OLDDEFUNAM	 !  Old default local proxy name
	        END MAP
	        MAP
	        CHARACTER*6 NSA$T_PKT_OLDNODENAM	 !  Old remote node name
	        END MAP
	    END UNION
	END STRUCTURE	! NSAPKTDEF
!DEC$ END OPTIONS