Corretta gestione conguaglio in sede di evasione buoni di ritiro
git-svn-id: svn://10.65.10.50/branches/R_10_00@22677 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
bfa656a137
commit
53d90d8c95
@ -242,14 +242,13 @@ void TVend_cli_app:: elabora(const TMask& mask)const
|
||||
//inizializzazione variabili
|
||||
TString articoloOld;
|
||||
TString descrOld;
|
||||
int clienteOld = 0;
|
||||
long clienteOld = 0;
|
||||
bool start = true;
|
||||
int colonna = 0;
|
||||
|
||||
//inizializzazione array di quantità
|
||||
//12 mesi valorizzati inizialmente a 0
|
||||
int qtaArray[12];
|
||||
for(int a = 0; a<13; a++) {qtaArray[a] = 0;}
|
||||
long qtaArray[16]; memset(qtaArray, 0, sizeof(qtaArray));
|
||||
int meseArray = 0;
|
||||
|
||||
//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
|
||||
if((clienteOld!=s._cliente ||
|
||||
articoloOld!=s._articolo))
|
||||
if (clienteOld!=s._cliente || articoloOld!=s._articolo)
|
||||
{
|
||||
riep_set->new_rec();
|
||||
colonna = 0;
|
||||
riep_set->set(colonna,TVariant(long (clienteOld)));//CAMPO DI ROTTURA
|
||||
riep_set->set(colonna,TVariant(clienteOld));//CAMPO DI ROTTURA
|
||||
colonna++;
|
||||
riep_set->set(colonna,TVariant(long (clienteOld)));
|
||||
riep_set->set(colonna,TVariant(clienteOld));
|
||||
colonna++;
|
||||
riep_set->set(colonna,TVariant(articoloOld));
|
||||
colonna++;
|
||||
@ -303,9 +301,9 @@ void TVend_cli_app:: elabora(const TMask& mask)const
|
||||
{
|
||||
riep_set->new_rec();
|
||||
colonna = 0;
|
||||
riep_set->set(colonna,TVariant(long (clienteOld)));//CAMPO DI ROTTURA
|
||||
riep_set->set(colonna,TVariant(clienteOld));//CAMPO DI ROTTURA
|
||||
colonna++;
|
||||
riep_set->set(colonna,TVariant(long (clienteOld)));
|
||||
riep_set->set(colonna,TVariant(clienteOld));
|
||||
colonna++;
|
||||
riep_set->set(colonna,TVariant(articoloOld));
|
||||
colonna++;
|
||||
@ -314,7 +312,7 @@ void TVend_cli_app:: elabora(const TMask& mask)const
|
||||
for(int a = 1; a<13; a++)
|
||||
{
|
||||
//colonna=3
|
||||
riep_set->set((colonna+a),TVariant(long (qtaArray[a])));
|
||||
riep_set->set((colonna+a),TVariant(qtaArray[a]));
|
||||
qtaArray[a] = 0;
|
||||
}
|
||||
}
|
||||
|
@ -569,11 +569,12 @@ void TEvasione_msk::genera_documento()
|
||||
const TCausale_lavanderie cau(rbpre.causale());
|
||||
rdoc.put(RDOC_CODAGG1, cau.codice());
|
||||
|
||||
// Aggiorna conguaglio su contratto se necessario 26-04-2012
|
||||
if (!diff.is_zero() && cau.movcong() && ini_get_bool(CONFIG_DITTA, "lv", "Aggcong"))
|
||||
// Aggiorna conguaglio su contratto se necessario 08-06-2012
|
||||
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);
|
||||
cong += diff;
|
||||
cong += diff_cong;
|
||||
rdoc.put(RDOC_QTAGG5, cong);
|
||||
|
||||
TLocalisamfile rcondv(LF_LVRCONDV);
|
||||
|
@ -616,7 +616,7 @@ void TEvasione_ter_msk::genera_buono()
|
||||
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
|
||||
TFilename tmp;
|
||||
|
Loading…
x
Reference in New Issue
Block a user