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

Patch level :10.0

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
Aggiunta la funzione che restituisce un contratto dato cliente, data, e indirizzo di spedizione (quest'ultimo facoltativo)


git-svn-id: svn://10.65.10.50/trunk@17638 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2008-11-14 14:34:29 +00:00
parent 81669c8140
commit 28b73cfd1a
2 changed files with 17 additions and 0 deletions

16
lv/lvlib.cpp

@ -17,6 +17,22 @@ void lv_set_update_info(TRectype& rec)
rec.set_modify_info();
}
long lv_find_contract(const long codcf, const long indsped, const TDate& data)
{
TString query;
query << "USE LVCONDV SELECT BETWEEN(#DATA,DATAIN,DATASC) BETWEEN(CODINDSP,#INDSPED,#INDSPED)\n"
<< "FROM CODCF=#CODCF\nTO CODCF=#CODCF";
TISAM_recordset contr(query);
contr.set_var("#DATA",data);
contr.set_var("#INDSPED",indsped);
contr.set_var("#CODCF",codcf);
if (contr.move_first())
return contr.get("CODCONT").as_int();
else
return 0;
}
void TRecmag_lavanderie::update()
{
if (_update_time > 0L)

1
lv/lvlib.h

@ -17,6 +17,7 @@
void lv_set_creation_info(TRectype& rec);
void lv_set_update_info(TRectype& rec);
long lv_find_contract(const long codcf, const long indsped, const TDate& data);
class TRecmag_lavanderie : public TVariable_rectype