Patch level : 10.0

Files correlati     : lvtbaut.msk
Ricompilazione Demo : [ ]
Commento            :
Permesse minuscole nei nomi degli autisti


git-svn-id: svn://10.65.10.50/trunk@17859 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2008-12-10 16:57:03 +00:00
parent 7ef5a0c029
commit 5f09a1aa2e
2 changed files with 12 additions and 11 deletions

View File

@ -144,8 +144,9 @@ bool TGestione_bolle_msk::lv_bolla_handler(TMask_field& f, KEY k)
if (ok && k == K_TAB && f.focusdirty())
{
TMask& msk = f.mask();
TDocumento_mask& dmsk = (TDocumento_mask&)msk;
f.set_focusdirty(false);
TDocumento_mask& dmsk = (TDocumento_mask&)f.mask();
TDocumento& doc = dmsk.doc();
static long stcodcf = 0, stcodcont = 0;
@ -153,9 +154,9 @@ bool TGestione_bolle_msk::lv_bolla_handler(TMask_field& f, KEY k)
TSheet_field& sheet = dmsk.sfield(F_SHEET);
int nrighe = sheet.items();
const long codcf = msk.get_long(F_CODCF);
const int indsped = msk.get_int(F_CODINDSP);
TDate datadoc = msk.get_date(F_DATADOC);
const long codcf = dmsk.get_long(F_CODCF);
const int indsped = dmsk.get_int(F_CODINDSP);
TDate datadoc = dmsk.get_date(F_DATADOC);
if (!datadoc.ok())
datadoc = TODAY;
const int anno = datadoc.year();
@ -164,12 +165,14 @@ bool TGestione_bolle_msk::lv_bolla_handler(TMask_field& f, KEY k)
return true;
const long codcont = lv_find_contract(codcf,indsped,datadoc);
if (codcont <= 0)
{
warning_box(TR("Non ci sono contratti in essere alla data indicata"));
return true;
}
if (stcodcf == codcf && stcodcont == codcont && nrighe > 0)
return true;
if (codcont == 0)
return error_box(TR("Non ci sono contratti in essere alla data indicata"));
dmsk.mask2doc();
@ -180,7 +183,7 @@ bool TGestione_bolle_msk::lv_bolla_handler(TMask_field& f, KEY k)
doc.destroy_rows();
//tipo riga
const TString& tprig = msk.get(F_LBTIPORIGA);
const TString& tprig = dmsk.get(F_LBTIPORIGA);
//instanzio una cache sulla tabella dei contratti
const TLaundry_contract tcont(codcf, codcont);

View File

@ -14,7 +14,6 @@ END
NUMBER F_COD_AUTISTA 6
BEGIN
PROMPT 2 2 "Codice "
HELP "Inserire codice autista"
FLAGS "UZ"
USE &AUT
INPUT CODTAB F_COD_AUTISTA
@ -30,7 +29,6 @@ END
STRING F_DES_AUTISTA 50
BEGIN
PROMPT 2 3 "Descrizione "
FLAGS "U"
USE &AUT KEY 2
INPUT CODTAB F_COD_AUTISTA
DISPLAY "Descrizione@50" S0