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

Merge branch 'R_10_00' of http://10.65.20.17:7990/scm/campo/campo into R_10_00

Browse Source
This commit is contained in:
Simone Palacino 2019-02-14 17:23:36 +01:00
commit 2ce1d2274b
26 changed files with 702 additions and 834 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
cd/test/770698.txt Normal file
View File

@ -0,0 +1,4 @@
77tbca7.msk
777.exe
Certificazione unica (CU) 2019

32
cd/test/770698a.ini Normal file
View File

@ -0,0 +1,32 @@
[Main]
Demo=0
[771]
File(121) = 77tbca7.msk|X
Patch = 698
Versione = 21511200
[777]
File(134) = 777.exe|X
Patch = 698
Versione = 21511200
[7799]
Kill(0) = batbca7.msk|x
Kill(1) = batbcaf.msk|x
Kill(2) = batbent.msk|x
[77]
Data = 06-06-2016
Descrizione = Percipienti (Mod.770)
Dischi = 1
Edit_4 = 770 -3
Moduli = ba
OEM =
Patch = 698
PostProcess =
PreProcess =
Prezzo(1) =
Prezzo(2) =
Versione = 21511200

BIN
cd/test/770698a1.zip Normal file
View File

Binary file not shown.

3
cd/test/ba0698.txt Normal file
View File

@ -0,0 +1,3 @@
ba8.exe
Modificata esportazione in excel

34
cd/test/ba0698a.ini Normal file
View File

@ -0,0 +1,34 @@
[Main]
Demo=0
[ba1]
Edit_4 = ba3 -0
Edit_5 = ba3 -0
Edit_6 = ba4 -1
File(76) = ba8.exe|X
Patch = 698
Versione = 21511200
[ba99]
Kill(0) = wxmsw240.dll|x
Kill(1) = batbsce.txt|x
Kill(2) = bastfsc.rep|x
Kill(3) = bastfsc.msk|x
Kill(4) = bastcms.msk|x
Kill(5) = bastcms.rep|x
Kill(6) = bastuue.rep|x
Kill(7) = bastuue.msk|x
[ba]
Data = 24-05-2018
Descrizione = Base
Dischi = 1
Moduli = sy
OEM =
Patch = 698
PostProcess = bainst -0 BA
PreProcess =
Prezzo(1) =
Prezzo(2) =
Versione = 21511200

BIN
cd/test/ba0698a1.zip Normal file
View File

Binary file not shown.

4
cd/test/ba0699.txt Normal file
View File

@ -0,0 +1,4 @@
ba4200b.msk
ba4200c.msk
Certificazione unica (CU) 2019

35
cd/test/ba0699a.ini Normal file
View File

@ -0,0 +1,35 @@
[Main]
Demo=0
[ba1]
Edit_4 = ba3 -0
Edit_5 = ba3 -0
Edit_6 = ba4 -1
File(54) = ba4200b.msk|X
File(55) = ba4200c.msk|X
Patch = 699
Versione = 21511200
[ba99]
Kill(0) = batbsce.txt|x
Kill(1) = wxmsw240.dll|x
Kill(2) = bastcms.rep|x
Kill(3) = bastcms.msk|x
Kill(4) = bastfsc.msk|x
Kill(5) = bastfsc.rep|x
Kill(6) = bastuue.msk|x
Kill(7) = bastuue.rep|x
[ba]
Data = 12-05-2017
Descrizione = Base
Dischi = 1
Moduli = sy
OEM =
Patch = 699
PostProcess = bainst -0 BA
PreProcess =
Prezzo(1) =
Prezzo(2) =
Versione = 21511200

BIN
cd/test/ba0699a1.zip Normal file
View File

Binary file not shown.

3
cd/test/cg0698.txt Normal file
View File

@ -0,0 +1,3 @@
cg4.exe
Le righe IVA di tipo non soggetto e con competenza precedente non venivano incluse in liquidazione

94
cd/test/cg0698a.ini Normal file
View File

