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

#include "velib07.h"

#include "ve1.h"
#include "ve1900a.h"
#include <defmask.h>
#include <toolfld.h>

class TMetodiPagamentoClienti_app : public TKlarkKent_app
{
protected:
	virtual void main_loop();
};

void TMetodiPagamentoClienti_app::main_loop()
{
	TMask m("ve1900a");
	TDocument_report report;
	KEY k;

	while ((k = m.run()) != K_QUIT) 
	{
		TReport_book book;
		TFilename report_name = m.get(DLG_REPORT);

		if (report_name.blank())
			report_name = "ve19001";
		report.load(report_name);

		TISAM_recordset * recset = (TISAM_recordset*)report.recordset();

		TString cod_pag = m.get(F_I_CONDPAG);
		report.set_var("#CODPAG", cod_pag);
		recset->set_var("#CODPAG", cod_pag);

		book.add(report);
		if (book.pages() > 0)
			if (k == K_VISUALIZE)
				book.preview();
			else
				book.print();
	}
}


int ve1900(int argc, char* argv[])
{
	TMetodiPagamentoClienti_app app;
	app.run(argc, argv, TR("Stampa Clienti con Metodo di Pagamento"));
	return 0;
}