From 7a5f4bbfe788353a6cf8117e9be9ee6db14ffc77 Mon Sep 17 00:00:00 2001 From: luca83 Date: Wed, 11 Feb 2009 09:44:11 +0000 Subject: [PATCH] =?UTF-8?q?Patch=20level=20=20=20=20=20=20=20=20=20:=2010.?= =?UTF-8?q?0=20patch=20236=20Files=20correlati=20=20=20=20=20:=20lv2,=20lv?= =?UTF-8?q?2200a.msk=20Ricompilazione=20Demo=20:=20[=20]=20Commento=20=20?= =?UTF-8?q?=20=20=20=20=20=20=20=20=20=20:=200001161:=20Gestione=20data=20?= =?UTF-8?q?inizio/fine=20gestione=20manulae=20dei=20giri=20Descrizione=20?= =?UTF-8?q?=09Proporre=20conme=20data=20inizio=20la=20data=20odierna=20e?= =?UTF-8?q?=20la=20data=20finale=20non=20deve=20essere=20obbligatoria=20(s?= =?UTF-8?q?e=20non=20imputata=20significa=20fino=20alla=20data=20pi=C3=B9?= =?UTF-8?q?=20alta)?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: svn://10.65.10.50/trunk@18244 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- lv/lv2200.cpp | 18 +++++++++++++++--- lv/lv2200a.uml | 3 ++- 2 files changed, 17 insertions(+), 4 deletions(-) diff --git a/lv/lv2200.cpp b/lv/lv2200.cpp index 0cd138cdb..24328b0fa 100755 --- a/lv/lv2200.cpp +++ b/lv/lv2200.cpp @@ -42,9 +42,21 @@ public: //questa funzione si occupa di riempire lo sheet dinamicamente in base ai parametri che l'utente decide void TGestione_planning_mask::fill_sheet() { - if (field(F_DADATA).empty() || field(F_ADATA).empty()) + if (field(F_DADATA).empty()) return; + TDate adata; + if (field(F_ADATA).empty()) + { + //instanzio un recordset sui planning, filtrando sui coditi + TISAM_recordset rplan("USE LVRCONSPLAN KEY 2\nFROM DTCONS=#DADATA"); + rplan.set_var("#DADATA", get_date(F_DADATA)); + rplan.move_last(); + adata = rplan.get(LVRCONSPLAN_DTCONS).as_date(); + } + else + adata = get_date(F_ADATA); + TString query = "USE LVRCONSPLAN KEY 2"; const long coditi = get_long(F_CODITI); const long codcli = get_long(F_CODCF); @@ -62,7 +74,7 @@ void TGestione_planning_mask::fill_sheet() } query << "\n"; query << "FROM DTCONS=" << get(F_DADATA) << "\n"; - query << "TO DTCONS=" << get(F_ADATA) << "\n"; + query << "TO DTCONS=" << adata << "\n"; TISAM_recordset plan(query); @@ -437,7 +449,7 @@ bool TGestione_planning_mask::on_field_event(TOperable_field& o, TField_event e, case F_ADATA: case F_CODITI: case F_CODCF: - if (e == fe_modify) + if (e == fe_modify || e == fe_init) { fill_sheet(); } diff --git a/lv/lv2200a.uml b/lv/lv2200a.uml index a6b244291..ddb603ad3 100755 --- a/lv/lv2200a.uml +++ b/lv/lv2200a.uml @@ -41,6 +41,7 @@ BEGIN PROMPT 2 2 "Visualizza i giri dal " FIELD DADATA CHECKTYPE REQUIRED + FLAGS "A" END DATE F_ADATA @@ -49,7 +50,7 @@ BEGIN FIELD ADATA VALIDATE DATE_CMP_FUNC >= F_DADATA WARNING "Inserire una data finale maggiore della data di inizio" - CHECKTYPE REQUIRED + CHECKTYPE NORMAL END STRING F_CODITI 3