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

Patch level : 2.2 232

Browse Source 
Files correlati     :  ve0.exe ve6.exe
Ricompilazione Demo : [ ]
Commento

Bug  0000549

Non riesco a contab. un NAF con Ritenuta acc. es. 376
Faq con righe sconto non passano in analitica 374/375


git-svn-id: svn://10.65.10.50/trunk@13537 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2005-11-25 14:11:06 +00:00
parent 7195f56cb2
commit c87ad73c8c
3 changed files with 72 additions and 51 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ve/ve0100b.uml
View File

@ -2,18 +2,18 @@
TOOLBAR "" 0 -2 0 2 TOOLBAR "" 0 -2 0 2
BUTTON DLG_OK 10 2 BUTTON DLG_OK 12 2
BEGIN BEGIN
PROMPT -13 -1 "" PROMPT -13 -1 ""
END END
BUTTON DLG_LINK 10 2 BUTTON DLG_LINK 12 2
BEGIN BEGIN
PROMPT -23 -1 "Colle~ga" PROMPT -23 -1 "Colle~ga"
PICTURE BMP_LINK PICTURE BMP_LINK
END END
BUTTON DLG_QUIT 10 2 BUTTON DLG_QUIT 12 2
BEGIN BEGIN
PROMPT -33 -1 "" PROMPT -33 -1 ""
END END

10
ve/velib04b.cpp
View File

@ -31,15 +31,11 @@ TImporto TMovimentoPN_VE::real2imp(const real& r, char row_type)
CHECK(_caus,"Orgggssbb..._caus pointer is NULL!"); CHECK(_caus,"Orgggssbb..._caus pointer is NULL!");
bool dare = false; bool dare = false;
if (row_type == 'S') if (row_type == 'S')
{
dare = _caus->sezione_ritsoc() == 'D'; dare = _caus->sezione_ritsoc() == 'D';
}
else else
{ {
if (row_type == 'F') if (row_type == 'F')
{ dare = _caus->sezione_ritfis() == 'D';
dare = _caus->sezione_ritsoc() == 'D';
}
else else
{ {
dare = _caus->sezione_clifo() == 'D'; dare = _caus->sezione_clifo() == 'D';
@ -517,8 +513,8 @@ int TMovimentoPN_VE::recalc_cg_rows(const TString & descr_cr, TCausale & caus)
} }
// Parametri da leggere all'inizio dell'elaborazione tramite load_parameters() // Parametri da leggere all'inizio dell'elaborazione tramite load_parameters()
static TBill _sco_perc_bill, _sco_imp_bill, // Conti per gli sconti a percentuale ed importi (dalla configurazione) TBill _sco_perc_bill, _sco_imp_bill; // Conti per gli sconti a percentuale ed importi (dalla configurazione)
_spin_billa, _spin_billv, static TBill _spin_billa, _spin_billv,
_spbo_billa, _spbo_billv; _spbo_billa, _spbo_billv;
static TBill _co_cliente, // conto clifo per movimento d'anticipo static TBill _co_cliente, // conto clifo per movimento d'anticipo
_co_controp; // conto di contropartita per il movimetno d'anticipo _co_controp; // conto di contropartita per il movimetno d'anticipo

45
ve/velib04f.cpp
View File

@ -10,6 +10,7 @@
#include "../cg/cg2103.h" #include "../cg/cg2103.h"
#include "../mg/anamag.h" #include "../mg/anamag.h"
extern TBill _sco_perc_bill, _sco_imp_bill;
class TCache_causali : public TCache class TCache_causali : public TCache
{ {
@ -330,8 +331,35 @@ bool TContabilizzazione_analitica::find_conti(const TRiga_documento& riga, TStri
const char tipocf = riga.doc().get_char(DOC_TIPOCF); const char tipocf = riga.doc().get_char(DOC_TIPOCF);
TString80 contanal; TString80 contanal;
TBill bill; // Cerco il conto contabile TBill bill; // Cerco il conto contabile
if (riga.is_sconto())
{
if (!_sco_perc_bill.ok())
{
TConfig conf(CONFIG_DITTA, "ve");
int gr = conf.get_int("SCOPRCODCON","ve",1);
int co = conf.get_int("SCOPRCODCON","ve",2);
long so = conf.get_long("SCOPRCODCON","ve",3);
_sco_perc_bill.set(gr,co,so);
gr = conf.get_int("SCOIMCODCON","ve",1);
co = conf.get_int("SCOIMCODCON","ve",2);
so = conf.get_long("SCOIMCODCON","ve",3);
_sco_imp_bill.set(gr,co,so);
}
if (riga.is_sconto_perc())
bill = _sco_perc_bill;
else
bill = _sco_imp_bill;
if (!bill.is_analitico())
return true;
if (_usepdcc)
contanal.format("%03d%03d%06ld", bill.gruppo(), bill.conto(), bill.sottoconto());
}
else
{
if (!search_costo_ricavo(riga, bill)) if (!search_costo_ricavo(riga, bill))
return true; return true;
if (!bill.is_analitico()) if (!bill.is_analitico())
@ -369,12 +397,7 @@ bool TContabilizzazione_analitica::find_conti(const TRiga_documento& riga, TStri
} }
if (!bArcticleFound) // Se l'anagrtafica non esiste va bene cosi' if (!bArcticleFound) // Se l'anagrtafica non esiste va bene cosi'
return true; return true;
}
/* TBill bill; // Cerco il conto contabile
if (!search_costo_ricavo(riga, bill))
return true;
if (!bill.is_analitico())
return true;*/
const TString80 riga_cos = riga.codice_costo(); const TString80 riga_cos = riga.codice_costo();
const TString80 riga_cms = riga.codice_commessa(); const TString80 riga_cms = riga.codice_commessa();
@ -520,8 +543,10 @@ bool TContabilizzazione_analitica::elabora(TDocumento& doc, long numreg_cg, TVis
{ {
const TRiga_documento& riga = doc[i]; const TRiga_documento& riga = doc[i];
// salto descrizioni, sconti e omaggi // salto descrizioni, sconti e omaggi
if (riga.is_descrizione() || riga.is_sconto() || riga.is_omaggio()) // if (riga.is_descrizione() || riga.is_sconto() || riga.is_omaggio())
// salto descrizioni, e omaggi
if (riga.is_descrizione() || riga.is_omaggio())
continue; continue;
// salto valori nulli // salto valori nulli
@ -532,7 +557,7 @@ bool TContabilizzazione_analitica::elabora(TDocumento& doc, long numreg_cg, TVis
if (valore.is_zero()) if (valore.is_zero())
continue; continue;
if (tiva != iva_vendite) if (tiva != iva_vendite && !riga.is_sconto())
{ {
real pind = ZERO; real pind = ZERO;
if (tiva != nessuna_iva) if (tiva != nessuna_iva)