#include <applicat.h>
#include <reprint.h>

#include "ca1.h"
#include "ca1700a.h"
#include "calib01.h"
#include "calib02.h"


class TPrint_fasi : public TSkeleton_application
{
	bool create();

public:
  virtual void main_loop();
};

bool TPrint_fasi::create()
{
  const TMultilevel_code_info& mci = ca_multilevel_code_info(LF_FASI);
  if (mci.levels() <= 0)
    return error_box(TR("Le fasi non sono state configurate"));

  return TSkeleton_application::create();
}

void TPrint_fasi::main_loop()
{
  TFilename path;
  TMask m("ca1700a");;
  while (m.run() == K_ENTER)
  {
    TReport_book book;
    TAnal_report rep;

		path = m.get(F_REPORT);
		if (path.empty())
			path = "ca1700";

		path.ext("rep");
		path.custom_path();
    if (rep.load(path))
		{
	    TRecordset * r = rep.recordset();

      if (r != NULL)
			{
				TVariant var;

				var = m.get(F_DAFASE);
				r->set_var("#DAFASE", var);
				var = m.get(F_AFASE);
				r->set_var("#AFASE", var);
			}
		}
		book.add(rep);
    book.print_or_preview();
  }
}

int ca1700(int argc, char* argv[])
{
  TPrint_fasi a;
  a.run(argc, argv, TR("Stampa fasi"));
  return 0;
}