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.33/sirio/CAMPO/campo into R_10_00

Browse Source
This commit is contained in:
Simone Palacino 2019-03-25 11:20:32 +01:00
commit 0404ad3813
16 changed files with 236 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -0,0 +1,4 @@
ca3.exe
Corretta selezione commessa nella stampa rendiconto. Venivano comprese anche le commesse con lo stesso prefisso
(Es. CV18MPR50579E2 entrava in CV18MPR50579 e CV18MB250579E2 entrava in CV18MB250579

27
cd/test/ca0742a.ini Normal file
View File

@ -0,0 +1,27 @@
[Main]
Demo=0
[ca1]
Edit_106 = ca0 -3
Edit_107 = ca2 -0
Edit_146 = ca0 -4
Edit_147 = ca0 -5
Edit_148 = ca0 -6
Edit_149 = ca0 -7
File(26) = ca3.exe|X
Patch = 742
Versione = 21511200
[ca]
Data = 06-06-2016
Descrizione = Contabilita' Analitica
Dischi = 1
Moduli = ba,cg
OEM =
Patch = 742
PostProcess =
PreProcess =
Prezzo(1) =
Prezzo(2) =
Versione = 21511200

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

Binary file not shown.

5
cd/test/cg0742.txt Normal file
View File

@ -0,0 +1,5 @@
cg3.exe
cg2100c.msk
cg4.exe
Allineamento con ultima compilazione di xvt

96
cd/test/cg0742a.ini Normal file
View File

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

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

Binary file not shown.

2
cd/test/fp0742.txt Normal file
View File

@ -0,0 +1,2 @@
fp0.exe
fp0100a.msk

20
cd/test/fp0742a.ini Normal file
View File

@ -0,0 +1,20 @@
[Main]
Demo=0
[fp1]
File(0) = fp0.exe|X
File(1) = fp0100a.msk|X
Patch = 742
Versione = 21511200
[fp]
Data = 21-03-2019
Descrizione = Fattura Elettronica
Dischi = 1
Moduli = cg,ve
OEM =
Patch = 742
PostProcess =
PreProcess =
Versione = 21511200

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

Binary file not shown.

2
cd/test/sy0742.txt Normal file
View File

@ -0,0 +1,2 @@
xvaga.dll
xvtdb.dll

22
cd/test/sy0742a.ini Normal file
View File

@ -0,0 +1,22 @@
[Main]
Demo=0
[sy1]
File(52) = xvaga.dll|X
File(53) = xvtdb.dll|X
Patch = 0742
Versione = 21511200
[sy]
Data = 21-03-2019
Descrizione = Sistema
Dischi = 1
Moduli =
OEM =
Patch = 742
PostProcess =
PreProcess =
Prezzo(1) =
Prezzo(2) =
Versione = 21511200

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

Binary file not shown.

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

@ -0,0 +1,4 @@
tf0.exe
tf0100a.msk
Allineamento con ultima compilazione di xvt

20
cd/test/tf0742a.ini Normal file
View File

@ -0,0 +1,20 @@
[Main]
Demo=0
[tf1]
File(0) = tf0.exe|X
File(1) = tf0100a.msk|X
Patch = 0742
Versione = 21511200
[tf]
Data = 21-03-2019
Descrizione = Trasferimento fatture
Dischi = 1
Moduli = cg
OEM =
Patch = 742
PostProcess =
PreProcess =
Versione = 21511200

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

Binary file not shown.

45
src/ca/ca3700.cpp
View File

@ -1653,11 +1653,8 @@ void TPrint_rendiconto_ca_recordset::crea_righe_da_rmovana(TLocalisamfile& tmp,
{
//legge la testata iniziale
const long numreg = rmovana.get_long(RMOVANA_NUMREG);
#ifdef DBG
if (numreg == 32736)
const int cazzissimo = 1;
#endif
//se la testata e' cambiata, allora ha cambiato movana e quindi le righe da compattare sono..
//se la testata e' cambiata, allora ha cambiato movana e quindi le righe da compattare sono..
//..quelle che ha gia' messo nell'array delle righe_attuali
if (numreg != old_numreg)
{
@ -1692,7 +1689,21 @@ void TPrint_rendiconto_ca_recordset::crea_righe_da_rmovana(TLocalisamfile& tmp,
for (cur_rmovana = 0; cur_rmovana.pos() < rmovana_items; ++cur_rmovana)
{
if (!pi.addstatus(1))
break;
break;
const TString & cms = cur_rmovana.curr().get(RMOVANA_CODCMS);
if (cms != _codcms)
{
#ifdef DBG
const long numreg = rmovana.get_long(RMOVANA_NUMREG);
const TRectype & movana = cache().get(LF_MOVANA, numreg);
TString msg; msg << "Mov - Commessa " << _codcms << " - Scartato " << movana.get(MOVANA_DCODNUM) << "." << movana.get_int(MOVANA_DANNO) << "." << movana.get_int(MOVANA_DNDOC) << " - Commessa " << cms;
log.log(2, msg);
#endif
continue;
}
scrive_riga(tmp, rmovana, movana, NULL, log);
}
}
@ -1706,9 +1717,9 @@ int TPrint_rendiconto_ca_recordset::crea_filtro_rdoc(const TMask& msk, TRectype&
{
int cur_key = 6;
//intanto sistema darec arec
da_rdoc.put(RDOC_CODCMS, _codcms);
da_rdoc.put(RDOC_CODCMS, _codcms);
da_rdoc.put(RDOC_CODCOSTO, _codcosto);
a_rdoc = da_rdoc;
a_rdoc = da_rdoc;
//se c'è solo cdc..
if (_codcms.blank() && _codcosto.full())
@ -1822,7 +1833,8 @@ void TPrint_rendiconto_ca_recordset::crea_righe_da_rdoc(TLocalisamfile& tmp, con
//La riga esaminata deve avere una testata valida!!!!Se la testata non esiste va saltata..
//..la riga
const TRectype& curr_doc = cur_rdoc.curr(LF_DOC);
if (!curr_doc.empty())
if (!curr_doc.empty())
{
//controlla se il documento cui appartiene la rigadoc e' stato contabilizzato;
//se e' stato contabilizzato lo salta in quanto la riga documento apparira' attraverso le righe
@ -1833,11 +1845,22 @@ void TPrint_rendiconto_ca_recordset::crea_righe_da_rdoc(TLocalisamfile& tmp, con
//..ricevere/emettere, vanno ri-contabilizzate lo stesso anche se lo sono gia' state. Il loro..
//..importo verra' poi messo nel fatturato.
const TRectype& curr_rdoc = cur_rdoc.curr();
const TString & cms = curr_rdoc.get(RDOC_CODCMS);
const TString& rdoc_dacodnum = curr_rdoc.get(RDOC_DACODNUM);
#ifdef DBG
if (rdoc_dacodnum == "FDE" && curr_rdoc.get_int(RDOC_ANNO) == 2011 && curr_rdoc.get_int(RDOC_NDOC) == 3)
const int culone = 1;
if (curr_rdoc.get(RDOC_CODNUM) == "F01" && curr_rdoc.get_int(RDOC_ANNO) == 2018 && curr_rdoc.get_int(RDOC_NDOC) == 5350)
const int culone = 1;
#endif
if (cms != _codcms)
{
#ifdef DBG
TString msg; msg << "Doc - Commessa " << _codcms << " - Scartato " << curr_rdoc.get(RDOC_CODNUM) << "." << curr_rdoc.get_int(RDOC_ANNO) << "." << curr_rdoc.get_int(RDOC_NDOC) << " - Commessa " << cms;
log.log(2, msg);
#endif
continue;
}
const bool is_special_doc = _num_fdr.find(rdoc_dacodnum) >= 0;
//documento non contabilizzato o fattura da ricevere con numerazione configurata speciale
if (numregca == 0) // || is_special_doc)