root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Richieste conferme prima di cancellare i fax.

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3627 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1996-09-19 10:37:53 +00:00
parent 1dfb5c0cdf
commit 0814872523
1 changed files with 25 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
ba/bafax.cpp
View File

@ -575,14 +575,18 @@ bool TLog_mask::log_notify(TSheet_field& s, int, KEY k)
{ {
if (k == K_INS) if (k == K_INS)
{ {
TLog_mask& m = (TLog_mask&)s.mask(); const int last = s.items()-1;
const WORD log = m.sheet2log(s); if (last >= 0 && yesno_box("Si conferma l'eliminazione dei fax?"))
for (int i = s.items()-1; i >= 0; i--)
{ {
const char* strid = s.row(i).get(0); TLog_mask& m = (TLog_mask&)s.mask();
unsigned long id; sscanf(strid, "%lu", &id); const WORD log = m.sheet2log(s);
m._fax->log_delete(log, id); for (int i = last; i >= 0; i--)
do_events(); {
const char* strid = s.row(i).get(0);
unsigned long id; sscanf(strid, "%lu", &id);
m._fax->log_delete(log, id);
do_events();
}
} }
return FALSE; return FALSE;
} }
@ -594,14 +598,14 @@ bool TLog_mask::delrec_handler(TMask_field& f, KEY k)
if (k == K_SPACE) if (k == K_SPACE)
{ {
TMask& m = f.mask(); TMask& m = f.mask();
TSheet_field& s = *m.get_sheet();
TLog_mask& l = (TLog_mask&)s.mask(); const char* strid = m.get(101);
const WORD log = l.sheet2log(s); if (yesno_box("Si conferma l'eliminazione del fax %s?", strid))
if (log)
{ {
const char* strid = m.get(101); TSheet_field& s = *m.get_sheet();
TLog_mask& l = (TLog_mask&)s.mask();
const WORD log = l.sheet2log(s);
CHECK(log, "Invalid Fax log");
unsigned long id; sscanf(strid, "%lu", &id); unsigned long id; sscanf(strid, "%lu", &id);
l._fax->log_delete(log, id); l._fax->log_delete(log, id);
} }
@ -928,6 +932,12 @@ bool TDDE_fax::resend_fax(unsigned long id)
bool ok = FaxLogFind(_pappinfo, &sf, id) == 1; bool ok = FaxLogFind(_pappinfo, &sf, id) == 1;
if (ok) if (ok)
{ {
const TFilename old_name(sf->szFileList);
TFilename new_name(old_name); new_name.ext("FMP");
rename(old_name, new_name); // Rinomina file
FaxLogDelete(_pappinfo, id, sf->wLog); // Cancella fax
do_events();
rename(new_name, old_name); // Ripristina file
FaxSchedule(_pappinfo, sf); FaxSchedule(_pappinfo, sf);
GlobalFreePtr(sf); GlobalFreePtr(sf);
} }