1 cdaq  1.1 ******************* begin: gen_filenames.cmn ***********************
  2           *

  3 cdaq  1.2 *-Common block with filenames
  4           *     $Log: gen_filenames.cmn,v $

  5 jones 1.13 *     Revision 1.12  1996/11/19 18:13:44  saw
  6            *     (SAW) Add some filenames and variables for LUN's
  7            *

  8 saw   1.12 *     Revision 1.11  1996/09/04 15:48:00  saw
  9            *     (JRA) Add flags for writting out preproccesd (filtered) events
 10            *

 11 saw   1.11 *     Revision 1.10  1996/04/30 13:37:06  saw
 12            *     (JRA) Add filename for pedestal output
 13            *

 14 saw   1.10 *     Revision 1.9  1996/01/17 15:41:50  cdaq
 15            *     (JRA) Add filename/ctp names for tcl statistics screen
 16            *

 17 cdaq  1.9  *     Revision 1.8  1995/09/01 13:01:16  cdaq
 18            *     (JRA) Add a file for run number based CTP parameter (kinematics) settings
 19            *

 20 cdaq  1.8  * Revision 1.7  1995/07/28  14:25:59  cdaq
 21            * (SAW) Add g_ctp_database_filename
 22            *

 23 cdaq  1.7  * Revision 1.6  1994/10/19  19:52:22  cdaq
 24            * (SAW) Add g_label variable for labels on reports
 25            *

 26 cdaq  1.6  * Revision 1.5  1994/08/03  20:06:50  cdaq
 27            * (SAW) Add "CTPTYPE=parm" directive for auto generation of CTP reg calls
 28            *

 29 cdaq  1.5  * Revision 1.4  1994/06/21  15:05:11  cdaq
 30            * (SAW) Add g_report_rebook flag
 31            *

 32 cdaq  1.4  * Revision 1.3  1994/06/15  18:12:17  cdaq
 33            * (SAW) Add variables for report generator
 34            *

 35 cdaq  1.3  * Revision 1.2  1994/03/24  16:49:57  cdaq
 36            * (SAW) Make logical's logical*4 so they can be registered to CTP
 37            *

 38 cdaq  1.2  * Revision 1.1  1994/02/07  19:38:11  cdaq
 39            * Initial revision

 40 cdaq  1.1  *

 41 cdaq  1.5  *     CTPTYPE=parm

 42 cdaq  1.1  *
 43                  integer G_LUN_CONFIG
 44                  parameter (G_LUN_CONFIG= 55)
 45            *
 46                  integer G_LUN_TEMP
 47                  parameter (G_LUN_TEMP= G_LUN_CONFIG+1)
 48            *

 49 saw   1.12       integer G_LUN_CHARGE_SCALER
 50                  parameter (G_LUN_CHARGE_SCALER=G_LUN_TEMP+1)
 51            *
 52                  integer G_LUN_EPICS_OUTPUT
 53                  parameter (G_LUN_EPICS_OUTPUT=G_LUN_CHARGE_SCALER+1)
 54            *

 55 jones 1.13 

 56 cdaq  1.1        character*80 g_config_filename
 57                  character*80 g_ctp_hist_filename
 58                  character*80 g_ctp_test_filename
 59                  character*80 g_ctp_parm_filename

 60 jones 1.13       character*120 g_data_source_filename	! Coda/other input file

 61 cdaq  1.1        character*80 g_alias_filename		! PAW histogram name aliases
 62                  character*80 g_histout_filename		! File to write histograms to

 63 cdaq  1.3        character*80 g_decode_map_filename ! File containing unpack map
 64                  character*80 g_report_template_filename
 65                  character*80 g_report_output_filename
 66                  character*80 g_report_blockname

 67 cdaq  1.6        character*80 g_label              ! A string that can label reports, etc

 68 cdaq  1.7        character*80 g_ctp_database_filename ! Run number dependent variables

 69 cdaq  1.8        character*80 g_ctp_kinematics_filename ! Run number dependent variables

 70 cdaq  1.9        character*80 g_stats_template_filename   !online statistics report
 71                  character*80 g_stats_output_filename
 72                  character*80 g_stats_blockname

 73 saw   1.10       character*80 g_pedestal_output_filename

 74 saw   1.11       character*80 g_bad_output_filename
 75                  character*80 g_preproc_filename
 76                  character*80 g_charge_scaler_filename

 77 saw   1.12       character*80 g_epics_output_filename

 78 cdaq  1.1  *
 79                  common /gen_filenames/
 80                 $     g_config_filename,
 81                 $     g_ctp_hist_filename,
 82                 $     g_ctp_test_filename,
 83                 $     g_ctp_parm_filename,
 84                 $     g_data_source_filename,
 85                 $     g_alias_filename,
 86                 $     g_histout_filename,

 87 cdaq  1.3       $     g_decode_map_filename,
 88                 $     g_report_template_filename,
 89                 $     g_report_output_filename,

 90 cdaq  1.6       $     g_report_blockname,

 91 cdaq  1.7       $     g_label,

 92 cdaq  1.8       $     g_ctp_database_filename,

 93 cdaq  1.9       $     g_ctp_kinematics_filename,
 94                 $     g_stats_template_filename,
 95                 $     g_stats_output_filename,

 96 saw   1.10      $     g_stats_blockname,

 97 saw   1.11      $     g_pedestal_output_filename,
 98                 $     g_bad_output_filename,
 99                 $     g_preproc_filename,

100 saw   1.12      $     g_charge_scaler_filename,
101                 $     g_epics_output_filename

102 saw   1.11 

103 cdaq  1.1  *

104 cdaq  1.2        logical*4 g_hist_rebook
105                  logical*4 g_test_rebook
106                  logical*4 g_parm_rebook

107 cdaq  1.4        logical*4 g_report_rebook
108            *

109 cdaq  1.2        logical*4 g_config_loaded                 !Make sure this is false first time
110                  logical*4 g_data_source_opened            !whether FASTBUS CODA file opened OK
111                  integer g_data_source_in_hndl             !IO channel assigned by CODA library
112                  integer g_max_events                      !quit after this number events

113 saw   1.11       logical*4 g_preproc_opened                !status of preprocessor output file opening
114                  integer*4 g_preproc_in_hndl               !IO channel assigned by CODA for above file
115                  integer*4 g_preproc_on                    !flag to turn on event preprocessing

116 cdaq  1.1  *
117                  common /gen_config_flags/

118 cdaq  1.4       $     g_hist_rebook, g_test_rebook, g_parm_rebook,
119                 $     g_report_rebook,

120 cdaq  1.1       $     g_config_loaded,
121                 $     g_data_source_opened, g_data_source_in_hndl,

122 saw   1.11      $     g_max_events,
123                 $     g_preproc_opened,
124                 $     g_preproc_in_hndl,
125                 $     g_preproc_on

126 jones 1.13 
127                  integer*4 g_segment
128            
129                  common /gen_segmented_runs/
130                 $     g_segment

131 saw   1.11 

132 cdaq  1.1  *
133            *     Local Variables:
134            *     mode: fortran
135            *     End:
136            *
137            ******************** end: gen_filenames.cmn ***********************

138 cdaq  1.2