root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : 10.0

Browse Source 
Files correlati     : lv2
Ricompilazione Demo : [ ]
Commento            :
Prima versione della generazione planning


git-svn-id: svn://10.65.10.50/trunk@17052 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2008-08-13 09:05:31 +00:00
parent 0f7a4cf816
commit 25a44b0595
8 changed files with 405 additions and 74 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lv/f164.trr
View File

@ -16,8 +16,5 @@ UTULAGG|1|16|0|Utente che ha fatto l'ultimo aggiornamento
DTULAGG|5|8|0|Data dell'ultimo aggiornamento
ORULAGG|10|6|Ora dell'ultimo aggiornamento
NOTE|11|10|0|Note
3
CODCF+CODCONT+CODITI+GGCONS|
GGCONS+CODITI+CODCF+CONCONT|
GGCONS+CODCF+CONDCON+CODITI|X
1
CODCF+CODCONT+GGCONS+CODITI|

2
lv/f165.trr
View File

@ -1,7 +1,7 @@
165
16
CODCF|3|6|0|Codice Cliente
CODCONT|6|8|0|Codice Contratto
CODCONT|3|6|0|Codice Contratto
CODPER|3|6|0|Codice periodo di sospensione
DATAINI|5|8|0|Data inizio periodo di sospensione
DATAFIN|5|8|0|Data fine periodo di sospensione

29
lv/f167.trr
View File

@ -1,20 +1,29 @@
167
16
CODPLAN|3|6|0|Codice planning
CODRIGA|2|5|0|Codice ria
MODPASS|1|1|0|Modalità di passaggio <C>onsegna <R>itiro <E>ntrambi
23
CODPLAN|3|8|0|Codice planning
CODRIGA|2|5|0|Codice riga
DTCONS|5|8|0|Data di consegna
CODCONT|3|6|0|Codice contratto
CODITI|2|3|0|Codice itinerario
ORDFER|2|2|0|Ordine di fermata
CODCF|3|6|0|Codice del cliente
CODCONT|3|6|0|Codice contratto
GGCONS|2|1|0|Giorno consegna
MODPASS|1|1|0|Modalità di passaggio <C>onsegna <R>itiro <E>ntrambi
CODAUT|1|2|0|Autista
CODMEZ|1|2|0|Mezzo
PROVV|1|1|0|<P>rovvisorio o <D>efinitivo
ANNO|2|4|0|Anno documento
CODNUM|1|4|0|Numerazione documento
NDOC|3|7|0|Numero documento
CODPLANOR|1|10|0|
ORDFER|2|2|0|Ordine di fermata
FREQ|1|2|0|Frequenaza di consegna
CONSSTD|8|1|0|Flag che indica se una consegna è standard <T> o speciale <F>
CODPERSOSP|2|2|0|Periodo di sospensione
CODPERSOSPVAR|2|2|0|Periodo di sospensionevariato
1
IDPLAN+IDRIGA|
PERSOSP|2|2|0|Periodo di sospensione
PERSOSPVAR|2|2|0|Periodo di sospensionevariato
UTULAGG|1|16|0|Utente che aggiornato per ultimo il planning
DTULAGG|5|8|0|Data ultimo aggionamento del planning
ORULAGG|10|6|0|Ora ultimo aggiornamento del planning
3
CODPLAN+CODRIGA|
DTCONS+CODITI+ORDFER+CODRIGA|
CODCF+CODITI+DTCONS|

3
lv/lv2.cpp
View File

@ -7,8 +7,7 @@ int main(int argc, char** argv)
const int r = (argc > 1) ? argv[1][1] - '0' : 0;
switch (r)
{
case 0: lv2100(argc, argv); break; //generazione automatica del planning
default: lv2100(argc, argv); break;
default: lv2100(argc, argv); break; //generazione automatica del planning
}
return 0;
}

372
lv/lv2100.cpp
View File