@ -0,0 +1,94 @@
[Main]
Demo=0
[cg1]
Edit_23 = cg2 -0
File(39) = cg4.exe|X
Patch = 698
Versione = 21511200
[cg99]
Kill(0) = bastntb.msk|x
Kill(1) = batbntb.msk|x
Kill(2) = batbpdb.msk|x
Kill(3) = batbivd.msk|x
Kill(4) = batbmsp.msk|x
Kill(5) = batbvet.msk|x
Kill(6) = batbcve.msk|x
Kill(7) = batbndo.msk|x
Kill(8) = bastcve.rep|x
Kill(9) = batbtit.msk|x
Kill(10) = bastver.rep|x
Kill(11) = bastpor.rep|x
Kill(12) = batbarb.msk|x
Kill(13) = batbind.msk|x
Kill(14) = bastcve.msk|x
Kill(15) = bastarb.msk|x
Kill(16) = batbleg.msk|x
Kill(17) = bastscc.rep|x
Kill(18) = bastscc.msk|x
Kill(19) = cgtbcon.msk|x
Kill(20) = bastcco.msk|x
Kill(21) = bastver.msk|x
Kill(22) = batbpor.msk|x
Kill(23) = bastvet.rep|x
Kill(24) = batbcfi.msk|x
Kill(25) = batbdpn.msk|x
Kill(26) = batbscc.msk|x
Kill(27) = bastntb.rep|x
Kill(28) = bastarb.rep|x
Kill(29) = batbesc.msk|x
Kill(30) = bastivd.msk|x
Kill(31) = bastzon.rep|x
Kill(32) = bastcco.rep|x
Kill(33) = bastmsp.msk|x
Kill(34) = batbzon.msk|x
Kill(35) = bastesc.rep|x
Kill(36) = bastdpn.msk|x
Kill(37) = batbcco.msk|x
Kill(38) = bastzon.msk|x
Kill(39) = bastleg.msk|x
Kill(40) = batblia.msk|x
Kill(41) = bastleg.rep|x
Kill(42) = bastdpn.rep|x
Kill(43) = bastndo.rep|x
Kill(44) = batbinl.msk|x
Kill(45) = batbtra.msk|x
Kill(46) = bastreg.msk|x
Kill(47) = batbreg.msk|x
Kill(48) = bastvet.msk|x
Kill(49) = bastcam.msk|x
Kill(50) = batbins.msk|x
Kill(51) = bastivd.rep|x
Kill(52) = batbnot.msk|x
Kill(53) = bastpdb.msk|x
Kill(54) = bastnot.msk|x
Kill(55) = bastcfi.rep|x
Kill(56) = bastnot.rep|x
Kill(57) = bastpdb.rep|x
Kill(58) = bastndo.msk|x
Kill(59) = bastesc.msk|x
Kill(60) = bastpor.msk|x
Kill(61) = batbver.msk|x
Kill(62) = batblia.msk|x
Kill(63) = batbdel.msk|x
Kill(64) = bastcam.rep|x
Kill(65) = bastcfi.msk|x
Kill(66) = batbcam.msk|x
Kill(67) = batblbu.msk|x
Kill(68) = bastmsp.rep|x
Kill(69) = bastreg.rep|x
[cg]
Data = 06-06-2016
Descrizione = Contabilita' Generale
Dischi = 1
Moduli = ba,pr9
OEM =
Patch = 698
PostProcess = bainst -0 CG
PreProcess =
Prezzo(1) =
Prezzo(2) =
Versione = 21511200

BIN
cd/test/cg0698a1.zip Normal file
View File

Binary file not shown.

3
cd/test/ve0698.txt Normal file
View File

@ -0,0 +1,3 @@
ve0200d.msk
Ricompilata la maschera ve0200d

134
cd/test/ve0698a.ini Normal file
View File

