78 lines
1.6 KiB
C++
78 lines
1.6 KiB
C++
|
#include <applicat.h>
|
||
|
#include <mask.h>
|
||
|
#include <relation.h>
|
||
|
#include <tabutil.h>
|
||
|
#include <progind.h>
|
||
|
#include <recarray.h>
|
||
|
|
||
|
#include "at5.h"
|
||
|
#include "at5800a.h"
|
||
|
|
||
|
// nomi dei campi
|
||
|
#include "soggetti.h"
|
||
|
#include "convoc.h"
|
||
|
#include "rconvoc.h"
|
||
|
|
||
|
|
||
|
class TEliminazioneConv: public TSkeleton_application
|
||
|
{
|
||
|
TRelation* _rel;
|
||
|
TMask* _msk;
|
||
|
TLocalisamfile* _rconvoc;
|
||
|
TLocalisamfile* _soggetti;
|
||
|
TDate _dataini, _datafin;
|
||
|
|
||
|
protected:
|
||
|
virtual bool create(void);
|
||
|
virtual void main_loop();
|
||
|
virtual bool destroy(void) ;
|
||
|
|
||
|
public:
|
||
|
const TMask& msk() const { return *_msk; }
|
||
|
|
||
|
TEliminazioneConv() {}
|
||
|
virtual ~TEliminazioneConv() {}
|
||
|
};
|
||
|
|
||
|
// restituisce un riferimento all' applicazione
|
||
|
inline TEliminazioneConv& app() { return (TEliminazioneConv&) main_app();}
|
||
|
|
||
|
bool TEliminazioneConv::create()
|
||
|
{
|
||
|
_msk = new TMask("at5800a");
|
||
|
_rel = new TRelation(LF_RCONVOC);
|
||
|
_rel->add(LF_SOGGETTI, "CODICE==CODICE");
|
||
|
_rel->add(LF_CONVOC, "NUMERO==NUMERO");
|
||
|
return TSkeleton_application::create();
|
||
|
}
|
||
|
|
||
|
// distruzione dell'applicazione
|
||
|
bool TEliminazioneConv::destroy()
|
||
|
{
|
||
|
delete _rel;
|
||
|
delete _msk;
|
||
|
return TSkeleton_application::destroy();
|
||
|
}
|
||
|
|
||
|
// carica la maschera
|
||
|
void TEliminazioneConv::main_loop()
|
||
|
{
|
||
|
// Preimposta gli eventuali valori specificati sulla riga di comando
|
||
|
if (argc() >= 3)
|
||
|
_msk->set(F_DATAINI, argv(2));
|
||
|
KEY key = K_ENTER;
|
||
|
while (key != K_QUIT)
|
||
|
{
|
||
|
key = _msk->run();
|
||
|
//if (key == K_ENTER)
|
||
|
}
|
||
|
}
|
||
|
|
||
|
int at5800(int argc, char* argv[])
|
||
|
{
|
||
|
TEliminazioneConv a ;
|
||
|
a.run(argc, argv, "Eliminazione convocazioni");
|
||
|
return 0;
|
||
|
}
|
||
|
|