Corretta richiesta ditta per contabilita

git-svn-id: svn://10.65.10.50/trunk@3550 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1996-09-09 10:48:37 +00:00
parent 41d5e0fd25
commit 7bd695ee32

View File

@ -980,11 +980,16 @@ bool TMenu_application::main_loop()
}
if (!ok) error_box("Password di servizio errata!\nAccesso negato.");
}
if (ok)
{
const TString16 module(cmd2name(option));
if (get_firm() == 0 && module.compare("cg", 2, TRUE) == 0) // Chiede ditta se necessario
set_firm();
ok = set_firm();
}
if (ok)
{
prefix().set(NULL); // Chiude prefix
TFilename opt_cmd(option);
#if XVT_OS == XVT_OS_WIN