From 4400800715d79cba4a58c1ee24d394b7c4fcfd56 Mon Sep 17 00:00:00 2001 From: guy Date: Mon, 11 Jul 2011 10:26:12 +0000 Subject: [PATCH] Patch level : 10.0 1054 Files correlati : cg7.exe cg7200a.rep cg2.exe Ricompilazione Demo : [ ] Commento : 0001887: lista movimenti per imponibile Manca la colonna non soggetto MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit 0001888: prima nota Dopo l'installazione delle patch di ieri, sulla prima videata della prima nota è apparso un campo 'contabilità separata' non ho istruzioni su questa nuova funzionalità ma aprendo la tabella mi va in errore git-svn-id: svn://10.65.10.50/branches/R_10_00@22390 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- cg/cg7200.cpp | 23 +++++------ cg/cg7200a.rep | 109 ++++++++++++++++++++++++++----------------------- 2 files changed, 68 insertions(+), 64 deletions(-) diff --git a/cg/cg7200.cpp b/cg/cg7200.cpp index 1b260927b..1ee81c214 100755 --- a/cg/cg7200.cpp +++ b/cg/cg7200.cpp @@ -48,12 +48,12 @@ TPrint_x_imponibile_recordset::TPrint_x_imponibile_recordset() //campi da LF_RMOVIVA create_field("Imponibile", -1, 18, _realfld, true); create_field("Imposta", -1, 18, _realfld, false); - create_field("Imponibile_no", -1, 18, _realfld, false); //normale - create_field("Imponibile_ni", -1, 18, _realfld, false); //non imponibile - create_field("Imponibile_es", -1, 18, _realfld, false); //esente - create_field("Imponibile_ne", -1, 18, _realfld, false); //non esposta - create_field("Imponibile_ma", -1, 18, _realfld, false); //margine - + create_field("Imponibile_no", -1, 18, _realfld, false); // normale + create_field("Imponibile_ni", -1, 18, _realfld, false); // non imponibile + create_field("Imponibile_es", -1, 18, _realfld, false); // esente + create_field("Imponibile_ne", -1, 18, _realfld, false); // non esposta + create_field("Imponibile_ns", -1, 18, _realfld, false); // non soggetto + create_field("Imponibile_ma", -1, 18, _realfld, false); // margine } /////////////////////////////////////////////////////////// // Report @@ -111,7 +111,7 @@ bool TPrint_x_imponibile_mask::aggiungi_movimento(const TRectype& rec, TPrint_x_ TRecord_array righe_iva(keytok, LF_RMOVIVA); real tot_imponibile, tot_imposta; - real tot_impon_no, tot_impon_ni, tot_impon_es, tot_impon_ne, tot_impon_ma; + real tot_impon_no, tot_impon_ni, tot_impon_es, tot_impon_ne, tot_impon_ns, tot_impon_ma; TString4 tipoiva; //dichiarata qui perchè serve nella scrittura dell' output_recordset @@ -125,6 +125,7 @@ bool TPrint_x_imponibile_mask::aggiungi_movimento(const TRectype& rec, TPrint_x_ TCodiceIVA ci(rmi.get(RMI_CODIVA)); switch(ci.allegato(tipocf)) { + case 0: tot_impon_ns += imponibile; break; case 2: tot_impon_ni += imponibile; break; case 3: tot_impon_es += imponibile; break; case 4: tot_impon_ne += imponibile; break; @@ -184,6 +185,7 @@ bool TPrint_x_imponibile_mask::aggiungi_movimento(const TRectype& rec, TPrint_x_ output_recordset.set("Imponibile_ni", tot_impon_ni); output_recordset.set("Imponibile_es", tot_impon_es); output_recordset.set("Imponibile_ne", tot_impon_ne); + output_recordset.set("Imponibile_ns", tot_impon_ns); output_recordset.set("Imponibile_ma", tot_impon_ma); } @@ -285,9 +287,7 @@ bool TPrint_x_imponibile_mask::on_field_event(TOperable_field& o, TField_event e } TPrint_x_imponibile_mask::TPrint_x_imponibile_mask() : TAutomask("cg7200a") -{ -} - +{ } /////////////////////////////////////////////////////////// // Applicazione @@ -305,11 +305,8 @@ public: void TPrint_x_imponibile::main_loop() { TPrint_x_imponibile_mask mask; - while (mask.run() == K_ENTER) - { mask.elabora(); - } } int cg7200(int argc, char* argv[]) diff --git a/cg/cg7200a.rep b/cg/cg7200a.rep index 5a79c01c7..809f659b9 100755 --- a/cg/cg7200a.rep +++ b/cg/cg7200a.rep @@ -19,10 +19,10 @@ - - - - + + + + @@ -31,15 +31,16 @@ - - - - - - - - - + + + + + + + + + +
@@ -118,69 +119,73 @@ THEN Cofi - - Stato - + + Stato +
Numreg - + Datareg - + Reg - + Protiva - + Numdoc - + Datadoc - + Codcaus - + Descr - + Totdoc MESSAGE ADD,F1.201 - + Imponibile MESSAGE ADD,F1.202 - + Imposta MESSAGE ADD,F1.203 - + Imponibile_no MESSAGE ADD,F1.204 - + Imponibile_ni MESSAGE ADD,F1.205 - + Imponibile_es MESSAGE ADD,F1.206 - + Imponibile_ne MESSAGE ADD,F1.207 - - Imponibile_ma + + Imponibile_ns MESSAGE ADD,F1.208 + + Imponibile_ma + MESSAGE ADD,F1.209 +
@@ -196,26 +201,28 @@ THEN
- + - - - - - - - - - - - - - - - - - - + + + + + + + + + + + + + + + + + + + +
USE MOV KEY 3