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

Corretto MI3001; iniziato aggiornamento SENSU Scudler(1994)

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@851 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-01-11 11:47:01 +00:00
parent 636db1596d
commit c088f0b924
2 changed files with 26 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
cg/cg4301.cpp
View File

@ -358,7 +358,14 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
*/
if (_reg->get_bool("B1"))
continue;
/*
* Tipo documento da eliminare (Scudler 1994)
*/
if (tipodoc == "SN" || tipodoc == "CN" || tipodoc == "RN" ||
tipodoc == "IN" || tipodoc == "PG")
continue;
/*
* Fatture in ritardo vengono considerate solo in dichiarazione
* annuale
@ -395,8 +402,15 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
real imposta = _rmoviva->get_real("IMPOSTA");
bool intra = _rmoviva->get_bool("INTRA");
int tipoatt = _rmoviva->get_int("TIPOATT");
int rigaimp = _rmoviva->get_int("RIGAIMP");
if ( tipoatt != tipatt ) continue;
if(tipoatt != tipatt) continue;
/*
* Riga imponibile > 9 = ritenute; non si
* considerano (Scudler 1994)
*/
if(rigaimp > 9) continue;
// *****************************************
// casi particolari
@ -407,7 +421,8 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
totintra += imposta;
// Altre cose di cui tener conto
if (tipomov == acquisto && (tipocr == 1 || tipocr == 5) && _isricacq)
if (tipomov == acquisto && (tipocr == 1 || tipocr == 5)
&& _isricacq)
// Acquisto beni per rivendita (solo se l'apposito parametro ditta
// e' settato)
{

8
cg/cg4303.cpp
View File

@ -151,6 +151,14 @@ void TLiquidazione_app::recalc_ventilation(int month, const char* codatt)
if (!_isricacq && tipodet != 3)
continue;
/*
* caso particolare SENSU Vladimiro (1995) #MI3001
* questi vengono pero' conteggiati nel totale
* acquisti per rivendita
*/
if (tipocr == 5 && tipodet == 3)
continue;
TString att(codatt);
if (tipocr == 1 && mese == m &&
att == (const char*)(*_pim_codatt))