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

Corretta gestione conguaglio in sede di evasione buoni di ritiro

Browse Source 
git-svn-id: svn://10.65.10.50/branches/R_10_00@22677 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2012-06-18 14:12:17 +00:00
parent bfa656a137
commit 53d90d8c95
3 changed files with 13 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
lv/lv2800.cpp
View File

@ -242,14 +242,13 @@ void TVend_cli_app:: elabora(const TMask& mask)const
//inizializzazione variabili //inizializzazione variabili
TString articoloOld; TString articoloOld;
TString descrOld; TString descrOld;
int clienteOld = 0; long clienteOld = 0;
bool start = true; bool start = true;
int colonna = 0; int colonna = 0;
//inizializzazione array di quantità //inizializzazione array di quantità
//12 mesi valorizzati inizialmente a 0 //12 mesi valorizzati inizialmente a 0
int qtaArray[12]; long qtaArray[16]; memset(qtaArray, 0, sizeof(qtaArray));
for(int a = 0; a<13; a++) {qtaArray[a] = 0;}
int meseArray = 0; int meseArray = 0;
//scandisce clienti e tiene buoni solo quelli valorizzati //scandisce clienti e tiene buoni solo quelli valorizzati
@ -268,14 +267,13 @@ void TVend_cli_app:: elabora(const TMask& mask)const
} }
//metodo creazione record in report //metodo creazione record in report
if((clienteOld!=s._cliente || if (clienteOld!=s._cliente || articoloOld!=s._articolo)
articoloOld!=s._articolo))
{ {
riep_set->new_rec(); riep_set->new_rec();
colonna = 0; colonna = 0;
riep_set->set(colonna,TVariant(long (clienteOld)));//CAMPO DI ROTTURA riep_set->set(colonna,TVariant(clienteOld));//CAMPO DI ROTTURA
colonna++; colonna++;
riep_set->set(colonna,TVariant(long (clienteOld))); riep_set->set(colonna,TVariant(clienteOld));
colonna++; colonna++;
riep_set->set(colonna,TVariant(articoloOld)); riep_set->set(colonna,TVariant(articoloOld));
colonna++; colonna++;
@ -303,9 +301,9 @@ void TVend_cli_app:: elabora(const TMask& mask)const
{ {
riep_set->new_rec(); riep_set->new_rec();
colonna = 0; colonna = 0;
riep_set->set(colonna,TVariant(long (clienteOld)));//CAMPO DI ROTTURA riep_set->set(colonna,TVariant(clienteOld));//CAMPO DI ROTTURA
colonna++; colonna++;
riep_set->set(colonna,TVariant(long (clienteOld))); riep_set->set(colonna,TVariant(clienteOld));
colonna++; colonna++;
riep_set->set(colonna,TVariant(articoloOld)); riep_set->set(colonna,TVariant(articoloOld));
colonna++; colonna++;
@ -314,7 +312,7 @@ void TVend_cli_app:: elabora(const TMask& mask)const
for(int a = 1; a<13; a++) for(int a = 1; a<13; a++)
{ {
//colonna=3 //colonna=3
riep_set->set((colonna+a),TVariant(long (qtaArray[a]))); riep_set->set((colonna+a),TVariant(qtaArray[a]));
qtaArray[a] = 0; qtaArray[a] = 0;
} }
} }

7
lv/lv3200.cpp
View File

@ -569,11 +569,12 @@ void TEvasione_msk::genera_documento()
const TCausale_lavanderie cau(rbpre.causale()); const TCausale_lavanderie cau(rbpre.causale());
rdoc.put(RDOC_CODAGG1, cau.codice()); rdoc.put(RDOC_CODAGG1, cau.codice());
// Aggiorna conguaglio su contratto se necessario 26-04-2012 // Aggiorna conguaglio su contratto se necessario 08-06-2012
if (!diff.is_zero() && cau.movcong() && ini_get_bool(CONFIG_DITTA, "lv", "Aggcong")) const real diff_cong = rbpre.qta_consegnata() - rbpre.qta_dacons();
if (!diff_cong.is_zero() && cau.movcong() && ini_get_bool(CONFIG_DITTA, "lv", "Aggcong"))
{ {
real cong = rcont.get(LVRCONDV_QTACONG); real cong = rcont.get(LVRCONDV_QTACONG);
cong += diff; cong += diff_cong;
rdoc.put(RDOC_QTAGG5, cong); rdoc.put(RDOC_QTAGG5, cong);
TLocalisamfile rcondv(LF_LVRCONDV); TLocalisamfile rcondv(LF_LVRCONDV);

2
lv/lv3400.cpp
View File

@ -616,7 +616,7 @@ void TEvasione_ter_msk::genera_buono()
bpre.rewrite(); bpre.rewrite();
} }
if (err == NOERR && yesno_box(TR("Il buono di consegna è stato generato correttamente; si desidera stamaprlo?"))) if (err == NOERR && yesno_box(TR("Il buono di consegna è stato generato correttamente; si desidera stamparlo?")))
{ {
//stampa automatica //stampa automatica
TFilename tmp; TFilename tmp;