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:
luca83 2008-11-04 16:02:53 +00:00
parent f456b363b8
commit e7c33239b5
3 changed files with 10 additions and 4 deletions

View File

@ -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);

View File

@ -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);

View File

@ -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