C******************************************************************************
C BK.INC
C
C	  Include file for Accounting package.
C
C	Written by : M. Serrer  DME/NRC  Systems Lab.
C	Date       : March 1984
C
C******************************************************************************
C
	CHARACTER*128 BK$RECORD
	CHARACTER BK$USR_NAM*12,BK$USR_ACC*8,BK$LST_LOG*11
C
	LOGICAL*1 BK$AKREC_TYP0
	INTEGER*2 BK$USR_GRP,BK$USR_MEM
C
	REAL*4    BK$CHARGE
C
	INTEGER*4 BK$DSK_BLK,BK$VOL_MNT
     &	         ,BK$PRT_JOB,BK$PRT_PAG
     &	         ,BK$LOG_CNT,BK$LOG_FAL
     &	         ,BK$P_CON_TIM,BK$P_INT_TIM,BK$P_BAT_TIM
     &	         ,BK$N_CON_TIM,BK$N_INT_TIM,BK$N_BAT_TIM
     &	         ,BK$DIR_IO,BK$BUF_IO
     &	         ,BK$PAG_FLT
C------------------------------------------------------------------------------
	COMMON/BRECORD/BK$AKREC_TYP0
     &	              ,BK$USR_NAM,BK$USR_GRP,BK$USR_MEM,BK$USR_ACC
     &	              ,BK$DSK_BLK,BK$VOL_MNT
     &	              ,BK$PRT_JOB,BK$PRT_PAG
     &	              ,BK$LOG_CNT,BK$LOG_FAL
     &	              ,BK$P_CON_TIM,BK$P_INT_TIM,BK$P_BAT_TIM
     &	              ,BK$N_CON_TIM,BK$N_INT_TIM,BK$N_BAT_TIM
     &	              ,BK$DIR_IO,BK$BUF_IO
     &	              ,BK$PAG_FLT,BK$CHARGE,BK$LST_LOG
	EQUIVALENCE (BK$AKREC_TYP0,BK$RECORD)
C------------------------------------------------------------------------------