From 6fb97e1b61f14125917cd686bc4d3b7ff8687949 Mon Sep 17 00:00:00 2001 From: angelo Date: Thu, 9 Nov 1995 13:30:48 +0000 Subject: [PATCH] CG1400.CPP : Aggiunta chiamata a TForm::set_arrange() per evitare di rieffettuare ogni volta il posizionamento; corretta stampa della data e dei codici ABI-CAB impostati sulla maschera. CG1400A.UML : Tolto il flag di automatico sul campo data di stampa. DELIVA.FRM : Corretta stampa del codice dipendenza. git-svn-id: svn://10.65.10.50/trunk@2118 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- cg/Attic/cg1400.cpp | 14 +++++++++----- cg/Attic/cg1400a.uml | 1 - cg/cg1400.cpp | 14 +++++++++----- cg/cg1400a.uml | 1 - cg/deliva.frm | 2 +- 5 files changed, 19 insertions(+), 13 deletions(-) diff --git a/cg/Attic/cg1400.cpp b/cg/Attic/cg1400.cpp index 879734cfb..668d0dfaf 100755 --- a/cg/Attic/cg1400.cpp +++ b/cg/Attic/cg1400.cpp @@ -56,9 +56,8 @@ bool TStampa_deleghe_IVA::create() _ditte = new TArray_sheet(-1, -1, 0, 0, "Selezione Deleghe da stampare", "@1|Cod.@5|Ragione Sociale@30|Importo@15r|Interessi@15r|ABI@5|CAB@5|Concessione|Tit. Conto Fis."); - TConfig c(CONFIG_STUDIO, "cg"); - _azienda = c.get("CodABI"); - _dipendenza = c.get("CodCAB"); + _azienda = "" ; + _dipendenza = "" ; dispatch_e_menu(BAR_ITEM(1)); return TRUE; @@ -346,13 +345,17 @@ bool TStampa_deleghe_IVA::print_deleghe() cur.read(); // Posiziona il cursore - const bool cera_abi = _azienda.empty() || delega.get("S7").not_empty(); + if (_pd.ok()) + delega.put("D0",_pd); + + const bool cera_abi = _azienda.empty() || _dipendenza.empty(); if (!cera_abi) { delega.put("S7", _azienda); delega.put("S8", _dipendenza); + delega.rewrite(); + cur.read(); } - const bool cera_conc = (*r.get(7) <= ' ') || delega.get("S9").not_empty(); if (!cera_conc) delega.put("S9", r.get(7)); // Concessione @@ -385,6 +388,7 @@ bool TStampa_deleghe_IVA::print_deleghe() delega.put("S6", tributo); } + if (i > 0) f.set_arrange(FALSE); ok = f.print(-1); // Stampa solo il record corrente if (!ok) break; diff --git a/cg/Attic/cg1400a.uml b/cg/Attic/cg1400a.uml index be235ad75..2cfca4a4b 100755 --- a/cg/Attic/cg1400a.uml +++ b/cg/Attic/cg1400a.uml @@ -184,7 +184,6 @@ DATA F_DATA BEGIN PROMPT 2 14 "Data " HELP "Data da stampare sulle deleghe" - FLAGS "A" END BOOLEAN F_AGGIORNA diff --git a/cg/cg1400.cpp b/cg/cg1400.cpp index 879734cfb..668d0dfaf 100755 --- a/cg/cg1400.cpp +++ b/cg/cg1400.cpp @@ -56,9 +56,8 @@ bool TStampa_deleghe_IVA::create() _ditte = new TArray_sheet(-1, -1, 0, 0, "Selezione Deleghe da stampare", "@1|Cod.@5|Ragione Sociale@30|Importo@15r|Interessi@15r|ABI@5|CAB@5|Concessione|Tit. Conto Fis."); - TConfig c(CONFIG_STUDIO, "cg"); - _azienda = c.get("CodABI"); - _dipendenza = c.get("CodCAB"); + _azienda = "" ; + _dipendenza = "" ; dispatch_e_menu(BAR_ITEM(1)); return TRUE; @@ -346,13 +345,17 @@ bool TStampa_deleghe_IVA::print_deleghe() cur.read(); // Posiziona il cursore - const bool cera_abi = _azienda.empty() || delega.get("S7").not_empty(); + if (_pd.ok()) + delega.put("D0",_pd); + + const bool cera_abi = _azienda.empty() || _dipendenza.empty(); if (!cera_abi) { delega.put("S7", _azienda); delega.put("S8", _dipendenza); + delega.rewrite(); + cur.read(); } - const bool cera_conc = (*r.get(7) <= ' ') || delega.get("S9").not_empty(); if (!cera_conc) delega.put("S9", r.get(7)); // Concessione @@ -385,6 +388,7 @@ bool TStampa_deleghe_IVA::print_deleghe() delega.put("S6", tributo); } + if (i > 0) f.set_arrange(FALSE); ok = f.print(-1); // Stampa solo il record corrente if (!ok) break; diff --git a/cg/cg1400a.uml b/cg/cg1400a.uml index be235ad75..2cfca4a4b 100755 --- a/cg/cg1400a.uml +++ b/cg/cg1400a.uml @@ -184,7 +184,6 @@ DATA F_DATA BEGIN PROMPT 2 14 "Data " HELP "Data da stampare sulle deleghe" - FLAGS "A" END BOOLEAN F_AGGIORNA diff --git a/cg/deliva.frm b/cg/deliva.frm index 15592940c..9114efe13 100755 --- a/cg/deliva.frm +++ b/cg/deliva.frm @@ -383,7 +383,7 @@ BEGIN KEY "Codice Dipendenza" PROMPT 124 58 "" PICTURE "@ @ @ @" - FIELD 1@->I0 + FIELD S8[2,5] END STRINGA 40 40 1