crg_active_file (ul_crg)

	status.i4.v = crg_active_file(file_number.i4.r)

	This routine gets the Collider Ramp Generator (CRG) active file number.

	file_number	returned CRG active file number

	This function returns ACNET status values as follows:

	DBM_OK			success
	DBM_xxx			error in reading database
	CBS_INVARG		null pointer passed

	This function requires the following include files:

	ul_crg_h:crg_h, acnet_errors_h

	Related functions:

	cnv_time_energy, crg_param_read, crg_tecar_read, crg_read_tuner,
	crg_read_b2min_slope, crg_tecar_c_to_ftn