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

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

class TMask_print_cms : public TAutomask
{

protected:
  bool on_field_event(TOperable_field& o, TField_event e, long jolly) {return true;}
public:
  TMask_print_cms();
  virtual ~TMask_print_cms() {}
};

TMask_print_cms::TMask_print_cms()
								:TAutomask("ca1600a")
{
	ca_create_fields(*this, LF_COMMESSE, 3, 2, F_DACMS, F_DACMS + 100, 0x0, "#DACMS");
	int nfields = ca_create_fields(*this, LF_COMMESSE, 3, 8, F_ACMS, F_ACMS + 100, 0x0, "#ACMS");
	for (int i = 0; i < nfields; i++)
	{
		TMask_field& dacms = field(F_DACMS + i);
		dacms.set_group(1);
    dacms.check_type(CHECK_NORMAL);
		TMask_field& acms = field(F_ACMS + i);
		acms.set_group(2);
    acms.check_type(CHECK_NORMAL);
	}
}

class TPrint_cms : public TSkeleton_application
{
	bool create();

public:
	virtual void main_loop();
};

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

  return TSkeleton_application::create();
}

void TPrint_cms::main_loop()
{
  TFilename path;
  TMask_print_cms m;
  while (m.run() == K_ENTER)
  {
    TReport_book book;
    TAnal_report rep;

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

    rep.load(path);
		rep.mask2report(m);
		book.add(rep);
    book.print_or_preview();
  }
}

int ca1600(int argc, char* argv[])
{
  TPrint_cms a;
  a.run(argc, argv, TR("Stampa commesse"));
  return 0;
}