root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : 12.0 548

Browse Source 
Files correlati     : m770
Commento            : Sistemata esportazione percipienti esteri

git-svn-id: svn://10.65.10.50/branches/R_10_00@24416 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
mtollari 2018-03-06 14:35:54 +00:00
parent ff5a6973d7
commit 7eedd37a8c
1 changed files with 64 additions and 53 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

117
src/m770/777200.cpp
View File

@ -601,8 +601,13 @@ bool TTrasferimentoCU::append_record_b()
bool TTrasferimentoCU::append_record_d(const TRectype& qla, TLog_report& log)
{
const char tipoanag = qla.get_char("TIPOA");
const long codanagr = qla.get_long("CODANAGR");
const char tipoanag = qla.get_char("TIPOA");
const long codanagr = qla.get_long("CODANAGR");
#ifdef DBG
if (tipoanag == 'F' && codanagr == 1705)
bool tolla = true;
#endif
if (tipoanag < 'F' || codanagr <= 0)
{
TString msg; msg.format(FR("Scartato percipiente non valido %c/%ld"), tipoanag, codanagr);
@ -666,8 +671,11 @@ bool TTrasferimentoCU::append_record_d(const TRectype& qla, TLog_report& log)
rec.np_put("DA002003", perc.nome());
rec.np_put("DA002004", perc.sesso());
rec.np_put("DA002005", perc.data_nascita());
rec.np_put("DA002006", perc.comune_nascita());
rec.np_put("DA002007", perc.provincia_nascita());
if (perc.italiano())
{
rec.np_put("DA002006", perc.comune_nascita());
rec.np_put("DA002007", perc.provincia_nascita());
}
}
else
{
@ -683,66 +691,69 @@ bool TTrasferimentoCU::append_record_d(const TRectype& qla, TLog_report& log)
rec.np_put("DA002010", da2010);
const TString& causale = qla.get("CAUSALE");
TString4 cod_com, cod_fus = perc.codice_comune_residenza();
rec.np_put("DA002020", perc.comune_residenza());
rec.np_put("DA002021", perc.provincia_residenza());
// Per quest'anno utilizzamo un controllo del piffero per valorizzare il campo "Fusione Comuni"
if (cod_fus == "F476" || cod_fus == "F476")
if (perc.stato_residenza_ISO() == "IT")
{
cod_com = "M368";
TString4 cod_com, cod_fus = perc.codice_comune_residenza();
rec.np_put("DA002020", perc.comune_residenza());
rec.np_put("DA002021", perc.provincia_residenza());
// Per quest'anno utilizzamo un controllo del piffero per valorizzare il campo "Fusione Comuni"
if (cod_fus == "F476" || cod_fus == "F476")
{
cod_com = "M368";
}
else if (cod_fus == "G638" || cod_fus == "H092" || cod_fus == "D506")
{
cod_com = "M375";
}
else if (cod_fus == "A012" || cod_fus == "D235")
{
cod_com = "M376";
}
else if (cod_fus == "H171" || cod_fus == "E444" || cod_fus == "G427")
{
cod_com = "M383";
}
else if (cod_fus == "F555" || cod_fus == "H721" || cod_fus == "I670")
{
cod_com = "M380";
}
else if (cod_fus == "F402" || cod_fus == "H911")
{
cod_com = "M378";
}
else if (cod_fus == "H980" || cod_fus == "G715")
{
cod_com = "M377";
}
else if (cod_fus == "A639" || cod_fus == "G089" || cod_fus == "G537" || cod_fus == "H886")
{
cod_com = "M379";
}
else if (cod_fus == "G637" || cod_fus == "G609")
{
cod_com = "M382";
}
else
{
cod_com = cod_fus;
cod_fus.cut(0);
}
rec.np_put("DA002022", cod_com);
rec.np_put("DA002023", cod_fus);
}
else if (cod_fus == "G638" || cod_fus == "H092" || cod_fus == "D506")
{
cod_com = "M375";
}
else if (cod_fus == "A012" || cod_fus == "D235")
{
cod_com = "M376";
}
else if (cod_fus == "H171" || cod_fus == "E444" || cod_fus == "G427")
{
cod_com = "M383";
}
else if (cod_fus == "F555" || cod_fus == "H721" || cod_fus == "I670")
{
cod_com = "M380";
}
else if (cod_fus == "F402" || cod_fus == "H911")
{
cod_com = "M378";
}
else if (cod_fus == "H980" || cod_fus == "G715")
{
cod_com = "M377";
}
else if (cod_fus == "A639" || cod_fus == "G089" || cod_fus == "G537" || cod_fus == "H886")
{
cod_com = "M379";
}
else if (cod_fus == "G637" || cod_fus == "G609")
{
cod_com = "M382";
}
else
{
cod_com = cod_fus;
cod_fus.cut(0);
}
rec.np_put("DA002022", cod_com);
rec.np_put("DA002023", cod_fus);
// rec.np_put("DA002030", ""); // Codice fiscale del rappresentante un incapace
if (perc.estero())
{
rec.np_put("DA002040", perc.partita_IVA());
rec.np_put("DA002040", perc.codice_fiscale_estero());
rec.np_put("DA002041", perc.comune_residenza());
rec.np_put("DA002042", perc.indirizzo_residenza());
// 2015
//rec.np_put("DA002043", perc.stato_estero_UNICO());
// 2017
rec.np_put("DA002044", perc.stato_estero_UNICO());
TString esteroUnico = perc.stato_estero_UNICO();
esteroUnico.lpad(16, ' ');
rec.np_put("DA002044", esteroUnico);
}
rec.np_put("DA003001", _data_tra);