!*** MODULE $ACCDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
	PARAMETER ACC$K_TERMLEN = '00000054'X	 !  TERMINATION MESSAGE LENGTH 
	PARAMETER ACC$C_TERMLEN = '00000054'X	 !  TERMINATION MESSAGE LENGTH 
 !  AND ACCOUNTING RECORD FOR NON BATCH JOBS
	PARAMETER ACC$K_JOB_LEN = '0000006C'X	 !  LENGTH OF BATCH JOB ACCOUNTING RECORD 
	PARAMETER ACC$C_JOB_LEN = '0000006C'X	 !  LENGTH OF BATCH JOB ACCOUNTING RECORD 
	STRUCTURE /ACCDEF/
	    INTEGER*2 ACC$W_MSGTYP			 !  MESSAGE TYPE CODE 
	    INTEGER*2 ACC$W_MSGSIZ			 !  LENGTH OF DATA MESSAGE (VALID ONLY IN ACCLOG) 
	    INTEGER*4 ACC$L_FINALSTS		 !  FINAL EXIT STATUS 
	    INTEGER*4 ACC$L_PID			 !  PROCESS ID 
	    INTEGER*4 ACC$L_JOBID			 !  JOB IDENTIFICATION (VALID ONLY IN ACCLOG) 
	    INTEGER*4 ACC$Q_TERMTIME(2)		 !  TERMINATION TIME (100NS UNITS) 
	    CHARACTER*8 ACC$T_ACCOUNT		 !  ACCOUNT NAME STRING (BLANK FILLED) 
	    CHARACTER*12 ACC$T_USERNAME		 !  USER NAME STRING (BLANK FILLED) 
	    INTEGER*4 ACC$L_CPUTIM			 !  CPUTIM IN 10MS UNITS 
	    INTEGER*4 ACC$L_PAGEFLTS		 !  TOTAL PAGE FAULTS 
	    INTEGER*4 ACC$L_PGFLPEAK		 !  PEAK PAGING FILE USAGE 
	    INTEGER*4 ACC$L_WSPEAK			 !  PEAK WORKING SET SIZE 
	    INTEGER*4 ACC$L_BIOCNT			 !  COUNT OF BUFFERED I/O OPERATIONS 
	    INTEGER*4 ACC$L_DIOCNT			 !  COUNT OF DIRECT I/O OPERATIONS 
	    INTEGER*4 ACC$L_VOLUMES			 !  COUNT OF VOLUMES MOUNTED 
	    INTEGER*4 ACC$Q_LOGIN(2)		 !  LOGIN TIME (100NS UNITS) 
	    INTEGER*4 ACC$L_OWNER			 !  PID OF SUBPROCESS OWNER 
 !  END OF TERMINATION MESSAGE
	    CHARACTER*8 ACC$T_JOB_NAME		 !  JOB NAME (BLANK FILLED) 
	    CHARACTER*16 ACC$T_JOB_QUE		 !  QUEUE NAME (.ASCIC) 
	END STRUCTURE	! ACCDEF
	PARAMETER ACC$K_PRT_LEN = '00000058'X	 !  LENGTH OF PRINT ACCOUNTING RECORD 
	PARAMETER ACC$C_PRT_LEN = '00000058'X	 !  LENGTH OF PRINT ACCOUNTING RECORD 
 ! 
	STRUCTURE /ACCDEF1/
	    BYTE      %FILL(1:48)
	    INTEGER*4 ACC$L_PAGCNT			 !  SYMBIONT PAGE COUNT 
	    INTEGER*4 ACC$L_QIOCNT			 !  SYMBIONT QIO COUNT 
	    INTEGER*4 ACC$L_GETCNT			 !  SYMBIONT GET COUNT 
	    INTEGER*4 ACC$Q_QUETIME(2)		 !  TIME JOB WAS QUEUED 
	    CHARACTER*8 ACC$T_PRT_NAME		 !  NAME OF PRINT JOB 
	    CHARACTER*12 ACC$T_PRT_QUE		 !  NAME OF PRINT QUEUE 
 !  DEFINE USER ACCOUNTING MESSAGE DATA AREA
 ! 
	END STRUCTURE	! ACCDEF1
	PARAMETER ACC$K_INS_LEN = '000000B0'X	 !  LENGTH OF INSERT MESSAGE 
	PARAMETER ACC$C_INS_LEN = '000000B0'X	 !  LENGTH OF INSERT MESSAGE 
 ! 
	PARAMETER ACC$K_PRCTRM = '00000001'X	 !  JOB TERMINATION 
	PARAMETER ACC$K_BATTRM = '00000002'X	 !  BATCH JOB TERMINATION 
	PARAMETER ACC$K_INTTRM = '00000003'X	 !  INTERACTIVE JOB TERMINATION 
	PARAMETER ACC$K_LOGTRM = '00000004'X	 !  LOGIN FAILURE PROCESS TERMINATION 
	PARAMETER ACC$K_IMGTRM = '00000005'X	 !  IMAGE TERMINATION 
	PARAMETER ACC$K_SUBTRM = '00000006'X	 !  SUBPROCESS TERMINATION 
	PARAMETER ACC$K_DETTRM = '00000007'X	 !  DETACHED PROCESS TERMINATION 
	PARAMETER ACC$K_NETTRM = '00000008'X	 !  NETWORK PROCESS TERMINATION 
 !  MISC ACCOUNTING RECORDS 
	PARAMETER ACC$K_PRTJOB = '00000010'X	 !  PRINT JOB ACCOUNTING 
	PARAMETER ACC$K_INSMSG = '00000011'X	 !  INSERTED MESSAGE 
 ! 
	PARAMETER ACC$K_INSMESG = '00000001'X	 !  INSERT MESSAGE INTO ACCOUNTING FILE 
	PARAMETER ACC$K_NEWFILE = '00000002'X	 !  CREATE A NEW ACCOUNT FILE 
	PARAMETER ACC$K_ENABACC = '00000003'X	 !  ENABLE ACCOUNTING 
	PARAMETER ACC$K_DISAACC = '00000004'X	 !  DISABLE ACCOUNTING 
	PARAMETER ACC$K_ENABSEL = '00000005'X	 !  ENABLE SELECTIVE ACCOUNTING 
	PARAMETER ACC$K_DISASEL = '00000006'X	 !  DISABLE SELECTIVE ACCOUNTING 
	STRUCTURE /ACCDEF2/
	    BYTE      %FILL(1:44)
	    CHARACTER*132 ACC$T_USER_DATA		 !  ALLOW UP TO 132 BYTES OF USER DATA 
 !  ASSIGN RECORD TYPE CODES FOR RECORDS IN THE ACCOUNT LOG FILE
 ! 
 !  PROCESS ACCOUNTING RECORDS 
 !  DEFINE ACCOUNTING MANAGER MESSAGE CODES
 ! 
 !  
	END STRUCTURE	! ACCDEF2
!DEC$ END OPTIONS