209f44601c
git-svn-id: svn://10.65.10.50/trunk@4465 c028cbd2-c16b-5b4b-a496-9718f37d4682
52 lines
905 B
C++
Executable File
52 lines
905 B
C++
Executable File
#include <applicat.h>
|
|
#include <config.h>
|
|
#include <form.h>
|
|
#include <mask.h>
|
|
#include <printer.h>
|
|
#include <relation.h>
|
|
#include <tabutil.h>
|
|
#include <urldefid.h>
|
|
#include <utility.h>
|
|
|
|
class TStampa_tabmag : public TApplication
|
|
{
|
|
TMask * _mask;
|
|
TForm * _form;
|
|
|
|
protected:
|
|
virtual bool create();
|
|
virtual bool destroy();
|
|
};
|
|
|
|
bool TStampa_tabmag::create()
|
|
{
|
|
|
|
_mask = new TMask("bastgca");
|
|
while (TRUE) {
|
|
if (_mask->run() != K_ENTER)
|
|
return FALSE;
|
|
|
|
/* _mask->get(F_INIZIO1);
|
|
_mask->get(F_INIZIO2);
|
|
_mask->get(F_FINE1);
|
|
_mask->get(F_FINE2);*/
|
|
|
|
_form = new TForm("tab_gca");
|
|
_form->print();
|
|
delete _form;
|
|
} // while true
|
|
return TRUE;
|
|
}
|
|
bool TStampa_tabmag::destroy()
|
|
{
|
|
delete _mask;
|
|
return TRUE;
|
|
}
|
|
|
|
int mg0200(int argc, char* argv[])
|
|
{
|
|
TStampa_tabmag a;// derivata da Application e con uso di form
|
|
a.run(argc,argv,"Stampa tabelle di magazzino");
|
|
return 0;
|
|
}
|