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:
parent
0500c3ce1d
commit
b46459b21e
@ -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
|
||||||
|
@ -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
|
||||||
|
@ -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;
|
||||||
|
@ -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
|
||||||
|
Loading…
x
Reference in New Issue
Block a user