Patch level : 12.0 286

Files correlati     : 
Commento            : Aggiornati codici da un carattere a 2 per sistemare problemi di incompatibilità con la patch precedente


git-svn-id: svn://10.65.10.50/branches/R_10_00@23298 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
mtollari 2016-09-20 09:56:35 +00:00
parent 2e4b7d8eb6
commit 57ddb33a2c
15 changed files with 133 additions and 133 deletions

View File

@ -370,28 +370,28 @@ BEGIN
END END
// MAI VISUALIZZATO // MAI VISUALIZZATO
STRING F_TABCAUSQUASC 1 STRING F_TABCAUSQUASC 2
BEGIN BEGIN
PROMPT 80 80 "" PROMPT 80 80 ""
FLAGS "H" FLAGS "H"
END END
// MAI VISUALIZZATO // MAI VISUALIZZATO
STRING F_TABCAUSQUASE 1 STRING F_TABCAUSQUASE 2
BEGIN BEGIN
PROMPT 80 80 "" PROMPT 80 80 ""
FLAGS "H" FLAGS "H"
END END
// MAI VISUALIZZATO // MAI VISUALIZZATO
STRING F_TABCAUSQUASF 1 STRING F_TABCAUSQUASF 2
BEGIN BEGIN
PROMPT 80 80 "" PROMPT 80 80 ""
FLAGS "H" FLAGS "H"
END END
// MAI VISUALIZZATO // MAI VISUALIZZATO
STRING F_TABCAUSQUASG 1 STRING F_TABCAUSQUASG 2
BEGIN BEGIN
PROMPT 80 80 "" PROMPT 80 80 ""
FLAGS "H" FLAGS "H"

View File