@ -0,0 +1,134 @@
[Main]
Demo=0
[ve9]
Edit_163 = ve0 -4
Edit_33 = ve0 -0
Edit_4 = ve0 -4
Edit_47 = ve2 -3
Edit_5 = ve0 -4
File(147) = ve0200d.msk|X
Patch = 0698
Versione = 21511200
[ve99]
Kill(0) = batbcld.msk|x
Kill(1) = bastspp.rep|x
Kill(2) = batbgmc.msk|x
Kill(3) = bastbnp.rep|x
Kill(4) = bastasf.rep|x
Kill(5) = bastabe.msk|x
Kill(6) = bastprs.msk|x
Kill(7) = batbcra.msk|x
Kill(8) = ve7300a.msk|x
Kill(9) = bastcra.rep|x
Kill(10) = batbfid.msk|x
Kill(11) = bastctr.rep|x
Kill(12) = ve7200a.frm|x
Kill(13) = batbgsa.msk|x
Kill(14) = batbgcg.msk|x
Kill(15) = batbrfa.msk|x
Kill(16) = eftbbnp.msk|x
Kill(17) = bastbnp.msk|x
Kill(18) = bastimb.rep|x
Kill(19) = batbfrr.msk|x
Kill(20) = ve7701a.ini|x
Kill(21) = batbcau.msk|x
Kill(22) = batbasf.msk|x
Kill(23) = bastgcg.msk|x
Kill(24) = basteld.rep|x
Kill(25) = bastgca.rep|x
Kill(26) = bastprs.rep|x
Kill(27) = bastfrd.rep|x
Kill(28) = batbfrm.msk|x
Kill(29) = bastnum.rep|x
Kill(30) = bastctr.msk|x
Kill(31) = bastfrr.msk|x
Kill(32) = basteld.msk|x
Kill(33) = bastcaa.rep|x
Kill(34) = bastfrd.msk|x
Kill(35) = bastcau.msk|x
Kill(36) = baststd.rep|x
Kill(37) = ve7.exe|x
Kill(38) = ve7500a.msk|x
Kill(39) = batbctr.msk|x
Kill(40) = bastcra.msk|x
Kill(41) = batbnum.msk|x
Kill(42) = baststd.msk|x
Kill(43) = batbgca.msk|x
Kill(44) = bastrfa.msk|x
Kill(45) = bastimb.msk|x
Kill(46) = basttip.rep|x
Kill(47) = bastrfc.rep|x
Kill(48) = ve7600a.msk|x
Kill(49) = batbtip.msk|x
Kill(50) = batbstd.msk|x
Kill(51) = batbfsa.msk|x
Kill(52) = bastgmc.msk|x
Kill(53) = ve7300a.frm|x
Kill(54) = bastums.msk|x
Kill(55) = bastfrr.rep|x
Kill(56) = batbcaa.msk|x
Kill(57) = bastfrm.rep|x
Kill(58) = bastspp.msk|x
Kill(59) = basttag.rep|x
Kill(60) = bastrfc.msk|x
Kill(61) = batbspp.msk|x
Kill(62) = ve7100a.msk|x
Kill(63) = ve7400conf.ini|x
Kill(64) = bastcau.rep|x
Kill(65) = efstbnp.rep|x
Kill(66) = basttag.msk|x
Kill(67) = batbprs.msk|x
Kill(68) = batbtag.msk|x
Kill(69) = bastabe.rep|x
Kill(70) = bastcaa.msk|x
Kill(71) = bastubi.rep|x
Kill(72) = batbubi.msk|x
Kill(73) = bastubi.msk|x
Kill(74) = bastgca.msk|x
Kill(75) = batbfca.msk|x
Kill(76) = basttri.msk|x
Kill(77) = ve7700a.msk|x
Kill(78) = batbrfc.msk|x
Kill(79) = ve7200a.msk|x
Kill(80) = batbums.msk|x
Kill(81) = bastfca.msk|x
Kill(82) = batbmre.msk|x
Kill(83) = ve7400a.ini|x
Kill(84) = bastasf.msk|x
Kill(85) = batbabe.msk|x
Kill(86) = basttri.rep|x
Kill(87) = bastfca.rep|x
Kill(88) = batbprv.msk|x
Kill(89) = bastfrm.msk|x
Kill(90) = batbbnp.msk|x
Kill(91) = efstbnp.msk|x
Kill(92) = bastums.rep|x
Kill(93) = bastnum.msk|x
Kill(94) = batbfrd.msk|x
Kill(95) = bastgmc.rep|x
Kill(96) = basttip.msk|x
Kill(97) = bastrfa.rep|x
Kill(98) = batbacr.msk|x
Kill(99) = batbimb.msk|x
Kill(100) = ve7400a.msk|x
Kill(101) = batbtri.msk|x
Kill(102) = batbeld.msk|x
Kill(103) = batbspt.msk|x
Kill(104) = bastgcg.rep|x
Kill(105) = batbpro.msk|x
[ve]
Data = 06-06-2016
Descrizione = Vendite
Dischi = 1
Moduli = ba,cg9,pr9,mg9,sv9,in9,ef9
OEM =
Patch = 0698
PostProcess = bainst -0 VE
PreProcess =
Prezzo(1) =
Prezzo(2) =
Versione = 21511200

BIN
cd/test/ve0698a1.zip Normal file
View File

Binary file not shown.

1079
exe/install.ini
View File

File diff suppressed because it is too large Load Diff

31
src/cg/cg4300.cpp
View File

