campo-sirio/ps/ps0872100.cpp
guy 195b6a3fb2 Personalizzazione Realplast
git-svn-id: svn://10.65.10.50/branches/R_10_00@22926 c028cbd2-c16b-5b4b-a496-9718f37d4682
2014-03-07 14:41:03 +00:00

69 lines
1.3 KiB
C++
Executable File

#include <applicat.h>
#include <automask.h>
#include <reprint.h>
#include "ps0872.h"
#include "ps0872100a.h"
class TMaskPs08721 : public TAutomask
{
protected:
virtual bool on_field_event(TOperable_field& o, TField_event e, long jolly);
public:
TMaskPs08721() : TAutomask("ps0872100a") { }
};
bool TMaskPs08721::on_field_event(TOperable_field& o, TField_event e, long jolly)
{
return true;
}
class TStampaStampaListinoPs0872 : public TSkeleton_application
{
protected:
virtual bool check_autorization() const { return false; }
virtual const char * extra_modules() const { return "ve"; }
virtual void main_loop();
public:
};
void TStampaStampaListinoPs0872::main_loop()
{
TMaskPs08721 m;
while (m.run() == K_ENTER)
{
TReport_book book;
TReport rep;
TFilename report_name(m.get(F_REPORT));
report_name.ext("rep");
report_name.custom_path();
if (rep.load(report_name))
{
TRecordset * r = rep.recordset();
if (r != NULL)
{
TVariant var;
var = m.get(F_DAART);
r->set_var("#DA", var);
var = m.get(F_AART);
r->set_var("#A", var);
}
book.add(rep);
if (book.pages() > 0)
book.print_or_preview();
}
}
}
int ps0872100(int argc, char* argv[])
{
TStampaStampaListinoPs0872 a;
a.run(argc, argv, TR("Stampa Listini RealPlast"));
return 0;
}