Corretti conflitti su reverse charge in Prima nota

git-svn-id: svn://10.65.10.50/branches/R_10_00@23082 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2015-05-07 15:48:26 +00:00
parent 0500c3ce1d
commit b46459b21e
4 changed files with 52 additions and 42 deletions

View File

@ -1869,7 +1869,7 @@ void TPrimanota_application::ini2mask(TConfig& ini, TMask& msk, bool query)
add_cgs_tot(msk); add_cgs_tot(msk);
TSheet_field& is = ivas(); TSheet_field& is = ivas();
for (int i = 0; ini.set_paragraph(format("%d,%d", LF_RMOVIVA, i+1)); i++) for (int i = 0; ini.set_paragraph(LF_RMOVIVA, i+1); i++)
{ {
TToken_string& riga = is.row(i); TToken_string& riga = is.row(i);
@ -1887,11 +1887,13 @@ void TPrimanota_application::ini2mask(TConfig& ini, TMask& msk, bool query)
} }
// Genera eventuali righe per ritenute fiscali e sociali // Genera eventuali righe per ritenute fiscali e sociali
for (short ritid = F_RITFIS; ritid <= F_RITSOC; ritid++) const short frit[4] = { F_RITFIS, F_RITSOC, F_REVCHARGE, 0 };
const char trit[4] = { 'F', 'S', 'V', '\0' };
for (int i = 0; frit[i]; i++)
{ {
TEdit_field& ritfld = msk.efield(ritid); TEdit_field& ritfld = msk.efield(frit[i]);
if (!ritfld.empty() && ritfld.active()) if (!ritfld.empty() && ritfld.active())
add_cgs_rit(ritid == F_RITFIS); add_cgs_ritenute(trit[i]);
} }
calcola_imp(); // Calcola totale imponibile ed imposte calcola_imp(); // Calcola totale imponibile ed imposte

View File

@ -81,6 +81,7 @@
#define F_CONTO 181 #define F_CONTO 181
#define F_SOTTOCONTO 182 #define F_SOTTOCONTO 182
#define F_SALDOCONTO 183 #define F_SALDOCONTO 183
#define F_REVCHARGE 184
#define F_SHEETCG 190 #define F_SHEETCG 190
#define F_SHEETIVA 191 #define F_SHEETIVA 191

View File

@ -408,7 +408,7 @@ int TPrimanota_application::set_cgs_row(int n, const TImporto& imp,
HIDDEN int compare_rows(const TSortable& o1, const TSortable& o2, void* jolly) HIDDEN int compare_rows(const TSortable& o1, const TSortable& o2, void* jolly)
{ {
// Totale, Rit.Fisc., Rit.Soc., da riga IVA, riga contabile, IVA detr., IVA non detr. // Totale, Rit.Fisc., Rit.Soc., Rev.Charge, da riga IVA, riga contabile, IVA detr., IVA non detr.
const char* const sort_order = "TFSVI DN1APRC"; const char* const sort_order = "TFSVI DN1APRC";
const TToken_string& r1 = (const TToken_string&)o1; const TToken_string& r1 = (const TToken_string&)o1;

View File

@ -1,37 +1,44 @@
#include <relapbar.h> TOOLBAR "topbar" 0 0 0 2
PA "Causale blocco pagamenti" 0 2 0 0 #include <relapbar.h>
GR -1 75 7 ENDPAGE
BE
PR 1 0 "" PAGE "Causale blocco pagamenti" 0 2 0 0
FL "R"
EN GROUPBOX DLG_NULL 75 7
ST 101 6 BEGIN
BE PROMPT 1 0 ""
PR 2 2 "Codice " FLAGS "R"
HE "Codice della causale" END
FI CODTAB
FL "U" STRING 101 6
KE 1 BEGIN
US %CBP PROMPT 2 2 "Codice "
IN CODTAB 101 HELP "Codice della causale"
DI "Codice" CODTAB FIELD CODTAB
DI "Descrizione @50" S0 FLAGS "U"
OU 101 CODTAB KEY 1
OU 102 S0 USE %CBP
CH REQUIRED INPUT CODTAB 101
EN DISPLAY "Codice" CODTAB
ST 102 50 DISPLAY "Descrizione @50" S0
BE OUTPUT 101 CODTAB
PR 2 4 "Descrizione " OUTPUT 102 S0
HE "Descrizione della causale" CHECKTYPE REQUIRED
FI S0 END
KE 2
US %CBP KE 2 STRING 102 50
IN S0 102 BEGIN
DI "Descrizione @50" S0 PROMPT 2 4 "Descrizione "
DI "Codice" CODTAB HELP "Descrizione della causale"
CO OU 101 FIELD S0
CH REQUIRED KEY 2
EN USE %CBP KEY 2
EN INPUT S0 102
ENDMASK DISPLAY "Descrizione @50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT 101
CHECKTYPE REQUIRED
END
ENDPAGE
ENDMASK