Patch level : 10.0 patch ???

Files correlati     : lv2  lv3
Ricompilazione Demo : [ ]
Commento            :
Se non trovo l'autista dai giri, prova a recuperarlo CFVEN (corrisponde a CODAG)


git-svn-id: svn://10.65.10.50/trunk@20196 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2010-03-05 10:00:43 +00:00
parent a53b914825
commit 1330ea8694
5 changed files with 21 additions and 5 deletions

View File

@ -128,7 +128,8 @@ bool TGenera_documenti_app::crea_documento(const TISAM_recordset& plan, TLog_rep
const TDate dtcons = plan.get(LVRCONSPLAN_DTCONS).as_date(); //che è anche la data documento
const char modpas = plan.get(LVRCONSPLAN_MODPASS).as_string()[0];
const int coditi = plan.get(LVRCONSPLAN_CODITI).as_int();
const TString8 codaut = plan.get(LVRCONSPLAN_CODAUT).as_string().right(5);
TString8 codaut = plan.get(LVRCONSPLAN_CODAUT).as_string().right(5); codaut.trim();
const int anno = dtcons.year();
//preparo la chiave per la tabella contratti
@ -210,6 +211,9 @@ bool TGenera_documenti_app::crea_documento(const TISAM_recordset& plan, TLog_rep
const TString8 codlist = cfven.get(CFV_CODLIST);
const TString4 codzona = cfven.get(CFV_CODZONA);
if(codaut.empty())
codaut = cfven.get(CFV_CODAG);
//gestione sconto
TString sconto;

View File

@ -363,7 +363,7 @@ TObject* TAcquisizione_cache::key2obj(const char* key)
consegne.move_first();
const TDate dataprco = consegne.get(LVRCONSPLAN_DTCONS).as_date();
const int coditi = consegne.get(LVRCONSPLAN_CODITI).as_int();
const TString8 codaut = consegne.get(LVRCONSPLAN_CODAUT).as_string().right(5);
TString8 codaut = consegne.get(LVRCONSPLAN_CODAUT).as_string().right(5); codaut.trim();
//recupero i dati di interesse dal cliente
const TRectype& clifo = cache().get(LF_CLIFO, key);
@ -395,6 +395,9 @@ TObject* TAcquisizione_cache::key2obj(const char* key)
const TString8 codlist = cfven.get(CFV_CODLIST);
const TString4 codzona = cfven.get(CFV_CODZONA);
if(codaut.empty())
codaut = cfven.get(CFV_CODAG);
//gestione sconto
TString sconto;

View File

@ -95,7 +95,7 @@ TObject* TBuoni_cache::key2obj(const char* key)
consegne.move_first();
const TDate dataprco = consegne.get(LVRCONSPLAN_DTCONS).as_date();
const int coditi = consegne.get(LVRCONSPLAN_CODITI).as_int();
const TString8 codaut = consegne.get(LVRCONSPLAN_CODAUT).as_string().right(5);
TString8 codaut = consegne.get(LVRCONSPLAN_CODAUT).as_string().right(5); codaut.trim();
//recupero i dati di interesse dal cliente
const TRectype& clifo = cache().get(LF_CLIFO, key);
@ -127,6 +127,9 @@ TObject* TBuoni_cache::key2obj(const char* key)
const TString8 codlist = cfven.get(CFV_CODLIST);
const TString4 codzona = cfven.get(CFV_CODZONA);
if(codaut.empty())
codaut = cfven.get(CFV_CODAG);
//gestione sconto
TString sconto;

View File

@ -377,7 +377,7 @@ void TEvasione_msk::genera_documento()
consegne.move_first();
const TDate dataprco = consegne.get(LVRCONSPLAN_DTCONS).as_date();
const int coditi = consegne.get(LVRCONSPLAN_CODITI).as_int();
const TString8 codaut = consegne.get(LVRCONSPLAN_CODAUT).as_string().right(5);
TString8 codaut = consegne.get(LVRCONSPLAN_CODAUT).as_string().right(5); codaut.trim();
//recupero il codpag
TToken_string key;
@ -413,6 +413,9 @@ void TEvasione_msk::genera_documento()
const TString8 codlist = cfven.get(CFV_CODLIST);
const TString4 codzona = cfven.get(CFV_CODZONA);
if(codaut.empty())
codaut = cfven.get(CFV_CODAG);
//gestione sconto
TString sconto;

View File

@ -343,7 +343,7 @@ void TEvasione_ter_msk::genera_buono()
consegne.move_first();
const TDate dataprco = consegne.get(LVRCONSPLAN_DTCONS).as_date();
const int coditi = consegne.get(LVRCONSPLAN_CODITI).as_int();
const TString8 codaut = consegne.get(LVRCONSPLAN_CODAUT).as_string().right(5);
TString8 codaut = consegne.get(LVRCONSPLAN_CODAUT).as_string().right(5); codaut.trim();
//recupero il codpag e i codici banca
TToken_string key;
@ -378,6 +378,9 @@ void TEvasione_ter_msk::genera_buono()
const TString8 codlist = cfven.get(CFV_CODLIST);
const TString4 codzona = cfven.get(CFV_CODZONA);
if(codaut.empty())
codaut = cfven.get(CFV_CODAG);
//gestione sconto
TString sconto;