#include <string.h>
#include "OpSySInD.h"
#include <stdio.h>
#include "util_str.h"
#include "ret_codes.h"
#include "idf_defs.h"
#include "libbase_udf.h"
#include "local_defs.h"
#include "ret_codes.h"

#include "UDFCDF_Ansi.h"
#include "UDFCDF_Str.h"
#include "UDFCDF_Defs.h"

/*****************************************************************************/
/* ISTP required Global Attributes                                           */
/*****************************************************************************/

void CDFGAttUDF ()
{
    extern struct UserDefs InFo;
    extern struct CdfGenInfo CgI;

    struct SrcInfo *S;

    register ByTe_1 *c1;

    ByTe_4 I, Base;
    ByTe_2 R;
    ByTe_1 NQual;
    ByTe_1 FmT[360], InfoStr[90];


  /**************************************************************************/
  /*  Quality Flag Information                                              */
  /**************************************************************************/

    for (I = 0; I < 3; ++I)                         /* Input Format Loop    */
       fgets (&FmT[80 * I], 150, InFo.fi);          /* Input Format         */

    if (CgI.QualSrc >= 0)
    {
       S = (struct SrcInfo *)InFo.Src + CgI.QualSrc;
       R = read_idf (S->Key, "", S->Ver, &NQual, _NumQuaL, 0, 0, -1);
       ErrorRpt ("CDFGAttUDF", R, 0);
       for (I = 0; I < NQual; )
       {
          R = read_idf (S->Key, "", S->Ver, InfoStr, _QualNamE, 0, I++, 1);
          ErrorRpt ("CDFGAttUDF", R, 0);
          c1 = TrimString (InfoStr);
          Base = (NQual == 1) ? 0 : (I == NQual) ? 160 : 80;
          fprintf (InFo.fo, &FmT[Base], I, c1);
       }
    }
}