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

Patch level : 10.0 300

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :

controllo di esistenza del codice esercizio coripondente alla data di sistema


git-svn-id: svn://10.65.10.50/trunk@18034 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2009-01-16 23:18:15 +00:00
parent 94f58f866c
commit 6645f09573
1 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lv/lv0400.cpp
View File

@ -28,11 +28,9 @@ bool TContratti_msk::on_art_select()
const long codcf = get_long(F_CODCF); const long codcf = get_long(F_CODCF);
const int indsped = get_int(F_INDSPED); const int indsped = get_int(F_INDSPED);
TArticolo_lavanderie & artrec = cached_article_laundry(codart, 'C', codcf, indsped); TArticolo_lavanderie & artrec = cached_article_laundry(codart, 'C', codcf, indsped);
TDate datasc = get_date(F_DATASC); TDate datasc(TODAY);
if (!datasc.ok())
datasc = TDate(TODAY);
const int annoes = esercizi().date2esc(datasc); const int annoes = esercizi().date2esc(datasc);
int index = artrec.find_clifomag(annoes); int index = artrec.find_clifomag(annoes);
if (index > 0) if (index > 0)
@ -156,6 +154,10 @@ bool TContratti_app:: user_create()
_rel=new TRelation (LF_LVCONDV); _rel=new TRelation (LF_LVCONDV);
_msk= new TContratti_msk; _msk= new TContratti_msk;
TDate datasc(TODAY);
if (esercizi().date2esc(datasc) == 0)
return message_box("Attenzione non esiste l'esercizio corrispondente al %s", datasc.string());
TSheet_field& ss=_msk->sfield(F_RIGHE); TSheet_field& ss=_msk->sfield(F_RIGHE);
ss.set_auto_append(); ss.set_auto_append();