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

#include "cglib05.h"
#include "cg4b00a.h"

///////////////////////////////////////////////////////////
// TRiepilogoIVA_mask
///////////////////////////////////////////////////////////

class TRiepilogoIVA_mask : public TAutomask
{
protected:
	virtual bool on_field_event(TOperable_field& o, TField_event e, long jolly);

public:
	TRiepilogoIVA_mask() : TAutomask("cg4b00a") { }
};

bool TRiepilogoIVA_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
{
	TRiepilogoIVA_mask & m = (TRiepilogoIVA_mask &)o.mask();

	switch (o.dlg())
	{
	case F_DAMESE:
		if (e == fe_modify || e == fe_close)
		{
			if (atoi(o.get()) > m.get_int(F_AMESE))
				m.set(F_AMESE, o.get());
			if (e == fe_modify && (atoi(o.get()) == 13))
			{
				TDate d(1, 1, m.get_int(F_ANNO));

				m.set(F_DADATA, d);
				d.set_month(12);
				d.set_end_month();
				m.set(F_ADATA, d);
			}
		}
		break;
	case F_AMESE:
		if (e == fe_modify || e == fe_close)
		{
			if (atoi(o.get()) < m.get_int(F_DAMESE))
				o.set(m.get(F_DAMESE));
		}
		break;
	case F_DADATA:
		if (e == fe_modify || e == fe_close)
		{
			if (TDate(o.get()) > m.get_date(F_ADATA))
				m.set(F_ADATA, o.get());
		}
		break;
	case F_ADATA:
		if (e == fe_modify || e == fe_close)
		{
			if (TDate(o.get()) < m.get_date(F_DADATA))
				o.set(m.get(F_DADATA));
		}
	default:
		break;
	}
	return true;
}

///////////////////////////////////////////////////////////
// TRiepilogoIVAcompetenza_recordset
///////////////////////////////////////////////////////////

class TRiepilogoIVAcompetenza_recordset : public TRiepilogoIVA_recordset
{

public:
	virtual bool is_competenza() const { return true; }

	TRiepilogoIVAcompetenza_recordset() {}
	virtual ~TRiepilogoIVAcompetenza_recordset() { }
};

///////////////////////////////////////////////////////////
// TRiepilogoIVA_app
///////////////////////////////////////////////////////////

class TRiepilogoIVA_app : public TSkeleton_application
{
protected:
	virtual void main_loop();
};

void TRiepilogoIVA_app::main_loop()
{
	TRiepilogoIVA_mask m;

	while (m.run() != K_QUIT)
	{
		TRiepilogoIVA_report rep;
		TFilename repname = m.get(F_REPORT);
		TRiepilogoIVAcompetenza_recordset *recset = new TRiepilogoIVAcompetenza_recordset;

		if (repname.blank())
			repname = "cg4b00a";
		rep.load(repname);
		if (recset != NULL)
		{
			int anno = m.get_int(F_ANNO);
			int damese = m.get_int(F_DAMESE);
			int amese = m.get_int(F_AMESE);

			recset->freeze();
			recset->set_da_mese_var(damese);
			recset->set_a_mese_var(amese);
			if (damese == 13)
			{
				damese = 1;
				amese = 12;
				recset->set_annual(true);
			}
			recset->set_anno(anno);
			recset->set_da_mese(damese);
			recset->set_a_mese(amese);
			recset->set_from(m.get_date(F_DADATA));
			recset->set_to(m.get_date(F_ADATA));
			recset->unfreeze();
			rep.set_recordset(recset);
			rep.print_or_preview();
	 }
	}
}

int cg4b00(int argc, char* argv[])
{     
  TRiepilogoIVA_app app;
  app.run(argc, argv, TR("Stampa progressivi IVA per competenza"));
  return 0;
}