;+
;
; NAME: 
;       DISCLA_STR
;
; PURPOSE:
;
;
; CATEGORY:
;       BATSE
;
; CALLING SEQUENCE:
;
;
; CALLS:
;	none
;
; INPUTS:
;       none explicit, only through commons;
;
; OPTIONAL INPUTS:
;	none
;
; OUTPUTS:
;       none explicit, only through commons;
;
; OPTIONAL OUTPUTS:
;	none
;
; KEYWORDS:
;	none
; COMMON BLOCKS:
;	none
;
; SIDE EFFECTS:
;	none
;
; RESTRICTIONS:
;	none
;
; PROCEDURE:
;	none
;
; MODIFICATION HISTORY:
;
;-
; Structure for data records in BATSE DISCLA data file (both FDB and BDB).
; The header record is defined in  FDR_SDAC_STR.PRO (Header in DISCLA files
; is extended with spare bytes to 360 bytes to match data records so direct 
; access reads can be done.)

; Added eng_telem 3/15/93
; Changed 8/31/93 by AKT.  File was called bat_struct, structure was
;   called MRGBDB, structure was named DD_BDB_DATA_DR.

;-

;  ----------------------------------------------------------------------------

DISCLA_STR = {DD_DISCLA,$           ;360 bytes

          SCTIME:INTARR(3),$       ;spacecraft time (GRO time format)
          COUNTER:0L,$             ;packet counter
          DISC:INTARR(6,8,2),$     ;large area discriminator data
          X_POS:0,$                ;X coordinate  (GRO position in 
          Y_POS:0,$                ;Y coordinate  Earth-centered inertial
          Z_POS:0,$                ;Z coordinate  coordinates in 
                                   ;              1/4 km units)
          GEO_AZ:0,$               ;azimuth of geocenter position in
                                   ;units of .0001 RAD
          GEO_EL:0,$               ;elevation of geocenter position
                                   ;in units of .0001 RAD
          Z_RA:0,$                 ;+Z right ascension  (GRO pointing 
          Z_DEC:0,$                ;+Z declination      direction astronomical 
          X_RA:0,$                 ;+X right ascension  coordinates in units
          X_DEC:0,$                ;+X declination      of .0001 RAD)
          HKGSEQ:0,$               ;housekeeping sequence number
          HKGMOD:INTARR(8),$       ;module housekeeping data
          HKGMSC1:0,$              ;miscellaneous housekeeping word 1
          HKGMSC2:0,$              ;miscellaneous housekeeping word 2
          HKGMTB:0,$               ;module parameter table
          DEADTM:0,$               ;program deadtime
          NLDI:0,$                 ;number of LDI interrupts
          STAT:INTARR(3),$         ;status words
          ERRF:0,$                 ;error flags
          ERRDAT:INTARR(2),$       ;error data
          NSPEC:0,$                ;number of SHERB spectra stored
          OUTADD:0,$               ;output word address
          COMXQT:0B,$              ;commands executed
          COMREC:0B,$              ;commands received
          LRCVD:0,$                ;last command received
          LXQT:0,$                 ;last command executed
          CMECHO:0,$               ;command echo
          EXFLAG:INTARR(8),$       ;flags for detectors above threshold
          COINC:0,$                ;coincident threshold exceedances
          CHECK:INTARR(8),$        ;checksums
          ENG_TELEM:0,$            ;0 = science telemetry record
                                   ;-1 = engineering telemetry record
                                   ; (during "gap") NOTE:  for ENG_TELEM
                                   ; = -1, DISC(1:3,0:7,2) has meaningful
                                   ; data, the remaining portions of DISC
                                   ; should contain "0"
          SPARE:INTARR(26)}        ;spare fields