crg_squeeze_info (ul_crg)


	status.i4.v = crg_squeeze_info(file_number.i4.r, 
                                      slot_number.i4.r,
				       lbseq.i4.r,
                                      lattice.i4.r,
                                      time.r4r,
                                      num_slots.i4.r
                                      input_key.i4.v)


	file_number	CRG file number to read  (If file_number
			is zero, this routine will automatically
			search for the active file.)
       slot_number     passed/returned slot number (starts from 1)
	lbseq    	passed/returned LBSEQ value
       lattice         returned lattice number
       time            passed/returned time from $C5
       num_slots       returned number of slots in squeeze
       input_key       specifies which parameter used as input
                       SLOT_INPUT  = use the passed slot number as input
                       LBSEQ_INPUT = use the passed lbseq number as input
                       TIME_INPUT  = use the passed time as input

	This function returns ACNET status values as follows:

	DBM_OK			access
	DBM_xxx			error in reading database
	CBS_INVARG		file number out of range or null structure
				pointer passed

	This function requires the following include files:

	ul_crg_h:crg_h, acnet_errors_h

	Related functions:

	crg_tecar_c_to_ftn, cnv_time_energy, crg_param_read, crg_read_tuner,
	crg_read_b2min_slope, crg_active_file, crg_tecar_ramp