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

Patch level : 10.0 patch 540

Browse Source 
Files correlati     : lvlib (lv2 - lv3)
Ricompilazione Demo : [ ]
Commento            :
Modificata la find_contract in modo che se non trova l'indirizzo di spedizione giusto, cerca il contratto con indsped 0


git-svn-id: svn://10.65.10.50/trunk@19717 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2009-12-02 15:11:02 +00:00
parent 32a34eda57
commit 95fccf4c9d
1 changed files with 15 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
lv/lvlib.cpp
View File

@ -66,6 +66,20 @@ long lv_find_contract(const long codcf, const long indsped, const TDate& data)
if (contr.move_first()) if (contr.move_first())
cod = contr.get("CODCONT").as_int(); cod = contr.get("CODCONT").as_int();
if (cod == 0L)
{
query.cut(0);
query << "USE LVCONDV\n"
<< "SELECT BETWEEN(#DATA,DATAIN,DATASC)&&(PROPOSTA!=\"X\")\n"
<< "FROM CODCF=#CODCF\nTO CODCF=#CODCF";
TISAM_recordset contr(query);
contr.set_var("#DATA",data);
contr.set_var("#CODCF",codcf);
if (contr.move_first())
cod = contr.get("CODCONT").as_int();
}
return cod; return cod;
} }