@ -146,15 +146,15 @@ void TRighe_riepilogo::genera_la(TRectype& quadro, const TRectype& riga, const T
bool TRighe_riepilogo::add_riga_pag(const TRectype& riga, const TRectype& scheda) bool TRighe_riepilogo::add_riga_pag(const TRectype& riga, const TRectype& scheda)
{ {
const TString4 codcaus = scheda.get(SPR_CODCAUS); const TString8 codcaus = scheda.get(SPR_CODCAUS);
const char causqua = toupper(scheda.get_char(SPR_CAUSQUA)); const TString8 causqua = scheda.get(SPR_CAUSQUA);
// cerca riga compatibile // cerca riga compatibile
int i = 0; int i = 0;
for (i = last(); i >= 0; i--) for (i = last(); i >= 0; i--)
{ {
const TRectype* rr = (const TRectype*)objptr(i); const TRectype* rr = (const TRectype*)objptr(i);
if (rr->get_char("CAUSALE") == causqua) if (rr->get("CAUSALE") == causqua)
break; break;
} }
if (i < 0) if (i < 0)

View File

@ -153,7 +153,7 @@ bool TForm770::validate(TForm_item &cf, TToken_string &s)
if (code == "_SOLO_CAUS_M") if (code == "_SOLO_CAUS_M")
{ {
const TRectype& curr = relation()->curr(); const TRectype& curr = relation()->curr();
if (!curr.get("CAUSALE").starts_with("M") || curr.get_real("IMPONIBILE") <= 5000) if (!curr.get("CAUSALE").starts_with("M") || curr.get_real("IMPONIBILE") <= real(5000.0))
cf.set(""); cf.set("");
return true; return true;
} }

View File

@ -1,3 +1,3 @@
120 120
1 1
m770/quadrodb|0|0|117|4|Quadro D bis 770||| m770/quadrodb|0|0|118|0|Quadro D bis 770|||

View File

@ -5,7 +5,7 @@ TIPOA|1|1|0|Tipo anagrafica (Sempre 'F')
CODANAGR|3|5|0|Codice anagrafica CODANAGR|3|5|0|Codice anagrafica
NPROG|2|4|0|Numero progressivo di riga NPROG|2|4|0|Numero progressivo di riga
CODCAUS|9|2|0|Codice causale CODCAUS|9|2|0|Codice causale
CAUSALE|1|1|0|15 - Causale CAUSALE|1|2|0|15 - Causale
TOTALE|4|18|0|16 - Ammontare lordo corrisposto TOTALE|4|18|0|16 - Ammontare lordo corrisposto
SOMME|4|18|0|17 - Somme non soggette a ritenuta SOMME|4|18|0|17 - Somme non soggette a ritenuta
IMPONIBILE|4|18|0|19 - Imponibile IMPONIBILE|4|18|0|19 - Imponibile

View File

@ -1,3 +1,3 @@
61 61
1 1
m770/quadroc|||192|0|Quadro C 770||| m770/quadroc|0|0|193|0|Quadro C 770|||

View File

@ -7,7 +7,7 @@ NPROG|2|4|0|Numero progressivo
GENERATA|8|1|0|Riga generata dalle schede GENERATA|8|1|0|Riga generata dalle schede
CODCAUS|9|2|0|Codice causale CODCAUS|9|2|0|Codice causale
PERC|4|6|2|Aliquota applicata PERC|4|6|2|Aliquota applicata
CAUSALE|1|1|0|11 - Causale quadro C CAUSALE|1|2|0|11 - Causale quadro C
TASSAZIONE|6|1|0|12 - Tassazione operata TASSAZIONE|6|1|0|12 - Tassazione operata
AMMLORDO|4|18|0|13 - Ammontare lordo corrisposto AMMLORDO|4|18|0|13 - Ammontare lordo corrisposto
CONTROBB|4|18|0|14 - Contributi obbligatori CONTROBB|4|18|0|14 - Contributi obbligatori

View File

@ -1,3 +1,3 @@
62 62
1 1
m770/quadrod|0|0|116|4|Quadro D 770||| m770/quadrod|0|0|117|0|Quadro D 770|||

View File

@ -5,7 +5,7 @@ TIPOA|1|1|0|Tipo anagrafica (Sempre 'F')
CODANAGR|3|5|0|Codice anagrafica CODANAGR|3|5|0|Codice anagrafica
NPROG|2|4|0|Numero progressivo di riga NPROG|2|4|0|Numero progressivo di riga
CODCAUS|9|2|0|Codice causale CODCAUS|9|2|0|Codice causale
CAUSALE|1|1|0|15 - Causale CAUSALE|1|2|0|15 - Causale
TOTALE|4|18|2|16 - Ammontare lordo corrisposto TOTALE|4|18|2|16 - Ammontare lordo corrisposto
SOMME|4|18|2|17 - Somme non soggette a ritenuta SOMME|4|18|2|17 - Somme non soggette a ritenuta
IMPONIBILE|4|18|2|19 - Imponibile IMPONIBILE|4|18|2|19 - Imponibile

View File

@ -1,3 +1,3 @@
63 63
1 1
m770/quadrod1|0|0|116|4|Quadro D1 770||| m770/quadrod1|0|0|117|0|Quadro D1 770|||

View File

@ -5,7 +5,7 @@ TIPOA|1|1|0|Tipo anagrafica (sempre 'F')
CODANAGR|3|5|0|Codice anagrafica CODANAGR|3|5|0|Codice anagrafica
NPROG|2|4|0|Numero progrssivo riga NPROG|2|4|0|Numero progrssivo riga
CODCAUS|9|2|0|Codice causale CODCAUS|9|2|0|Codice causale
CAUSALE|7|1|0|11 - Causale CAUSALE|1|2|0|11 - Causale
TOTALE|4|18|2|12 - Ammontare lordo corrisposto TOTALE|4|18|2|12 - Ammontare lordo corrisposto
QUOTAPRO|4|18|2|14 - Quota provvigioni QUOTAPRO|4|18|2|14 - Quota provvigioni
SPESEANT|4|18|2|13 - Spese anticipate SPESEANT|4|18|2|13 - Spese anticipate

View File

@ -1,3 +1,3 @@
64 64
1 1
m770/quadroe|||98|0|Quadro E 770||| m770/quadroe|0|0|99|0|Quadro E 770|||

View File

@ -5,7 +5,7 @@ TIPOA|1|1|0|Natura giuridica del percipiente
CODANAGR|3|5|0|Codice anagrafico CODANAGR|3|5|0|Codice anagrafico
NPROG|2|4|0|Numero progressivo di riga NPROG|2|4|0|Numero progressivo di riga
CODCAUS|9|2|0|Codice causale CODCAUS|9|2|0|Codice causale
CAUSALE|7|1|0|11 - Causale quadro CAUSALE|1|2|0|11 - Causale quadro
IMPONIBILE|4|18|2|12 - Imponibile corrisposto IMPONIBILE|4|18|2|12 - Imponibile corrisposto
PERC|4|6|2|13 - Aliquota PERC|4|6|2|13 - Aliquota
IMPORTO|4|18|2|14 - Ritenute operate IMPORTO|4|18|2|14 - Ritenute operate

View File

@ -1,3 +1,3 @@
65 65
1 1
m770/quadroe1|||98|0|Quadro E1 770||| m770/quadroe1|0|0|99|0|Quadro E1 770|||

View File

@ -5,7 +5,7 @@ TIPOA|1|1|0|Natura giuridica
CODANAGR|3|5|0|Codice anagrafica CODANAGR|3|5|0|Codice anagrafica
NPROG|2|4|0|Numero progrssivo i riga NPROG|2|4|0|Numero progrssivo i riga
CODCAUS|9|2|0|Codice causale CODCAUS|9|2|0|Codice causale
CAUSALE|7|1|0|11 - Causale quadro CAUSALE|1|2|0|11 - Causale quadro
SOMME|4|18|2|12 - Somme corrisposte SOMME|4|18|2|12 - Somme corrisposte
AMMONTARE|4|18|2|13 - Ammontare complessivo dei premi riscossi AMMONTARE|4|18|2|13 - Ammontare complessivo dei premi riscossi
PERC|4|6|2|14 - Aliquota PERC|4|6|2|14 - Aliquota