From 557b4a47f9e0ed079ba5d0c980f193ad7f7bfdd0 Mon Sep 17 00:00:00 2001 From: alex Date: Thu, 19 Mar 2009 14:22:27 +0000 Subject: [PATCH] Patch level : 10.0 262 Files correlati : cg2.exe Ricompilazione Demo : [ ] Commento : MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Bug : 0001220 dai registri iva è possibile caricare un ultimo numero di protocollo iva di 6 caratteri, se lo si utilizza mettendoci per esempio 900001, quando si inserisce la prima registrazione contabile propone numero protocollo iva = 0. Nella maschera dei caricamento della prima nota il numero protocollo iva consente l'inserimento di 5 caratteri. Bug : 0001225 E' richiesto di poter inserire nella testata del documento, nel caso di iva intra, l'importo totale della fattura anzichè imponibile ed iva. Nel caso di fatture intra il totale documento e' senza IVA. si può eventualmente calcolare l'IVA da mettere nel campo ritenuta e cambiarne la label git-svn-id: svn://10.65.10.50/trunk@18564 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- cg/cg2100.cpp | 16 +++++++++++++--- cg/cg2100c.uml | 6 +++--- cg/cg2102.cpp | 14 +++++++++++++- cg/f23.dir | 2 +- cg/f23.trr | 4 ++-- 5 files changed, 32 insertions(+), 10 deletions(-) diff --git a/cg/cg2100.cpp b/cg/cg2100.cpp index f55146fb7..f8e6243dc 100755 --- a/cg/cg2100.cpp +++ b/cg/cg2100.cpp @@ -699,7 +699,11 @@ void TPrimanota_application::init_insert_mode(TMask& m) m.hide(F_ADJUST_PRORATA); // In inserimento non puo' esistere un pro-rata errato! if (causale().soloiva()) m.set(F_SOLAIVA, "X", true); // Propone movimento di sola iva - } + if (iva() == iva_acquisti && causale().intra()) + m.field(F_RITFIS).set_prompt("IVA intracomun. "); + else + m.field(F_RITFIS).set_prompt("Ritenute fiscali "); +} else { if (*causale().codice()) // @@ -787,7 +791,13 @@ void TPrimanota_application::init_modify_mode(TMask& m) } } } - + if (iva() == iva_acquisti) + { + if (causale().intra()) + m.field(F_RITFIS).set_prompt("IVA intracomun. "); + else + m.field(F_RITFIS).set_prompt("Ritenute fiscali "); + } if (_as400 && is_pagamento()) { m.set(SK_TIPORIGA, "A"); // Forza il tipo riga normale @@ -2174,4 +2184,4 @@ int cg2100 (int argc, char** argv) a->run(argc, argv, TR("Prima nota")); delete a; return 0; -} \ No newline at end of file +} diff --git a/cg/cg2100c.uml b/cg/cg2100c.uml index 04bcc714e..d9d267bc8 100755 --- a/cg/cg2100c.uml +++ b/cg/cg2100c.uml @@ -190,15 +190,15 @@ BEGIN COPY OUTPUT F_DESCAGG END -NUMBER F_PROTIVA 5 +NUMBER F_PROTIVA 6 BEGIN PROMPT 1 9 "Protocollo IVA " FIELD PROTIVA END -NUMBER F_RIEPILOGO 5 +NUMBER F_RIEPILOGO 6 BEGIN - PROMPT 25 9 "Riepilogo al n. " + PROMPT 25 9 "Riepilogo al n." FIELD UPROTIVA NUM_EXPR {(#F_RIEPILOGO==0)||(#F_RIEPILOGO>=#F_PROTIVA)} WARNING "Inserire un riepilogo non inferiore al protocollo IVA (Obbigatorio se il cliete/fornitore ha codice inserimento in allegati uguale a 3)" diff --git a/cg/cg2102.cpp b/cg/cg2102.cpp index 7bbeca48d..70cac9e9a 100755 --- a/cg/cg2102.cpp +++ b/cg/cg2102.cpp @@ -2598,7 +2598,19 @@ bool TPrimanota_application::main_codiva_handler(TMask_field& f, KEY key) TPrimanota_application& a = app(); const real imp(a.ivas().row(1).get(0)); - if (imp.is_zero()) // Se il totale documento non e' stato spezzato + + if (a.iva() == iva_acquisti && a.causale().intra()) + { + const real iva(f.mask().get_real(F_RITFIS)); + if (iva.is_zero()) + { + TCodiceIVA codiva(f.get()); + const real totale = f.mask().get_real(F_TOTALE); + const real imposta = codiva.imposta(totale); + f.mask().set(F_RITFIS, imposta.string()); + } + } + if (imp.is_zero()) // Se il totale documento non e' stato spezzato { TToken_string& row = a.ivas().row(0); diff --git a/cg/f23.dir b/cg/f23.dir index 08da14f49..cd928962f 100755 --- a/cg/f23.dir +++ b/cg/f23.dir @@ -1,3 +1,3 @@ 23 0 -$mov|0|0|373|0|Movimenti di prima nota||| +$mov|0|0|375|0|Movimenti di prima nota||| diff --git a/cg/f23.trr b/cg/f23.trr index 48d8ab412..8245099b4 100755 --- a/cg/f23.trr +++ b/cg/f23.trr @@ -14,8 +14,8 @@ DESCR|1|50|0|Descrizione TIPOMOV|1|1|0|Tipo movimento ANNOIVA|2|4|0|Anno IVA REG|1|3|0|Codice registro IVA -PROTIVA|3|5|0|Numero di protocollo IVA -UPROTIVA|3|5|0|Ultimo numero di protocollo IVA se diverso da PROTIVA +PROTIVA|3|6|0|Numero di protocollo IVA +UPROTIVA|3|6|0|Ultimo numero di protocollo IVA se diverso da PROTIVA CODVAL|1|3|0|Codice valuta DATACAM|5|8|0|Data del cambio CAMBIO|4|15|6|Cambio della valuta