#ident "@(#) $Id: ReadPidfRec.c 22019 2012-12-05 19:28:41Z carrie $  SwRI"

#include <stdio.h>
#include "pidf_local.h"

int 
ReadNewPidfRec (char *locater, SDDAS_INT DataType, PIDF what, 
                               SDDAS_INT sennum, SDDAS_INT unitnum)
{
    int ret_val = ALL_OKAY;

    switch (DataType) {
	case SENSOR : ret_val = Sensor (locater, what, sennum, unitnum); break;
        case SWEEP_STEP : ret_val = Sweep (locater, what, sennum, unitnum); break;
        case MODE : ret_val = Mode (locater, what, sennum, unitnum); break;
        case CAL_DATA : ret_val = Cal (locater, what, sennum, unitnum); break;
        case D_QUAL : ret_val = DataQual (locater, what, unitnum); break;
        case PITCH_ANGLE : ret_val = PitchAngle (locater, what, unitnum); break;
        case START_AZ_ANGLE : 
        case STOP_AZ_ANGLE : ret_val = SpinAngle (locater, what, unitnum); break;
        case SC_POTENTIAL : ret_val = SCPotential (locater, what, unitnum); break;
        case BACKGROUND : ret_val = Background (locater, what, unitnum); break;
        case MASS:
        case PHI:
        case THETA:
        case SCAN:
        case CHARGE:
        case AVG: ret_val = Avg (locater, what, DataType); break;
        case BIN: ret_val = Bin (locater, what, sennum); break;
        case IMAGE: ret_val = Image (locater, what, sennum); break;
        case PIDF_GROUP: ret_val = PidfGroup (locater, what, sennum); break;
        case PIDF_UNITS: ret_val = Unit (locater, what, unitnum); break;
        case MOMENTS: ret_val = Moments (locater, what, unitnum); break;
        case COORD_SYSTEM: ret_val = CoordinateSystem (locater, what, unitnum); break;
        case TENSOR: ret_val = Tensor (locater, what, sennum, unitnum); break;
        default: ret_val = ALL_OKAY;
    }				/* end switch */
    return ret_val;
}				/* end readpidf */