Patch level :10.0

Files correlati     :lv0.exe
Ricompilazione Demo : [ ]
Commento            :
Gestita l'eliminazione contratto con conseguente eliminazione dei giri


git-svn-id: svn://10.65.10.50/trunk@17849 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
rajitgill 2008-12-10 12:03:36 +00:00
parent 503e94d37a
commit 0558548429
2 changed files with 5 additions and 6 deletions

View File

@ -141,7 +141,7 @@ protected:
virtual bool remove();
virtual void init_query_mode(TMask& m);
virtual void init_insert_mode(TMask& m);
bool elimina_planning(const TDate& data, const long& codcont, const long& codcf) const;
bool elimina_planning(const long& codcont, const long& codcf) const;
bool kill_planning (TISAM_recordset& selrighe) const;
};
@ -325,13 +325,12 @@ bool TContratti_app::protected_record(TRectype & rec)
return !cont.can_be_deleted();
}
bool TContratti_app::elimina_planning(const TDate& data, const long& codcont, const long& codcf) const
bool TContratti_app::elimina_planning(const long& codcont, const long& codcf) const
{
//creo il recordset
TISAM_recordset selrighe("USE LVRCONSPLAN KEY 3\nSELECT DTCONS>=#DATA\nFROM CODCF=#CODCF CODCONT=#CODCONT \nTO CODCF=#CODCF CODCONT=#CODCONT");
TISAM_recordset selrighe("USE LVRCONSPLAN KEY 3\nFROM CODCF=#CODCF CODCONT=#CODCONT \nTO CODCF=#CODCF CODCONT=#CODCONT");
//setto le variabili
selrighe.set_var("#DATA",data);
selrighe.set_var("#CODCF",codcf);
selrighe.set_var("#CODCONT",codcont);
@ -373,8 +372,7 @@ bool TContratti_app::remove()
file.remove();
}
TDate oggi(TODAY);
elimina_planning(oggi,_msk->get_long(F_CODCONT),_msk->get_long(F_CODCF));
elimina_planning(_msk->get_long(F_CODCONT),_msk->get_long(F_CODCF));
}
return ok;
}

View File

@ -1,5 +1,6 @@
#include "lvlib.h"
#include "lvrcondv.h"
#include "lvcondv.h"
#include "../cg/cglib01.h"
#include "../mg/clifogiac.h"