@ -586,15 +586,10 @@ bool TLiquidazione_app::ch_year_handler(TMask_field& f, KEY key)
(wht)f.mask().get_int(CG43_RDB_VERS) : all);
TMask& msk = f.mask();
const int vers = msk.get_int(CG43_RDB_VERS);
int m = (vers == 3) ? msk.get_int(CG43_LST_TRIM) : msk.get_int(CG43_LST_MESE);
app()._is_liq_acconto = (m == 20);
if (app()._is_liq_acconto)
m = 12;
const int m = (vers == 3) ? msk.get_int(CG43_LST_TRIM) : msk.get_int(CG43_LST_MESE);
const TRectype & lim = app().get_lim(m);
const bool def = lim.get_bool("B1");
const bool calc = app()._is_liq_acconto || (!def && (lim.empty() || lim.get_bool("B0")));
const bool calc = !def && (lim.empty() || lim.get_bool("B0"));
msk.set(CG43_CHK_CALCULATE, app()._lim_cleared && calc, 0x3);
msk.set(CG43_CHK_FINAL, app()._lim_cleared && def, 0x3);
@ -695,11 +690,6 @@ bool TLiquidazione_app::what_freq_handler(TMask_field& f, KEY key)
if (key == K_SPACE)
{
int month = f.mask().get_int(CG43_LST_MESE);
app()._is_liq_acconto = (month == 20);
if (app()._is_liq_acconto)
month = 12;
if (f.get()[0] == '3') // trimestre intelligente
{
if (month > 3)
@ -788,11 +778,7 @@ bool TLiquidazione_app::chk_calculate_handler(TMask_field& f, KEY key)
TMask& m = f.mask();
// Abilita solo se il mese di ricalcolo e' != 13 (annuale) e non e' checkkato il campo
const int vers = m.get_int(CG43_RDB_VERS);
int mese = vers == 3 ? m.get_int(CG43_LST_TRIM) : m.get_int(CG43_LST_MESE);
app()._is_liq_acconto = (mese == 20);
if (app()._is_liq_acconto)
mese = 12;
const int mese = vers == 3 ? m.get_int(CG43_LST_TRIM) : m.get_int(CG43_LST_MESE);
const bool abilita = m.get_bool(CG43_CHK_CALCULATE) && mese != 13;
m.enable(CG43_LST_CALC, abilita);
}
@ -907,19 +893,10 @@ bool TLiquidazione_app::set_liquidazione()
// handlers have set everything
_month = _what == trimestre ? m.get_int(CG43_LST_TRIM) : m.get_int(CG43_LST_MESE);
app()._is_liq_acconto = (_month == 20);
if (app()._is_liq_acconto)
{
_month = 12;
_recalc = one;
}
else
_recalc = m.get_bool(CG43_CHK_CALCULATE) ? one : never;
_year = m.get(CG43_FLD_ANNO);
_date = m.get(CG43_FLD_DATA);
_isprint = m.get_bool(CG43_CHK_STAMPA);
_recalc = m.get_bool(CG43_CHK_CALCULATE) ? one : never;
_printonly = !m.get_bool(CG43_CHK_CALCULATE);
_definitiva = m.get_bool(CG43_CHK_FINAL);

1
src/cg/cg4300.h
View File

@ -304,7 +304,6 @@ class TLiquidazione_app : public TPrint_application
int _monthinatt; // mese inizio attivita' (serve per differita)
bool _lim_cleared;
bool _definitiva;
bool _is_liq_acconto;
bool _end_cassa;
real _diff_ven_ap, _diff_ven_ap_iva, _diff_acq_ap, _diff_acq_ap_iva;

6
src/cg/cg4300a.uml
View File

@ -27,16 +27,15 @@ BEGIN
CHECKTYPE REQUIRED
END
LIST CG43_LST_MESE 20
LIST CG43_LST_MESE 15
BEGIN
PROMPT 28 3 "Periodo "
HELP "Mese per cui effettuare il calcolo liquidazione"
ITEM "13|13a liquid."
ITEM "20|Acconto Dicembre"
FLAGS "MP"
END
LIST CG43_LST_TRIM 20
LIST CG43_LST_TRIM 15
BEGIN
PROMPT 28 3 "Periodo "
HELP "Trimestre di cui effettuare il calcolo liquidazione"
@ -45,7 +44,6 @@ BEGIN
ITEM "9|3 Trimestre "
ITEM "12|4 Trimestre"
ITEM "13|13a liquid."
ITEM "20|Acconto Dicembre"
END
BOOLEAN CG43_CHK_CALCULATE

10
src/cg/cg4302.cpp
View File

@ -57,8 +57,7 @@ bool TLiquidazione_app::is_month_ok(int x, int mtocalc) const
{
// per l'annuale ritorna true per tutti i mesi da liquidare
ret = x <= 13;
}
}
return ret;
}
@ -139,12 +138,7 @@ bool TLiquidazione_app::is_date_ok(const TDate& d, int month, int liqmonth, int
else // Nuova selezione dal 1998 in poi
{
if (month <= 12)
{
if (_is_liq_acconto)
return (regyear == year) && ((regmonth == month && liqmonth == 0) || (liqmonth == month)) && (d.day() <= _ver->giorno_acc());
else
return (regyear == year) && ((regmonth == month && liqmonth == 0) || (liqmonth == month));
}
return (regyear == year) && ((regmonth == month && liqmonth == 0) || (liqmonth == month));
else // Annuale, month == 13
return (regyear == year && liqmonth != 12) || (regyear == year + 1 && liqmonth == 12);
}

6
src/cg/cg4304.cpp
View File

@ -1439,9 +1439,6 @@ void TLiquidazione_app::set_firm(_DescrItem& d)
if (d._s2 == "T")
tim_title << format(FR(" del %d° Trimestre %s"), d._f1/3, (const char*) _year);
else
if (_is_liq_acconto)
tim_title << format(FR(" al %d %s %s"), _ver->giorno_acc(), itom(d._f1), (const char*)_year);
else
tim_title << format(FR(" del mese di %s %s"), itom(d._f1), (const char*)_year);
}
@ -1503,9 +1500,6 @@ void TLiquidazione_app::set_att(_DescrItem& d)
if (d._s4 == "T")
tim_title << format(FR(" del %d° Trimestre %s"), d._f1 / 3, (const char*)_year);
else
if (_is_liq_acconto)
tim_title << format(FR(" al %d %s %s"), _ver->giorno_acc(), itom(d._f1), (const char*)_year);
else
tim_title << format(FR(" del mese di %s %s"), itom(d._f1), (const char*)_year);
}

