Patch level : 12.0 370
Files correlati : Commento : - Modificato programma dichiarazione di intento, modificato override (richiamabile con "Shift+F12), adesso abilita il salvataggio e le date di una dichiarazione di intento "Nel periodo" - Sistemata grafica impostazioni li git-svn-id: svn://10.65.10.50/branches/R_10_00@23692 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
347c0e8393
commit
551939d1ad
src/li
@ -39,7 +39,7 @@ END
|
||||
SPREADSHEET DOC_STATO 45 10
|
||||
BEGIN
|
||||
PROMPT 30 1 ""
|
||||
ITEM "Tipo Numerazione"
|
||||
ITEM "Tipo Documento"
|
||||
ITEM "Da stato"
|
||||
ITEM "A stato"
|
||||
END
|
||||
|
@ -30,8 +30,15 @@ public:
|
||||
|
||||
bool TLetint_mask::on_key(KEY k)
|
||||
{
|
||||
if (k == K_SHIFT+K_F12 && edit_mode())
|
||||
if (k == K_SHIFT+K_F12 && (edit_mode() || insert_mode()))
|
||||
{
|
||||
enable(DLG_SAVEREC);
|
||||
if(get_int(F_TIPOOP) == 3) // Nel periodo
|
||||
{
|
||||
enable(F_DAL);
|
||||
enable(F_AL);
|
||||
}
|
||||
}
|
||||
return TAutomask::on_key(k);
|
||||
}
|
||||
|
||||
@ -106,20 +113,26 @@ bool TLetint_mask::on_field_event(TOperable_field& o, TField_event e, long jolly
|
||||
case 1:
|
||||
if(!block) enable(DLG_SAVEREC);
|
||||
disable(F_DAL);
|
||||
disable(F_AL);
|
||||
break;
|
||||
case 2:
|
||||
if(!block) enable(DLG_SAVEREC);
|
||||
enable(F_DAL);
|
||||
disable(F_AL);
|
||||
break;
|
||||
case 3:
|
||||
{
|
||||
disable(DLG_SAVEREC);
|
||||
disable(F_DAL);
|
||||
// Chiudo la dichiarazione di intento
|
||||
TRectype liclosed = cache().get(LF_LETINT, TString(get(F_ANNO)) << "|" << get_int(F_NUMPROT));
|
||||
liclosed.put("CHIUSA", "X");
|
||||
liclosed.rewrite(TLocalisamfile(LF_LETINT));
|
||||
set(B_CHIUSA, true);
|
||||
disable(F_AL);
|
||||
if(!insert_mode())
|
||||
{
|
||||
// Chiudo la dichiarazione di intento
|
||||
TRectype liclosed = cache().get(LF_LETINT, TString(get(F_ANNO)) << "|" << get_int(F_NUMPROT));
|
||||
liclosed.put("CHIUSA", "X");
|
||||
liclosed.rewrite(TLocalisamfile(LF_LETINT));
|
||||
set(B_CHIUSA, true);
|
||||
}
|
||||
break;
|
||||
}
|
||||
default:
|
||||
|
Loading…
x
Reference in New Issue
Block a user