Corretti errori MI1101 e MI1093

git-svn-id: svn://10.65.10.50/trunk@3055 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-06-21 10:43:26 +00:00
parent fb42b62701
commit 0efdee7b30
4 changed files with 20 additions and 11 deletions

View File

@ -1428,7 +1428,8 @@ bool TStampaEC_application::destroy()
}
void TStampaEC_application::on_firm_change()
{
{
mask().reset();
TApplication::on_firm_change();
TConfig c(CONFIG_DITTA, "cg");
_lingua_ditta = c.get("CodLin");

View File

@ -16,7 +16,7 @@ END
STRING F_RAGSOC 50 46
BEGIN
PROMPT 14 1 "R.S. "
FLAGS "D"
FLAGS "DP"
END
GROUPBOX DLG_NULL 68 8

View File

@ -216,7 +216,8 @@ bool TStampaSol_application::destroy()
}
void TStampaSol_application::on_firm_change()
{
{
mask().reset();
TApplication::on_firm_change();
TConfig c(CONFIG_DITTA, "cg");
_lingua_ditta= c.get("CodLin");
@ -228,11 +229,18 @@ bool TStampaSol_application::menu(MENU_TAG)
{
TSol_mask &m= mask();
while (m.run() != K_QUIT)
{
_form= new TSol_form(m, _gesval, F_DATALIMOP, F_DATALIMSOL);
print_selected();
delete _form;
_form= NULL;
{
const TDate dlimsol(m.get(F_DATALIMSOL));
const TDate dsped(m.get(F_DATASEND));
if (dlimsol > dsped)
error_box("La data limite sollecito deve essere specificata e non puo' essere superiore alla data di invio");
else
{
_form= new TSol_form(m, _gesval, F_DATALIMOP, F_DATALIMSOL);
print_selected();
delete _form;
_form= NULL;
}
}
return FALSE;
}

View File

@ -16,7 +16,7 @@ END
STRING F_RAGSOC 50 46
BEGIN
PROMPT 16 1 "R.S. "
FLAGS "D"
FLAGS "DP"
END
GROUPBOX DLG_NULL 68 8
@ -70,8 +70,8 @@ DATE F_DATALIMSOL
BEGIN
PROMPT 2 5 "Data limite sollecito "
FLAGS "A"
VALIDATE DATE_CMP_FUNC <= F_DATASEND
WARNING "La data limite sollecito deve essere specificata e non puo' essere superiore alla data di invio"
// VALIDATE DATE_CMP_FUNC <= F_DATASEND
// WARNING "La data limite sollecito deve essere specificata e non puo' essere superiore alla data di invio"
CHECKTYPE REQUIRED
END