Patch level :
Files correlati : Ricompilazione Demo : [ ] Commento : git-svn-id: svn://10.65.10.50/trunk@19862 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
10b8b17bf4
commit
af34cd91cf
30
at/agaat.men
30
at/agaat.men
@ -44,21 +44,21 @@ Caption = "Tabelle"
|
||||
Picture = <at04>
|
||||
Module = 17
|
||||
Flags = ""
|
||||
Item_01 = "Sezioni", "ba3 -3 batbsez 96", ""
|
||||
Item_02 = "Medici", "ba3 -3 batbmed 97", ""
|
||||
Item_03 = "Benemerenze", "ba3 -0 bnz", ""
|
||||
Item_04 = "Categorie donatori", "ba3 -0 ctd", ""
|
||||
Item_05 = "Categorie non donatori", "ba3 -0 ctn", ""
|
||||
Item_06 = "Gruppi aziendali", "ba3 -0 gaz", ""
|
||||
Item_07 = "Idoneita' alla donazione", "ba3 -0 ido", ""
|
||||
Item_08 = "Localita' postali", "ba3 -0 lcp", ""
|
||||
Item_09 = "Punti di prelievo", "ba3 -0 ldn", ""
|
||||
Item_10 = "Luoghi di lavoro", "ba3 -0 ldl", ""
|
||||
Item_11 = "Motivi per controlli sanitari", "ba3 -0 mtc", ""
|
||||
Item_12 = "Professioni", "ba3 -0 prf", ""
|
||||
Item_13 = "Tipi di donazione", "ba3 -0 tdn", ""
|
||||
Item_14 = "Tipi/Esiti controlli sanitari", "ba3 -0 tcs", ""
|
||||
Item_15 = "Singoli controlli sanitari", "ba3 -0 scs", ""
|
||||
Item_01 = "Sezioni", "ba3 -3 attbsez 96", ""
|
||||
Item_02 = "Medici", "ba3 -3 attbmed 97", ""
|
||||
Item_03 = "Benemerenze", "at0 -8 bnz", ""
|
||||
Item_04 = "Categorie donatori", "at0 -8 ctd", ""
|
||||
Item_05 = "Categorie non donatori", "at0 -8 ctn", ""
|
||||
Item_06 = "Gruppi aziendali", "at0 -8 gaz", ""
|
||||
Item_07 = "Idoneita' alla donazione", "at0 -8 ido", ""
|
||||
Item_08 = "Localita' postali", "at0 -8 lcp", ""
|
||||
Item_09 = "Punti di prelievo", "at0 -8 ldn", ""
|
||||
Item_10 = "Luoghi di lavoro", "at0 -8 ldl", ""
|
||||
Item_11 = "Motivi per controlli sanitari", "at0 -8 mtc", ""
|
||||
Item_12 = "Professioni", "at0 -8 prf", ""
|
||||
Item_13 = "Tipi di donazione", "at0 -8 tdn", ""
|
||||
Item_14 = "Tipi/Esiti controlli sanitari", "at0 -8 tcs", ""
|
||||
Item_15 = "Singoli controlli sanitari", "at0 -8 scs", ""
|
||||
|
||||
[MENU_002]
|
||||
Caption = "Convocazioni"
|
||||
|
2
at/at0.h
2
at/at0.h
@ -9,7 +9,7 @@ int at0500(int argc, char* argv[]); // parametri di sezione
|
||||
int at0600(int argc, char* argv[]); // chiusura periodica
|
||||
int at0700(int argc, char* argv[]); // sblocco sospesi
|
||||
int at0800(int argc, char* argv[]); // sblocco esclusi
|
||||
int at0900(int argc, char* argv[]); // cambio intervallo per Lesignano PR
|
||||
int at0900(int argc, char* argv[]); // gestore tabelle AVIS
|
||||
|
||||
#endif // __AT0_H
|
||||
|
||||
|
193
at/at0900.cpp
193
at/at0900.cpp
@ -1,159 +1,68 @@
|
||||
#include <mask.h>
|
||||
#include <printapp.h>
|
||||
#include <tabapp.h>
|
||||
|
||||
#include "at0.h"
|
||||
#include "atlib.h"
|
||||
|
||||
// nomi dei campi
|
||||
#include "soggetti.h"
|
||||
#include "contsan.h"
|
||||
#include "idoneita.h"
|
||||
|
||||
class TIntSI : public TPrintapp
|
||||
//////////////////////////////////////////////////////
|
||||
// Classe per la gestione delle Tabelle AVIS //
|
||||
//////////////////////////////////////////////////////
|
||||
class TAvis_table_app : public TTable_application
|
||||
{
|
||||
TMask* _msk;
|
||||
TRelation* _rel;
|
||||
int _cur;
|
||||
TLocalisamfile* _contsan;
|
||||
TRecord_array* _scontrolli;
|
||||
TLocalisamfile* _idoneita;
|
||||
TRecord_array* _sidoneita;
|
||||
protected:
|
||||
virtual bool user_create() ;
|
||||
virtual void init_query_insert_mode(TMask& m) ;
|
||||
virtual void init_insert_mode(TMask& m) ;
|
||||
virtual void init_modify_mode(TMask& m) ;
|
||||
virtual void init_query_mode (TMask&);
|
||||
|
||||
protected:
|
||||
virtual bool user_create();
|
||||
virtual bool user_destroy();
|
||||
virtual bool set_print(int m);
|
||||
virtual void set_page(int file, int cnt);
|
||||
virtual bool preprocess_page(int file, int counter);
|
||||
|
||||
public:
|
||||
TIntSI() {}
|
||||
// @cmember Disabilita la verifica del modulo : essendo una anagrafica, va sempre abilitata
|
||||
virtual bool check_autorization() const { return false; }
|
||||
|
||||
TAvis_table_app() { }
|
||||
virtual ~TAvis_table_app() { }
|
||||
};
|
||||
|
||||
HIDDEN inline TIntSI& app() { return (TIntSI&) main_app(); }
|
||||
HIDDEN inline TAvis_table_app& app() { return (TAvis_table_app&) main_app(); }
|
||||
|
||||
bool TIntSI::preprocess_page(int file, int counter)
|
||||
{
|
||||
TDate oggi(TODAY);
|
||||
bool rewrite = FALSE;
|
||||
TRectype& recsog = current_cursor()->curr();
|
||||
const int intsi = recsog.get_int(SOG_INTSI);
|
||||
if (intsi == 110 || intsi == 120 || intsi == 180 || intsi == 320 || intsi == 360)
|
||||
{
|
||||
if (intsi == 110 || intsi == 120)
|
||||
recsog.put(SOG_INTSI, 100);
|
||||
if (intsi == 180)
|
||||
recsog.put(SOG_INTSI, 160);
|
||||
if (intsi == 320 || intsi == 360)
|
||||
recsog.put(SOG_INTSI, 330);
|
||||
const long codice = recsog.get_long(SOG_CODICE);
|
||||
TRectype* keyc = new TRectype(LF_CONTSAN);
|
||||
keyc->put(CON_CODICE, codice);
|
||||
int err = _scontrolli->read(keyc);
|
||||
TRectype* keyi = new TRectype(LF_IDONEITA);
|
||||
keyi->put(IDO_CODICE, codice);
|
||||
int erri = _sidoneita->read(keyi);
|
||||
if ((err == NOERR || erri == NOERR) && (_scontrolli->rows() > 0 || _sidoneita->rows() > 0))
|
||||
{
|
||||
for (int c=1; c<=_scontrolli->rows(); c++)
|
||||
{
|
||||
TRectype& riga = _scontrolli->row(c, TRUE);
|
||||
int intsi = riga.get_int(CON_INTSI);
|
||||
if (intsi == 110 || intsi == 120)
|
||||
riga.put(CON_INTSI, 100);
|
||||
if (intsi == 180)
|
||||
riga.put(CON_INTSI, 160);
|
||||
if (intsi == 320)
|
||||
riga.put(CON_INTSI, 330);
|
||||
if (intsi == 360)
|
||||
riga.put(CON_INTSI, 330);
|
||||
}
|
||||
/*
|
||||
for (int r=1; r<=_sidoneita->rows(); r++)
|
||||
{
|
||||
TRectype& riga = _sidoneita->row(r, TRUE);
|
||||
const TString16 tipoido = riga.get(IDO_TIPOIDO);
|
||||
if (tipoido == "SI")
|
||||
{
|
||||
int intsi = riga.get_int(IDO_INTERVALLO);
|
||||
if (intsi == 110 || intsi == 120)
|
||||
riga.put(IDO_INTERVALLO, 100);
|
||||
}
|
||||
}
|
||||
*/
|
||||
_scontrolli->rewrite();
|
||||
//_sidoneita->rewrite();
|
||||
con_reord(recsog,_scontrolli, _sidoneita);
|
||||
rewrite = TRUE;
|
||||
}
|
||||
}
|
||||
if (rewrite)
|
||||
{
|
||||
recsog.put(SOG_UTENULTAGG, "PRASSI");
|
||||
recsog.put(SOG_DATAULTAGG, oggi);
|
||||
current_cursor()->file().rewrite();
|
||||
}
|
||||
return rewrite;
|
||||
}
|
||||
void TAvis_table_app::init_query_insert_mode(TMask& m)
|
||||
{
|
||||
if (get_tabname() == "")
|
||||
{
|
||||
}
|
||||
}
|
||||
|
||||
void TIntSI::set_page(int file, int cnt)
|
||||
{
|
||||
set_row(1,"@0g@pn", FLD(LF_SOGGETTI,SOG_CODICE,"########"));
|
||||
//set_row(1,"@10g@S", FLD(LF_SOGGETTI,SOG_COGNOME));
|
||||
//set_row(1,"@36g@S", FLD(LF_SOGGETTI,SOG_NOME));
|
||||
}
|
||||
|
||||
bool TIntSI::set_print(int)
|
||||
{
|
||||
KEY tasto;
|
||||
tasto = _msk->run();
|
||||
if (tasto == K_ENTER)
|
||||
{
|
||||
TRectype da(LF_SOGGETTI);
|
||||
TRectype a(LF_SOGGETTI);
|
||||
da.zero();
|
||||
a.zero();
|
||||
TString16 codsez = "10";
|
||||
da.put(SOG_CODSEZ, codsez);
|
||||
a.put(SOG_CODSEZ, codsez);
|
||||
current_cursor()->setregion(da,a);
|
||||
//current_cursor()->setfilter(format("SESSO == '1'"));
|
||||
reset_files();
|
||||
add_file(LF_SOGGETTI);
|
||||
reset_print();
|
||||
return TRUE;
|
||||
void TAvis_table_app::init_insert_mode(TMask& m)
|
||||
{
|
||||
if (get_tabname() == "")
|
||||
{
|
||||
}
|
||||
else
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
bool TIntSI::user_create()
|
||||
{
|
||||
_msk = new TMask("at0900a");
|
||||
_rel = new TRelation(LF_SOGGETTI);
|
||||
_contsan = new TLocalisamfile(LF_CONTSAN);
|
||||
_scontrolli = new TRecord_array(LF_CONTSAN,CON_PROGCON);
|
||||
_idoneita = new TLocalisamfile(LF_IDONEITA);
|
||||
_sidoneita = new TRecord_array(LF_IDONEITA,IDO_PROGIDO);
|
||||
_cur = add_cursor(new TCursor(_rel, "", 3));
|
||||
long items = _rel->lfile().items();
|
||||
return TRUE;
|
||||
}
|
||||
void TAvis_table_app::init_modify_mode(TMask& m)
|
||||
{
|
||||
if (get_tabname() == "")
|
||||
{
|
||||
}
|
||||
}
|
||||
|
||||
bool TIntSI::user_destroy()
|
||||
void TAvis_table_app::init_query_mode(TMask& m)
|
||||
{
|
||||
delete _sidoneita;
|
||||
delete _idoneita;
|
||||
delete _scontrolli;
|
||||
delete _contsan;
|
||||
delete _rel;
|
||||
delete _msk;
|
||||
return TRUE;
|
||||
TTable_application::init_query_mode(m);
|
||||
if (get_tabname() == "")
|
||||
{
|
||||
}
|
||||
}
|
||||
|
||||
bool TAvis_table_app::user_create()
|
||||
{
|
||||
TTable_application::user_create();
|
||||
const TString& name = get_tabname();
|
||||
if (name.empty())
|
||||
return error_box(TR("Specificare la tabella sulla linea di comando."));
|
||||
return true;
|
||||
}
|
||||
|
||||
int at0900(int argc, char* argv[])
|
||||
{
|
||||
TIntSI a;
|
||||
a.run(argc, argv, "Cambio intervalli SI per Lesignano");
|
||||
return 0;
|
||||
}
|
||||
TAvis_table_app a ;
|
||||
a.run(argc, argv, TR("Gestione tabelle AVIS"));
|
||||
return 0;
|
||||
}
|
||||
|
@ -1,15 +0,0 @@
|
||||
|
||||
PAGE "Cambio intervalli per Lesignano" -1 -1 78 20
|
||||
|
||||
TEXT -1
|
||||
BEGIN
|
||||
PROMPT 2 2 "Cambio intervalli per Lesignano"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
TOOLBAR "" 0 0 0 2
|
||||
#include <printbar.h>
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
Loading…
x
Reference in New Issue
Block a user