Patch level :10.0
Files correlati : Ricompilazione Demo : [ ] Commento : 0000949: Non genera giro per singolo itinerario Il palnning non viene generato per singolo itinerario 0000950: Gestione manuale giri - non segnala se data arrivo è minore di quella di partenza vedere riassunto. git-svn-id: svn://10.65.10.50/trunk@17549 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
f456b363b8
commit
e7c33239b5
@ -114,8 +114,10 @@ bool TGenera_planning_app::elimina_planning(const TDate& dadata, const TDate& ad
|
||||
//...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
|
||||
{
|
||||
TString4 itinerario;
|
||||
itinerario.format("%03d",coditi);
|
||||
//creo il recordset
|
||||
TISAM_recordset selrighe("USE LVRCONSPLAN KEY 2\nSELECT (CODITI=#CODITI)\nFROM DTCONS=#DADATA\nTO DTCONS=#ADATA");
|
||||
TISAM_recordset selrighe("USE LVRCONSPLAN KEY 2\nFROM DTCONS=#DADATA CODITI=#CODITI\nTO DTCONS=#ADATA CODITI=#CODITI");
|
||||
//setto le variabili
|
||||
selrighe.set_var("#CODITI",coditi);
|
||||
selrighe.set_var("#DADATA",dadata);
|
||||
@ -385,8 +387,10 @@ bool TGenera_planning_app::transfer()
|
||||
else if (_msk->get(F_CODITI).full())
|
||||
{
|
||||
const long coditi = _msk->get_long(F_CODITI);
|
||||
TString4 itinerario;
|
||||
itinerario.format("%03d",coditi);
|
||||
elimina_planning_itinerario(dadata,adata,coditi);
|
||||
query << " SELECT CODITI=" << coditi;
|
||||
query << " SELECT CODITI=" << itinerario;
|
||||
}
|
||||
else
|
||||
elimina_planning(dadata,adata);
|
||||
|
@ -180,7 +180,7 @@ void TGestione_planning_mask::aggiorna_plan()
|
||||
|
||||
//variabili che mi premettono di lavorare sullo sheet
|
||||
TSheet_field& sheet = sfield(F_PLAN);
|
||||
TToken_string rigamodificata = sheet.row(sheet.selected()); //metto in una stringa la riga che sto analizzando
|
||||
TToken_string& rigamodificata = sheet.row(sheet.selected()); //metto in una stringa la riga che sto analizzando
|
||||
|
||||
//instanzio un isam file sulla tabella dei planning
|
||||
TLocalisamfile rplan(LF_LVRCONSPLAN);
|
||||
@ -189,7 +189,7 @@ void TGestione_planning_mask::aggiorna_plan()
|
||||
const int posdata = sheet.cid2index(F_S_DATA);
|
||||
TDate data = _rigaoriginale.get(posdata);
|
||||
long codplan = data.date2ansi();
|
||||
const long codplanor = codplan ;
|
||||
const long codplanor = codplan;
|
||||
|
||||
//creo il codriga
|
||||
const int posriga = sheet.cid2index(F_S_RIGA);
|
||||
|
@ -62,6 +62,8 @@ DATE F_ADATA
|
||||
BEGIN
|
||||
PROMPT 40 2 "al "
|
||||
FIELD ADATA
|
||||
VALIDATE DATE_CMP_FUNC >= F_DADATA
|
||||
WARNING "Inserire una data finale maggiore della data di inizio"
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user