Merge remote-tracking branch 'origin/R_10_00' into R_10_00
This commit is contained in:
Simone Palacino
commit
37704d8ef8
5
cd/test/ve0818.txt
Normal file
5
cd/test/ve0818.txt
Normal file
@ -0,0 +1,5 @@
|
||||
ve6.exe
|
||||
ve0.exe
|
||||
|
||||
Nel caso di numero partita dal numero documento di riferimento è stato aggiunto il controllo che il fornitore sia lo stesso
|
||||
quando cerca il documento di riferimento sui documenti.
|
||||
130
cd/test/ve0818a.ini
Normal file
130
cd/test/ve0818a.ini
Normal file
@ -0,0 +1,130 @@
|
||||
[Main]
|
||||
Demo=0
|
||||
|
||||
[ve1]
|
||||
File(0) = ve0.exe|X
|
||||
File(93) = ve6.exe|X
|
||||
Patch = 818
|
||||
Versione = 21511200
|
||||
|
||||
[ve99]
|
||||
Kill(0) = batbimb.msk|x
|
||||
Kill(1) = batbacr.msk|x
|
||||
Kill(2) = batbums.msk|x
|
||||
Kill(3) = batbeld.msk|x
|
||||
Kill(4) = bastnum.msk|x
|
||||
Kill(5) = basttri.msk|x
|
||||
Kill(6) = batbfrm.msk|x
|
||||
Kill(7) = batbcra.msk|x
|
||||
Kill(8) = bastfrd.rep|x
|
||||
Kill(9) = bastcra.rep|x
|
||||
Kill(10) = ve7600a.msk|x
|
||||
Kill(11) = ve7300a.msk|x
|
||||
Kill(12) = bastfca.rep|x
|
||||
Kill(13) = batbspt.msk|x
|
||||
Kill(14) = basttip.rep|x
|
||||
Kill(15) = ve7700a.msk|x
|
||||
Kill(16) = bastimb.msk|x
|
||||
Kill(17) = baststd.msk|x
|
||||
Kill(18) = bastfrr.msk|x
|
||||
Kill(19) = ve7500a.msk|x
|
||||
Kill(20) = efstbnp.rep|x
|
||||
Kill(21) = batbtri.msk|x
|
||||
Kill(22) = batbrfa.msk|x
|
||||
Kill(23) = batbasf.msk|x
|
||||
Kill(24) = basteld.rep|x
|
||||
Kill(25) = bastasf.rep|x
|
||||
Kill(26) = batbmre.msk|x
|
||||
Kill(27) = ve7200a.msk|x
|
||||
Kill(28) = batbfrr.msk|x
|
||||
Kill(29) = bastrfc.rep|x
|
||||
Kill(30) = batbprv.msk|x
|
||||
Kill(31) = bastums.rep|x
|
||||
Kill(32) = bastcaa.msk|x
|
||||
Kill(33) = batbgca.msk|x
|
||||
Kill(34) = bastfca.msk|x
|
||||
Kill(35) = ve7.exe|x
|
||||
Kill(36) = ve7400conf.ini|x
|
||||
Kill(37) = bastctr.msk|x
|
||||
Kill(38) = bastrfa.rep|x
|
||||
Kill(39) = bastfrr.rep|x
|
||||
Kill(40) = batbfrd.msk|x
|
||||
Kill(41) = ve7200a.frm|x
|
||||
Kill(42) = bastfrm.rep|x
|
||||
Kill(43) = batbpro.msk|x
|
||||
Kill(44) = bastcau.msk|x
|
||||
Kill(45) = bastums.msk|x
|
||||
Kill(46) = basteld.msk|x
|
||||
Kill(47) = batbubi.msk|x
|
||||
Kill(48) = bastubi.rep|x
|
||||
Kill(49) = ve7400a.ini|x
|
||||
Kill(50) = batbtip.msk|x
|
||||
Kill(51) = basttri.rep|x
|
||||
Kill(52) = bastimb.rep|x
|
||||
Kill(53) = basttag.msk|x
|
||||
Kill(54) = bastasf.msk|x
|
||||
Kill(55) = bastrfa.msk|x
|
||||
Kill(56) = batbfid.msk|x
|
||||
Kill(57) = ve7100a.msk|x
|
||||
Kill(58) = batbspp.msk|x
|
||||
Kill(59) = bastrfc.msk|x
|
||||
Kill(60) = batbctr.msk|x
|
||||
Kill(61) = bastabe.rep|x
|
||||
Kill(62) = ve7300a.frm|x
|
||||
Kill(63) = batbcaa.msk|x
|
||||
Kill(64) = batbgcg.msk|x
|
||||
Kill(65) = bastprs.msk|x
|
||||
Kill(66) = bastubi.msk|x
|
||||
Kill(67) = bastgmc.msk|x
|
||||
Kill(68) = batbfsa.msk|x
|
||||
Kill(69) = batbstd.msk|x
|
||||
Kill(70) = bastnum.rep|x
|
||||
Kill(71) = bastgcg.msk|x
|
||||
Kill(72) = batbtag.msk|x
|
||||
Kill(73) = batbrfc.msk|x
|
||||
Kill(74) = batbnum.msk|x
|
||||
Kill(75) = ve7701a.ini|x
|
||||
Kill(76) = eftbbnp.msk|x
|
||||
Kill(77) = bastabe.msk|x
|
||||
Kill(78) = bastgca.rep|x
|
||||
Kill(79) = batbbnp.msk|x
|
||||
Kill(80) = basttag.rep|x
|
||||
Kill(81) = bastspp.msk|x
|
||||
Kill(82) = bastctr.rep|x
|
||||
Kill(83) = batbcau.msk|x
|
||||
Kill(84) = batbprs.msk|x
|
||||
Kill(85) = bastcaa.rep|x
|
||||
Kill(86) = bastcau.rep|x
|
||||
Kill(87) = bastgca.msk|x
|
||||
Kill(88) = ve7400a.msk|x
|
||||
Kill(89) = baststd.rep|x
|
||||
Kill(90) = batbabe.msk|x
|
||||
Kill(91) = efstbnp.msk|x
|
||||
Kill(92) = bastcra.msk|x
|
||||
Kill(93) = batbgmc.msk|x
|
||||
Kill(94) = bastfrd.msk|x
|
||||
Kill(95) = bastbnp.rep|x
|
||||
Kill(96) = basttip.msk|x
|
||||
Kill(97) = bastprs.rep|x
|
||||
Kill(98) = bastspp.rep|x
|
||||
Kill(99) = batbcld.msk|x
|
||||
Kill(100) = bastfrm.msk|x
|
||||
Kill(101) = batbgsa.msk|x
|
||||
Kill(102) = bastgmc.rep|x
|
||||
Kill(103) = bastbnp.msk|x
|
||||
Kill(104) = bastgcg.rep|x
|
||||
Kill(105) = batbfca.msk|x
|
||||
|
||||
[ve]
|
||||
Data = 03-05-2019
|
||||
Descrizione = Vendite
|
||||
Dischi = 1
|
||||
Moduli = ba,cg9,pr9,mg9,sv9,in9,ef9
|
||||
OEM =
|
||||
Patch = 818
|
||||
PostProcess = bainst -0 VE
|
||||
PreProcess =
|
||||
Prezzo(1) =
|
||||
Prezzo(2) =
|
||||
Versione = 21511200
|
||||
|
||||
BIN
cd/test/ve0818a1.zip
Normal file
BIN
cd/test/ve0818a1.zip
Normal file
Binary file not shown.
@ -537,6 +537,7 @@ static TBill _co_cliente, // conto clifo per movimento d'anticipo
|
||||
static bool _numpart_pro; // se true prende il numero rif. partita dal numero protocollo
|
||||
static bool _numpart_mon; // se true prende il numero rif. partita dal mese
|
||||
static char _part_type; // tipi di numero partita "D" codcumento, "P" protocollo IVA, "M" Mese
|
||||
static bool _part_acq_ndoc; // numero partita acquisti acquisti numero doc
|
||||
static bool _sc_enabled; // se true il saldaconto di ditta è abilitato
|
||||
static bool _in_enabled; // se true l'intra è abilitato
|
||||
static TToken_string* _search_seq = NULL;
|
||||
@ -858,8 +859,8 @@ bool TContabilizzazione::load_parameters()
|
||||
_sc_enabled = conf.get_bool("GesSal","cg");
|
||||
_in_enabled = dongle().active(INAUT);
|
||||
_numpart_pro = conf.get_bool("RifPro", "cg");
|
||||
_numpart_mon = conf.get_bool("RifMonth", "cg");
|
||||
_part_type = 'D';
|
||||
_numpart_mon = conf.get_bool("RifMonth", "cg");
|
||||
_part_type = 'D';
|
||||
if (_numpart_pro) _part_type = 'P';
|
||||
else
|
||||
if (_numpart_mon) _part_type = 'M';
|
||||
@ -2701,44 +2702,56 @@ error_type TContabilizzazione::write_scadenze(TDocumento& doc, bool recontabiliz
|
||||
// int anno = head.get_int(MOV_ANNOIVA);
|
||||
int anno = 0;
|
||||
TString8 numpart; // Max. 7 chars
|
||||
const TString4 tipocf = doc.get(DOC_TIPOCF);
|
||||
|
||||
if (doc.get(DOC_TIPOCF) == "F" || is_nc)
|
||||
if (tipocf == "F" || is_nc)
|
||||
{
|
||||
anno = doc.get_int(DOC_ANNORIF);
|
||||
anno = doc.get_int(DOC_ANNORIF);
|
||||
numpart = doc.get(DOC_NUMDOCRIF);
|
||||
|
||||
if (numpart.full())
|
||||
{
|
||||
TString4 codnum = doc.get(DOC_CODNUMRIF);
|
||||
TToken_string keydoc;
|
||||
if (numpart.full())
|
||||
{
|
||||
TString4 codnum = doc.get(DOC_CODNUMRIF);
|
||||
TToken_string keydoc;
|
||||
|
||||
if (codnum.blank())
|
||||
codnum = doc.get(DOC_CODNUM);
|
||||
if (anno <= 0)
|
||||
{
|
||||
const TDate ddr = doc.get_date(DOC_DATADOCRIF);
|
||||
if (anno <= 0)
|
||||
{
|
||||
const TDate ddr = doc.get_date(DOC_DATADOCRIF);
|
||||
|
||||
anno = ddr.year();
|
||||
}
|
||||
anno = ddr.year();
|
||||
}
|
||||
keydoc.add(doc.get(DOC_PROVV));
|
||||
keydoc.add(anno);
|
||||
keydoc.add(codnum);
|
||||
keydoc.add(numpart);
|
||||
|
||||
const long numreg = atol(cache().get(LF_DOC, keydoc, DOC_NUMREG));
|
||||
keydoc.add(anno);
|
||||
keydoc.add(codnum);
|
||||
keydoc.add(numpart);
|
||||
|
||||
const TRectype & docrif = cache().get(LF_DOC, keydoc);
|
||||
const TString4 & tipocfrif = docrif.get(DOC_TIPOCF);
|
||||
|
||||
if (numreg > 0)
|
||||
{
|
||||
TPartite_array pa; pa.add_numreg(numreg);
|
||||
const TPartita* game = pa.first();
|
||||
|
||||
if (game != NULL)
|
||||
{
|
||||
anno = game->anno();
|
||||
numpart = game->numero();
|
||||
}
|
||||
}
|
||||
}
|
||||
if (tipocf == tipocfrif)
|
||||
{
|
||||
const long codcf = docrif.get_long(DOC_CODCF);
|
||||
|
||||
if (codcf == doc.get_long(DOC_CODCF))
|
||||
{
|
||||
const long numreg = docrif.get_long( DOC_NUMREG);
|
||||
|
||||
if (numreg > 0)
|
||||
{
|
||||
TPartite_array pa; pa.add_numreg(numreg);
|
||||
const TPartita* game = pa.first();
|
||||
|
||||
if (game != NULL)
|
||||
{
|
||||
anno = game->anno();
|
||||
numpart = game->numero();
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if (anno <= 0 || numpart.blank())
|
||||
{
|
||||
|
||||
@ -518,42 +518,55 @@ long TGenerazione_effetti::group_bills(TAssoc_array& group_array, bool interatti
|
||||
if (numpart_mon)
|
||||
part_type = 'M';
|
||||
|
||||
if (doc.get(DOC_TIPOCF) == "F" || is_nota_credito)
|
||||
const TString4 tipocf = doc.get(DOC_TIPOCF);
|
||||
|
||||
if (tipocf == "F" || is_nota_credito)
|
||||
{
|
||||
anno = doc.get_int(DOC_ANNORIF);
|
||||
numpart = doc.get(DOC_NUMDOCRIF); // Max. 7 chars
|
||||
|
||||
if (numpart.full())
|
||||
{
|
||||
TString4 codnum = doc.get(DOC_CODNUMRIF);
|
||||
TToken_string keydoc;
|
||||
TString4 codnum = doc.get(DOC_CODNUMRIF);
|
||||
TToken_string keydoc;
|
||||
|
||||
if (codnum.blank())
|
||||
codnum = doc.get(DOC_CODNUM);
|
||||
if (anno <= 0)
|
||||
{
|
||||
const TDate ddr = doc.get_date(DOC_DATADOCRIF);
|
||||
|
||||
anno = ddr.year();
|
||||
}
|
||||
keydoc.add(doc.get(DOC_PROVV));
|
||||
keydoc.add(anno);
|
||||
keydoc.add(codnum);
|
||||
keydoc.add(numpart);
|
||||
|
||||
const long numreg = atol(cache().get(LF_DOC, keydoc, DOC_NUMREG));
|
||||
|
||||
if (numreg > 0)
|
||||
{
|
||||
TPartite_array pa; pa.add_numreg(numreg);
|
||||
const TPartita* game = pa.first();
|
||||
|
||||
if (game != NULL)
|
||||
if (codnum.blank())
|
||||
codnum = doc.get(DOC_CODNUM);
|
||||
if (anno <= 0)
|
||||
{
|
||||
anno = game->anno();
|
||||
numpart = game->numero();
|
||||
const TDate ddr = doc.get_date(DOC_DATADOCRIF);
|
||||
|
||||
anno = ddr.year();
|
||||
}
|
||||
}
|
||||
keydoc.add(doc.get(DOC_PROVV));
|
||||
keydoc.add(anno);
|
||||
keydoc.add(codnum);
|
||||
keydoc.add(numpart);
|
||||
|
||||
const TRectype & docrif = cache().get(LF_DOC, keydoc);
|
||||
const char tipocfrif = docrif.get_char(DOC_TIPOCF);
|
||||
|
||||
if (tipocf == tipocfrif)
|
||||
{
|
||||
const long codcf = docrif.get_long(DOC_CODCF);
|
||||
|
||||
if (codcf == doc.get_long(DOC_CODCF))
|
||||
{
|
||||
const long numreg = docrif.get_long(DOC_NUMREG);
|
||||
|
||||
if (numreg > 0)
|
||||
{
|
||||
TPartite_array pa; pa.add_numreg(numreg);
|
||||
const TPartita* game = pa.first();
|
||||
|
||||
if (game != NULL)
|
||||
{
|
||||
anno = game->anno();
|
||||
numpart = game->numero();
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if (anno <= 0 || numpart.blank())
|
||||
@ -801,42 +814,53 @@ void TGenerazione_effetti::generate_bill(TDocumento& doc, bool interattivo) // b
|
||||
if (numpart_mon)
|
||||
part_type = 'M';
|
||||
|
||||
if (doc.get(DOC_TIPOCF) == "F" || is_nota_credito)
|
||||
if (tipocf == 'F' || is_nota_credito)
|
||||
{
|
||||
anno = doc.get_int(DOC_ANNORIF);
|
||||
numpart = doc.get(DOC_NUMDOCRIF); // Max. 7 chars
|
||||
|
||||
if (numpart.full())
|
||||
{
|
||||
TString4 codnum = doc.get(DOC_CODNUMRIF);
|
||||
TToken_string keydoc;
|
||||
{
|
||||
TString4 codnum = doc.get(DOC_CODNUMRIF);
|
||||
TToken_string keydoc;
|
||||
|
||||
if (codnum.blank())
|
||||
codnum = doc.get(DOC_CODNUM);
|
||||
if (anno <= 0)
|
||||
{
|
||||
const TDate ddr = doc.get_date(DOC_DATADOCRIF);
|
||||
|
||||
anno = ddr.year();
|
||||
}
|
||||
keydoc.add(doc.get(DOC_PROVV));
|
||||
keydoc.add(anno);
|
||||
keydoc.add(codnum);
|
||||
keydoc.add(numpart);
|
||||
|
||||
const long numreg = atol(cache().get(LF_DOC, keydoc, DOC_NUMREG));
|
||||
|
||||
if (numreg > 0)
|
||||
{
|
||||
TPartite_array pa; pa.add_numreg(numreg);
|
||||
const TPartita* game = pa.first();
|
||||
|
||||
if (game != NULL)
|
||||
if (codnum.blank())
|
||||
codnum = doc.get(DOC_CODNUM);
|
||||
if (anno <= 0)
|
||||
{
|
||||
anno = game->anno();
|
||||
numpart = game->numero();
|
||||
const TDate ddr = doc.get_date(DOC_DATADOCRIF);
|
||||
|
||||
anno = ddr.year();
|
||||
}
|
||||
}
|
||||
keydoc.add(doc.get(DOC_PROVV));
|
||||
keydoc.add(anno);
|
||||
keydoc.add(codnum);
|
||||
keydoc.add(numpart);
|
||||
|
||||
const TRectype & docrif = cache().get(LF_DOC, keydoc);
|
||||
const char tipocfrif = docrif.get_char(DOC_TIPOCF);
|
||||
|
||||
if (tipocf == tipocfrif)
|
||||
{
|
||||
const long codcf = docrif.get_long(DOC_CODCF);
|
||||
|
||||
if (codcf == doc.get_long(DOC_CODCF))
|
||||
{
|
||||
const long numreg = docrif.get_long(DOC_NUMREG);
|
||||
|
||||
if (numreg > 0)
|
||||
{
|
||||
TPartite_array pa; pa.add_numreg(numreg);
|
||||
const TPartita* game = pa.first();
|
||||
|
||||
if (game != NULL)
|
||||
{
|
||||
anno = game->anno();
|
||||
numpart = game->numero();
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
if (anno <= 0 || numpart.blank())
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user