@ -1,10 +1,14 @@
#include <applicat.h>
#include <automask.h>
#include <relation.h>
#include <progind.h>
#include <recarray.h>
#include <recset.h>
#include "../lv/lvconsplan.h"
#include "../lv/lvrconsplan.h"
#include "../lv/lvpasplan.h"
#include "lvlib.h"
#include "lvcondv.h"
#include "lvrconsplan.h"
#include "lvpasplan.h"
#include "lv2.h"
#include "lv2100a.h"
@ -22,7 +26,25 @@ public:
bool TGenera_planning_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
{
return true;
switch (o.dlg())
{
case F_CODCF:
if (e == fe_close)
{
if (!field(F_CODCF).empty() && !field(F_CODITI).empty())
return error_box(TR("Non è possibile specificare sia itinerario che cliente"));
}
break;
case F_CODITI:
if (e == fe_close)
{
if (!field(F_CODCF).empty() && !field(F_CODITI).empty())
return error_box(TR("Non è possibile specificare sia itinerario che cliente"));
}
break;
default: break;
}
return true;
}
/*
/////////////////////////////////////////////////////////////
@ -49,13 +71,21 @@ TGenera_planning_recordset::TEsporta_ps0713_recordset()
class TGenera_planning_app : public TSkeleton_application
{
TGenera_planning_mask* _msk;
TGenera_planning_mask* _msk;
TAssoc_array _codriga;
protected:
virtual bool create();
virtual bool destroy();
bool elimina_planning(const TDate& dadata, const TDate& adata) const;
bool genera_codplan(long& key) const;
bool elimina_planning_itinerario(const TDate& dadata, const TDate& adata, const long& coditi) const;
bool elimina_planning_cliente(const TDate& dadata, const TDate& adata, const long& codcf) const;
bool kill_planning (TISAM_recordset& selrighe) const;
int prossimo_codriga(const TDate& data);
TDate cerca_ultima_consegna(long codcf, long coditi, const TDate& data) const;
int conta_consegne_mese(long codcf, long coditi, const TDate& adata) const;
void arrotonda_al_giorno(TDate& data, const int ggcons) const;
void elabora_passaggio(const TDate& dadata, const TDate& adata, const TISAM_recordset& pplan);
public:
bool transfer();
@ -75,68 +105,310 @@ bool TGenera_planning_app::destroy()
return TApplication::destroy();
}
//funzione che controlla se il planning per una certa data esiste già
/*bool TGenera_planning_app::elimina_planning(const TDate& dadata, const TDate& adata) const
//funzione estrae dalla tabella dei planning tutte le righe comprese tra le due date indicate
bool TGenera_planning_app::elimina_planning(const TDate& dadata, const TDate& adata) const
{
long codplan = 0;
//creo il recordset
TISAM_recordset selrighe("USE LVRCONSPLAN KEY 2\nFROM DTCONS=#DADATA\nTO DTCONS=#ADATA");
//setto le variabili
selrighe.set_var("#DADATA",dadata);
selrighe.set_var("#ADATA",adata);
TRelation tplan(LF_LVCONSPLAN); //instanzio una relazione sul file LF_LVCONSPLAN
TRelation rplan(LF_LVRCONSPLAN); //instanzio una relazione sul file LF_LVRCONSPLAN
//richiamo la funzione che effettivamente fa la cancellazione delle righe interessate
kill_planning(selrighe);
for (TDate tmp = dadata; tmp <= adata; ++tmp)
return true;
}
//funzione estrae dalla tabella dei planning tutte le righe comprese tra le due date indicate...
//...relative ad un itinerario specifico
bool TGenera_planning_app::elimina_planning_itinerario(const TDate& dadata, const TDate& adata, const long& coditi) const
{
//creo il recordset
TISAM_recordset selrighe("USE LVRCONSPLAN KEY 2\nSELECT (CODITI=#CODITI)\nFROM DTCONS=#DADATA\nTO DTCONS=#ADATA");
//setto le variabili
selrighe.set_var("#CODITI",coditi);
selrighe.set_var("#DADATA",dadata);
selrighe.set_var("#ADATA",adata);
//richiamo la funzione che effettivamente fa la cancellazione delle righe interessate
kill_planning(selrighe);
return true;
}
//funzione estrae dalla tabella dei planning tutte le righe comprese tra le due date indicate...
//...relative ad un cliente specifico
bool TGenera_planning_app::elimina_planning_cliente(const TDate& dadata, const TDate& adata, const long& codcf) const
{
//creo il recordset
TISAM_recordset selrighe("USE LVRCONSPLAN KEY 2\nSELECT (CODCF=#CODCF)\nFROM DTCONS=#DADATA\nTO DTCONS=#ADATA");
//setto le variabili
selrighe.set_var("#CODCF",codcf);
selrighe.set_var("#DADATA",dadata);
selrighe.set_var("#ADATA",adata);
//richiamo la funzione che effettivamente fa la cancellazione delle righe interessate
kill_planning(selrighe);
return true;
}
//funzione che elimina un recordset generato precedentemente
bool TGenera_planning_app::kill_planning (TISAM_recordset& selrighe) const
{
TSystemisamfile rplan(LF_LVRCONSPLAN); //instanzio una relazione sul file LF_LVRCONSPLAN
if (rplan.open(_excllock) == NOERR)
{
TRectype& rec = tplan.curr(); //cerco se esiste la testata del planning
rec.zero();
rec.put(LVCONSPLAN_DTCONS,data);
TRectype& rec = rplan.curr();
TCursor cur(&tplan,"",2,&rec,&rec);
const TRecnotype items = cur.items();
if (items > 0)
TProgind pi(selrighe.items(), TR("Eliminazione planning precedenti in corso..."), true, true);
for (bool ok = selrighe.move_last(); ok; ok = selrighe.move_prev())
{
if (!pi.addstatus(1))
break;
rec.zero();
rec.put(LVRCONSPLAN_CODPLAN,selrighe.get(LVRCONSPLAN_CODPLAN).as_int());
rec.put(LVRCONSPLAN_CODRIGA,selrighe.get(LVRCONSPLAN_CODRIGA).as_int());
rplan.remove();
}
rplan.close();
rplan.pack();
}
else
return error_box(TR("Impossibile eliminare i planning richiesti"));
return true;
}
//funzione che restituisce il prossimo codriga per il planning della data interessata
int TGenera_planning_app::prossimo_codriga(const TDate& data)
{
TString8 strcodplan;
strcodplan << data.date2ansi();
real* ptriga = (real*)_codriga.objptr(strcodplan);
if (ptriga == NULL)
{
//per ora memorizzo zero
ptriga = new real;
_codriga.add(strcodplan,ptriga);
//se esiste almeno una riga, memorizzo il codriga dell'ultima
TISAM_recordset rplan("USE LVRCONSPLAN KEY 1\nFROM CODPLAN=#CODPLAN\nTO CODPLAN=#CODPLAN");
rplan.set_var("#CODPLAN",TVariant(strcodplan));
if (rplan.move_last())
*ptriga = rplan.get(LVRCONSPLAN_CODRIGA).as_real();
}
*ptriga++; //incremento il codriga interessato
return ptriga->integer();
}
TDate TGenera_planning_app::cerca_ultima_consegna(long codcf, long coditi, const TDate& data) const
{
//instanzia un recordset di LVRCONSPLAN prendendo tutte le consegne fatte per un cliente su un certo...
//...itinerario prima di una certa data
TISAM_recordset rplan("USE LVRCONSPLAN KEY 3\nFROM CODCF=#CODCF CODITI=#CODITI\nTO CODCF=#CODCF CODITI=#CODITI DTCONS=#DATA");
rplan.set_var("#CODCF",codcf);
rplan.set_var("#CODITI",coditi);
rplan.set_var("#DATA",data);
if (rplan.move_last())
return rplan.get(LVRCONSPLAN_DTCONS).as_date(); // data dell'ultima consegna fatta
return data;
}
int TGenera_planning_app::conta_consegne_mese(long codcf, long coditi, const TDate& adata) const
{
TDate dadata = adata;
dadata.set_day(1);
//instanzia un recordset di LVRCONSPLAN prendendo tutte le consegne fatte per un cliente su un certo...
//...itinerario prima di una certa data
TISAM_recordset rplan("USE LVRCONSPLAN KEY 3\nFROM CODCF=#CODCF CODITI=#CODITI DTCONS=#DADATA\nTO CODCF=#CODCF CODITI=#CODITI DTCONS=#ADATA");
rplan.set_var("#CODCF",codcf);
rplan.set_var("#CODITI",coditi);
rplan.set_var("#DADATA",dadata);
rplan.set_var("#ADATA",adata);
return rplan.items();
}
// Arrotonda per eccesso la data al giorno della settimana desiderato
// ggcons appartiene a [1..7]
void TGenera_planning_app::arrotonda_al_giorno(TDate& data, const int ggcons) const
{
int delta = ggcons - data.wday();
if (delta != 0)
{
if (delta < 0)
delta += 7;
data += delta;
}
}
void TGenera_planning_app::elabora_passaggio(const TDate& dadata, const TDate& adata, const TISAM_recordset& pplan)
{
//dati recuperati dalla tabella dei passaggi per contratto:
const long codcf = pplan.get(LVPASPLAN_CODCF).as_int(); //codice cliente
const long coditi = pplan.get(LVPASPLAN_CODITI).as_int(); //codice itinerario
const long codcont = pplan.get(LVPASPLAN_CODCONT).as_int(); //codice contratto
const bool flstag = pplan.get(LVPASPLAN_FLSTAG).as_bool(); //flag stagionalità
const int ggcons = pplan.get(LVPASPLAN_GGCONS).as_int(); //giorno di consegna (1 = lunedì -> 7 = domenica)
const int ordfer = pplan.get(LVPASPLAN_ORDFERM).as_int(); //ordine di fermata
const TString4 freq = pplan.get(LVPASPLAN_FREQ).as_string(); //codice della tabella di frequenze di consegna
char modpass = pplan.get(LVPASPLAN_MODPASS).as_string()[0]; //modalità di passaggio
//cache sulle testate dei contratti, selezionati per CODCF e CODCONT
TToken_string keycont;
keycont.add(codcf);
keycont.add(codcont);
const TRectype& contratto = cache().get(LF_LVCONDV,keycont);
//dati recuperati dalle testate dei contratti:
const TDate dadatacont = contratto.get_date(LVCONDV_DATAIN); //data di inizio validità del contratto
const TDate adatacont = contratto.get_date(LVCONDV_DATASC); //data di fine validità del contratto
const TDate dastag = contratto.get_date(LVCONDV_DTSTAGIN); //data di inizio del periodo di stagionalità
const TDate astag = contratto.get_date(LVCONDV_DTSTAGSC); //data di fine del periodo di stagionalità
// Controllo se il contratto e' valido nel periodo interessato
if (dadatacont > adata || (adatacont.ok() && adatacont < dadata))
return; // Inutile proseguire
//cache sulla tabella frequenze consegne
TString8 keycoditi;
keycoditi << coditi;
const TRectype& iti = cache().get("&ITI",keycoditi);
//dati recuperati dalla tabella frequenze consegne:
const TString8 codaut = iti.get("S1"); //codice autista
const TString8 codmez = iti.get("S2"); //codice mezzo
//recordset sulla tabella dei periodi di sospensione, limitati per CODCF e CODCONT
TISAM_recordset persosp("USE LVPERISOSP\nFROM CODCF=#CODCF CODCONT=#CODCONT\nTO CODCF=#CODCF CODCONT=#CODCONT");
persosp.set_var("#CODCF",codcf);
persosp.set_var("#CODCONT",codcont);
//cache sulla tabella frequenze consegne
const TRectype& frq = cache().get("&FRQ",freq);
//dati recuperati dalla tabella frequenze consegne:
const int maxcons = frq.get_int("I2"); //numero massimo di consegne per mese
TDate primogiorno = dadata; //primogiorno: primo giorno del periodo selezionato
if (frq.get_bool("B0")) //se devo usare "USA ULTIMA CONSEGNA", primogiorno diventa la data dell'ultima consegna
primogiorno = cerca_ultima_consegna(codcf,coditi,dadata);
const int ritardo = frq.get_int("I0"); //ritardo di consegna rispetto alla data di inizio calcolo
if (ritardo > 0) //evita anticipi senza senso
primogiorno += ritardo;
long frequenza = frq.get_long("I1"); //frequenza di consegna
if (frequenza <= 0 || frequenza > 28) //forza una frequenza valida
frequenza = 7;
TLocalisamfile file_rplan(LF_LVRCONSPLAN);
TRectype& rplan = file_rplan.curr();
for (TDate d = primogiorno; d <= adata; d += frequenza)
{
arrotonda_al_giorno(d, ggcons);
if (d < dadata) // Puo' succedere se si utilizza la data di ultima consegna
continue;
if (d > adata) // Inutile generare date fuori range
break;
//controlla che d sia o meno in un periodo di validità contratto...
if (d < dadatacont)
continue; // Questa data non e' ancora in contratto: provo la prossima
if (adatacont.ok() && d > adatacont)
break; // Questa data e' oltre il contratto: inutile proseguire
//...e/o in un periodo di stagionalità (se necessario)...
////la riga va elaborata se il flag di stagionalità è TRUE
////e se se la data del periodo di stagionalità è coerente
////e la data in considerazione è compresa tra le date della stagionalità
if (flstag && (!astag.ok() || d < dastag || d > astag))
continue;
//...e/o in un periodo di sospensione...
//...per cui c'è da verificare se è da saltare completamente o...
//...se c'è da elaborare ugualmente, ma con una modalità di passaggio differente
TString4 codpersosp;
for (bool ok = persosp.move_first(); ok; ok = persosp.move_next())
{
cur.freeze();
codplan = rec.get_long(LVCONSPLAN_CODPLAN);
const TDate inisosp = persosp.get("DATAINI").as_date();
const TDate finsosp = persosp.get("DATAFIN").as_date();
if (d >= inisosp && d <= finsosp)
{
codpersosp = persosp.get("CODPER").as_string();
const TString& tpsosp = persosp.get("TPSOSP").as_string();
const TRectype& sosp = cache().get("&TSP",tpsosp);
modpass = sosp.get_char("S1");
break;
}
}
return found; //restituisco il codice del planning se esite già, altrimento rstituisco zero
}*/
//se la modalità di passaggio risulta vuota la riga non va elaborata
if (modpass <= ' ')
continue;
//funzione che genera il codplan (prende l'ultimo esistente e lo incrementa di uno)
bool TGenera_planning_app::genera_codplan(long& key) const
{
long num = 1;
TLocalisamfile tplan(LF_LVCONSPLAN);
if (tplan.last() == NOERR)
num += tplan.get_long(LVCONSPLAN_CODPLAN);
key = num;
return true;
//se ho già raggiunto il numero massimo di consegne per mese...
//...la riga, anche se supera tutti i controlli, non va elaborata
if (maxcons > 0 && conta_consegne_mese(codcf,coditi,d) >= maxcons)
continue;
//scrivi la chiave
const long codplan = d.date2ansi(); //setta il codplan
rplan.zero();
rplan.put(LVRCONSPLAN_CODPLAN, codplan);
rplan.put(LVRCONSPLAN_CODRIGA, prossimo_codriga(d));
rplan.put(LVRCONSPLAN_DTCONS,d); //setta la data di consegna
rplan.put(LVRCONSPLAN_CODITI,coditi); //setta il codice itinerario
rplan.put(LVRCONSPLAN_ORDFER,ordfer); //setta l'ordine di fermata
rplan.put(LVRCONSPLAN_CODCF,codcf); //setta il codice cliente
rplan.put(LVRCONSPLAN_CODCONT,codcont); //setta il codice contratto
rplan.put(LVRCONSPLAN_GGCONS,ggcons); //setta il giorno di consegna
rplan.put(LVRCONSPLAN_MODPASS,modpass); //setta la modalità di passaggio
rplan.put(LVRCONSPLAN_CODAUT,codaut); //setta il codice autista
rplan.put(LVRCONSPLAN_CODMEZ,codmez); //setta il codice mezzo
rplan.put(LVRCONSPLAN_FREQ,freq); //setta la frequenza di consegna
rplan.put(LVRCONSPLAN_CONSSTD,true); //setta il flag di "consegna standard"
rplan.put(LVRCONSPLAN_PERSOSP,codpersosp); //setta il periodo di sospensione
lv_set_update_info(rplan); //setta utente, data e ora dell'ultimo aggiornamento
file_rplan.write();
}
}
bool TGenera_planning_app::transfer()
{
const TDate dadata = _msk->get(F_DADATA);
const TDate adata = _msk->get(F_ADATA);
const TString8 codcf = _msk->get(F_CODCF);
const TString8 coditi = _msk->get(F_CODITI);
TLocalisamfile tplan(LF_LVCONSPLAN);
TLocalisamfile rplan(LF_LVRCONSPLAN);
TLocalisamfile pplan(LF_LVPASPLAN);
for (TDate tmp = dadata; tmp <= adata; ++tmp)
TString query = "USE LVPASPLAN";
if (_msk->get(F_CODCF).full())
{
//long codplan = cerca_planning(dadata,adata); //controllo se un planning per una certa data esiste già
const long codcf = _msk->get_long(F_CODCF);
elimina_planning_cliente(dadata,adata,_msk->get_long(F_CODCF));
query << " SELECT CODCF=" << codcf;
}
else if (_msk->get(F_CODITI).full())
{
const long coditi = _msk->get_long(F_CODITI);
elimina_planning_itinerario(dadata,adata,coditi);
query << " SELECT CODITI=" << coditi;
}
else
elimina_planning(dadata,adata);
/*if (!codplan)
{*/
long key;
int giorno = tmp.wday();
genera_codplan(key);
long key1 = key;
//}
_codriga.destroy(); //azzera il numero delle righe del planning già generati
TISAM_recordset pplan(query);
TProgind pi(pplan.items(), TR("Generazione planning in corso..."), true, true);
for (bool ok = pplan.move_first(); ok; ok = pplan.move_next())
{
if (!pi.addstatus(1))
break;
elabora_passaggio(dadata, adata, pplan);
}
return true;
@ -150,6 +422,6 @@ void TGenera_planning_app::main_loop()
int lv2100(int argc, char* argv[])
{
TGenera_planning_app app;
app.run(argc, argv, TR("Generazione automatica planning"));
app.run(argc, argv, TR("Generazione planning"));
return 0;
}

46
lv/lvcondv.h Executable file
View File

@ -0,0 +1,46 @@
#ifndef __LVCONDV_H
#define __LVCONDV_H
#define LVCONDV_CODCONT "CODCONT"
#define LVCONDV_STATUS "STATUS"
#define LVCONDV_CODCF "CODCF"
#define LVCONDV_DATAIN "DATAIN"
#define LVCONDV_DATASC "DATASC"
#define LVCONDV_DTSTAGIN "DTSTAGIN"
#define LVCONDV_DTSTAGSC "DTSTAGSC"
#define LVCONDV_FATTSOSP "FATTSOSP"
#define LVCONDV_STRCONS "STRCONS"
#define LVCONDV_TIPOLIS "TIPOLIS"
#define LVCONDV_STPRZBOL "STPRZBOL"
#define LVCONDV_CONTSPOR "CONTSPOR"
#define LVCONDV_TIPODOC "TIPODOC"
#define LVCONDV_PERFATT "PERFATT"
#define LVCONDV_INPRPER "INPRPER"
#define LVCONDV_FATTPARZ "FATTPARZ"
#define LVCONDV_DOTTMPPRZD "DOTTMPPRZD"
#define LVCONDV_FORFNOCONS "FORFNOCONS"
#define LVCONDV_ADDCAPROT "ADDCAPROT"
#define LVCONDV_FORFGLOB "FORFGLOB"
#define LVCONDV_TIPOCAN "TIPOCAN"
#define LVCONDV_TIPOIMB "TIPOIMB"
#define LVCONDV_SSCONS "SSCONS"
#define LVCONDV_TIPOSTPRZ "TIPOSTPRZ"
#define LVCONDV_DTLASTFATT "DTLASTFATT"
#define LVCONDV_ATTFATTNODT "ATTFATTNODT"
#define LVCONDV_RIFBOLLEFATT "RIFBOLLEFATT"
#define LVCONDV_STDICITURA "STDICITURA"
#define LVCONDV_PROFORME "PROFORME"
#define LVCONDV_CICLAGGIO "CICLAGGIO"
#define LVCONDV_STETIMATI "STETIMATI"
#define LVCONDV_STETITC "STETITC"
#define LVCONDV_STDDTPTC "STDDTPTC"
#define LVCONDV_IMPMINFATT "IMPMINFATT"
#define LVCONDV_PERCNOCONT "PERCNOCONT"
#define LVCONDV_PERCTOLLPES "PERCTOLLPES"
#define LVCONDV_NUMUT "NUMUT"
#define LVCONDV_NUMETI "MUNETI"
#define LVCONDV_RITAUTDTTMP "RITAUTDTTMP"
#define LVCONDV_DTFIXDDT "DTFIXDDT"
#define LVCONDV_COMMENTI "COMMENTI"
#endif

1
lv/lvpasplan.h
View File

@ -16,5 +16,6 @@
#define LVPASPLAN_UTULAGG "UTULAGG"
#define LVPASPLAN_DTULAGG "DTULAGG"
#define LVPASPLAN_ORULAGG "ORULAGG"
#define LVPASPLAN_NOTE "NOTE"
#endif

19
lv/lvrconsplan.h
View File

@ -3,19 +3,26 @@
#define LVRCONSPLAN_CODPLAN "CODPLAN"
#define LVRCONSPLAN_CODRIGA "CODRIGA"
#define LVRCONSPLAN_MODPASS "MODPASS"
#define LVRCONSPLAN_DTCONS "DTCONS"
#define LVRCONSPLAN_IDCONT "IDCONT"
#define LVRCONSPLAN_CODCF "CODCF"
#define LVRCONSPLAN_CODITI "CODITI"
#define LVRCONSPLAN_ORDFER "ORDFER"
#define LVRCONSPLAN_CODCF "CODCF"
#define LVRCONSPLAN_CODCONT "CODCONT"
#define LVRCONSPLAN_GGCONS "GGCONS"
#define LVRCONSPLAN_MODPASS "MODPASS"
#define LVRCONSPLAN_CODAUT "CODAUT"
#define LVRCONSPLAN_CODMEZ "CODMEZ"
#define LVRCONSPLAN_PROVV "PROVV"
#define LVRCONSPLAN_ANNO "ANNO"
#define LVRCONSPLAN_CODNUM "CODNUM"
#define LVRCONSPLAN_NDOC "NDOC"
#define LVRCONSPLAN_CODPLANOR "CODPLANOR"
#define LVRCONSPLAN_ORDFER "ORDFER"
#define LVRCONSPLAN_FREQ "FREQ"
#define LVRCONSPLAN_CONSSTD "CONSSTD"
#define LVRCONSPLAN_CODPERSOSP "CODPERSOSP"
#define LVRCONSPLAN_CODPERSOSPVAR "CODPERSOSPVAR"
#define LVRCONSPLAN_PERSOSP "CODPERSOSP"
#define LVRCONSPLAN_PERSOSPVAR "CODPERSOSPVAR"
#define LVRCONSPLAN_UTULAGG "UTULAGG"
#define LVRCONSPLAN_DTULAGG "DTULAGG"
#define LVRCONSPLAN_ORULAGG "ORULAGG"
#endif