38
src/cg/cg4400.cpp
View File

@ -457,14 +457,7 @@ bool TStampa_registri_app::mask_mese (TMask_field& f, KEY k)
if (id == MESE) //Per stampa su libro unico
mese = f.mask().get_int(MESE);
if (id == FINO_A_MESE)
{
mese = m.get_int(FINO_A_MESE); //Per stampa su bollato
if (mese == 20)
mese = 12;
if (mese == 12)
m.show(TIPO_RIEPILOGATIVO);
else m.hide(TIPO_RIEPILOGATIVO);
}
if (id == MESE)
{
if (mese == 12)
@ -477,10 +470,13 @@ bool TStampa_registri_app::mask_mese (TMask_field& f, KEY k)
m.hide (TIPO_RIEPILOGATIVO);
m.hide (RIF_VID);
}
mese = m.get_int(FINO_A_MESE); //Per stampa su bollato
if (mese == 20)
mese = 12;
}
if (id == FINO_A_MESE)
{
if (mese == 12)
m.show (TIPO_RIEPILOGATIVO);
else m.hide (TIPO_RIEPILOGATIVO);
}
}
if (k==K_TAB && f.mask().is_running())
{
@ -605,11 +601,6 @@ bool TStampa_registri_app::mask_libun (TMask_field& f, KEY k)
const TString& cod = f.mask().get(CODICE_LIBRO_IVA);
int fino_a_mese = f.mask().get_int(MESE);
if (fino_a_mese == 12)
f.mask().show(TIPO_RIEPILOGATIVO);
else f.mask().hide(TIPO_RIEPILOGATIVO);
int anno = f.mask().get_int(ANNO);
bool ok = false;
int last_mese = 13;
@ -1642,10 +1633,8 @@ void TStampa_registri_app::set_page_tot_reg()
} // for
}
if (printed)
{
flush();
fine_mese();
}
if (_stampa_plafonds)
stampa_plafonds(rr);
}
@ -2127,7 +2116,7 @@ bool TStampa_registri_app::print_IVAxCassa(int da_month, int a_month)
return false; // Ho stampato qualcosa?
}
int flags = 0x06;
int flags = 0x0;
FOR_EACH_ARRAY_ITEM(_riga_prospettoXcassa, r, obj)
{
const TRiga& ri = *(const TRiga*)obj;
@ -3764,14 +3753,9 @@ bool TStampa_registri_app::set_print(int n)
}
else //stampe definitive
{
_fino_a_mese = m.get_int(FINO_A_MESE);
_stampa_acconto = (_fino_a_mese == 20);
if (_stampa_acconto)
_fino_a_mese = 12;
if (_tipo_stampa == bollato || _tipo_stampa == rif_giornale)
{
_fino_a_mese = m.get_int(FINO_A_MESE);
_data_da = TDate(1, 1, _annoIVA); // Meglio cosi'
}
else //stampa su libro unico
@ -3787,12 +3771,6 @@ bool TStampa_registri_app::set_print(int n)
int giorni_del_mese = 31;
if (_fino_a_mese == 12)
{
TInteressi_IVA_table i; i.read(_annoIVA, _fino_a_mese);
giorni_del_mese = i.get_int("I0");
if (giorni_del_mese == 0)
giorni_del_mese = 20;
if (!_stampa_acconto)
giorni_del_mese = 31;
_tipo_riepilogativo = m.get(TIPO_RIEPILOGATIVO)[0];
}

3
src/cg/cg4400.h
View File

@ -57,7 +57,6 @@ class TStampa_registri_app : public TPrintapp
long _u_stampata, _primast, __firm, _uprotivap, _ditta;
long _numini, _pagine_stampate;
int _fino_a_mese, _cod_un_loc;
bool _stampa_acconto;
int _annoIVA, _r, _stampa_width, _mese_ultima_liq, _mese_credito;
int _stampa_len, _stampa_mese, _size_header;
real _totale_doc, _credito;
@ -121,7 +120,7 @@ public:
bool ricalcola(int);
bool stampa_riepilogo(int);
void stampa_prospetto_riepilogo(tiporeg, const TString&, const TString&, const bool);
void stampa_progressivi(TRiga_array&, TRigaiva_array&, tiporeg, const int);
void stampa_progressivi(TRiga_array&, TRigaiva_array&, tiporeg, const bool);
void set_choice_limits(TMask&);
void build_ditte_sheet(int flags);
tiporeg cerca_reg(const TString&);

6
src/cg/cg4400a.uml
View File

@ -158,20 +158,18 @@ BEGIN
GROUP 3
END
LISTBOX FINO_A_MESE 20
LISTBOX FINO_A_MESE 10
BEGIN
PROMPT 3 9 "Fino al mese "
HELP "Mese fino al quale eseguire la stampa"
ITEM "20|Acconto di dicembre"
FLAGS "M"
GROUP 1
END
LISTBOX MESE 20
LISTBOX MESE 10
BEGIN
PROMPT 3 9 "Mese "
HELP "Mese di cui eseguire la stampa"
ITEM "20|Acconto di dicembre"
FLAGS "M"
GROUP 2
END

6
src/m770/777200.cpp
View File

@ -607,10 +607,6 @@ 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");
#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);
@ -667,8 +663,6 @@ bool TTrasferimentoCU::append_record_d(const TRectype& qla, TLog_report& log)
rec.np_put("DA001010", _codatt_dic);
// rec.np_put("DA001011", "1"); // Codice Sede ???
if (perc.codice_fiscale() == "BRTTMS98M18832Z")
int i = 1;
rec.np_put("DA002001", perc.codice_fiscale());
if (perc.fisica())
{

4
src/m770/777201.cpp
View File

@ -514,7 +514,7 @@ TReport_field& TCU_report::add_big_text(TReport_section& sec, int row, int col,
txt->set_type('T');
txt->set_picture(label);
txt->set_pos(CU_FORM_BORDER+col*100, row*100);
txt->set_size(strlen(label)*300, 200);
txt->set_size(strlen(label)*300, 300);
txt->set_pattern(PAT_HOLLOW);
txt->set_back_color(COLOR_INVALID);
txt->set_text_color(rgb);
@ -593,7 +593,7 @@ void TCU_report::create_logo(TReport_section& header)
TReport_field* txt = new TReport_field(&header);
txt->set_type('I');
txt->set("res/AgenziaEntrate.gif");
txt->set_pos(CU_FORM_BORDER, 800);
txt->set_pos(CU_FORM_BORDER, 900);
txt->set_size(1200, 200);
header.add(txt);
}