Stampa tabelle di magazzino
git-svn-id: svn://10.65.10.50/trunk@4465 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
4cb017d7da
commit
209f44601c
51
mg/mg0200.cpp
Executable file
51
mg/mg0200.cpp
Executable file
@ -0,0 +1,51 @@
|
|||||||
|
#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;
|
||||||
|
}
|
Loading…
x
Reference in New Issue
Block a user