Correzione impostazione tipo rata e ulc

git-svn-id: svn://10.65.10.50/trunk@2410 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1996-01-09 11:12:56 +00:00
parent f2c1511f11
commit 291112d8ba

View File

@ -345,6 +345,8 @@ bool BA3700_application::tipo_rata(TMask_field& f, KEY k)
if (k == K_TAB && pag) if (k == K_TAB && pag)
{ {
pag->set_default_ulc("");
f.mask().set(F_ULT_CLASS,"");
pag->set_default_type(atoi(f.get())); pag->set_default_type(atoi(f.get()));
pag->set_sheet(*shf); pag->set_sheet(*shf);
} }
@ -361,6 +363,7 @@ bool BA3700_application::ult_class(TMask_field& f, KEY k)
if (k == K_TAB && pag && f.focusdirty()) if (k == K_TAB && pag && f.focusdirty())
{ {
pag->set_default_type(atoi(f.mask().get(F_TIPO_RATA)));
pag->set_default_ulc(f.get()); pag->set_default_ulc(f.get());
pag->set_sheet(*shf); pag->set_sheet(*shf);
} }