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

Correzioni ad aggiornamento conguaglio su buoni evasione manuale buoni di prelievo

Browse Source 
git-svn-id: svn://10.65.10.50/branches/R_10_00@22652 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2012-04-27 08:47:37 +00:00
parent 52faa371ab
commit 70b7377a24
2 changed files with 7 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
lv/lv3100.cpp
View File

@ -97,14 +97,14 @@ inline TGestione_bolle_app& gbapp() { return (TGestione_bolle_app &)main_app();
//ARROTONDA: metodo che arrotonda la quantità che gli passo se è previsto sul contratto //ARROTONDA: metodo che arrotonda la quantità che gli passo se è previsto sul contratto
void TGestione_bolle_msk::arrotonda(const TMask& msk, real& quantita) void TGestione_bolle_msk::arrotonda(const TMask& msk, real& quantita)
{ {
int perarr = ini_get_int(CONFIG_DITTA, "lv", "Perarr"); const int perarr = ini_get_int(CONFIG_DITTA, "lv", "Perarr");
const TString& codart = msk.get(FR_CODART); const TString& codart = msk.get(FR_CODART);
//instanzio una cache sulla tabella del magazzino //instanzio una cache sulla tabella del magazzino
const TRectype& anamag = cache().get(LF_ANAMAG,codart); const TRectype& anamag = cache().get(LF_ANAMAG,codart);
//recupero i dati di interesse dall'anagrafica di magazzino //recupero i dati di interesse dall'anagrafica di magazzino
const long ppconf = anamag.get_long(ANAMAG_PPCONF); const long ppconf = anamag.get_long(ANAMAG_PPCONF);
if (ppconf > 0) if (ppconf > 1)
{ {
TDocumento_mask& dmsk = (TDocumento_mask&) msk.get_sheet()->mask(); TDocumento_mask& dmsk = (TDocumento_mask&) msk.get_sheet()->mask();
@ -123,14 +123,11 @@ void TGestione_bolle_msk::arrotonda(const TMask& msk, real& quantita)
if (rcont.get_int(LVRCONDV_CALCCONS) == 1) if (rcont.get_int(LVRCONDV_CALCCONS) == 1)
{ {
//calcolo di quanti pezzi sforo //calcolo di quanti pezzi sforo
long arr = quantita.integer() % ppconf; const long arr = quantita.integer() % ppconf;
//calcolo quanti pezzi in più o in meno gli devo dare e aggiorno la quantità //calcolo quanti pezzi in più o in meno gli devo dare e aggiorno la quantità
if (arr > ppconf * perarr / 100) //arr <= ppconf*perarr/100 -> formula calcolo congualgio di Tassan if (arr > ppconf * perarr / 100) //arr <= ppconf*perarr/100 -> formula calcolo congualgio di Tassan
{ quantita += ppconf - arr;
arr = ppconf - arr;
quantita += arr;
}
else else
quantita -= arr; quantita -= arr;
} }

4
lv/lv3200.cpp
View File

@ -578,7 +578,9 @@ void TEvasione_msk::genera_documento()
TLocalisamfile rcondv(LF_LVRCONDV); TLocalisamfile rcondv(LF_LVRCONDV);
((TRectype&)rcont).put(LVRCONDV_QTACONG, cong); ((TRectype&)rcont).put(LVRCONDV_QTACONG, cong);
rcont.rewrite(rcondv); const int err = rcont.rewrite(rcondv);
if (err != NOERR)
cantwrite_box(rcondv.description());
} }
const TRectype& anamag = cache().get(LF_ANAMAG, codart); const TRectype& anamag = cache().get(LF_ANAMAG, codart);