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

Patch level : 12.0 1220

Browse Source 
Files correlati     : fplib01.cpp
Commento:

- Prima patch con il rilascio del nuovo postino. Servirà a PUGI per fare l'import dei file .ini
This commit is contained in:
smen 2022-11-28 11:47:24 +01:00
parent c735a53939
commit 20b7bd3a50
3 changed files with 27 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/ba/ba7100.cpp
View File

@ -491,7 +491,7 @@ protected:
void scan_ini_files(const char* dir, TString_array& result, int level) const;
void scan_dir(const TFilename& dir, TMail_messages& box) const;
bool unattended() const;
virtual bool on_key(KEY key);
public:
void test_delete();
void fill_messages();
@ -1148,7 +1148,7 @@ int TMailer_mask::exec_app(const TString& appname, TMail_message& msg, TToken_st
dest.add(file.name());
fcopy(tmp, dest);
}
}
}
tmp.fremove();
}
@ -1462,9 +1462,14 @@ void TMailer_mask::save_all_lines()
TBrowsefile_field& bf = (TBrowsefile_field&)field(F_LOG);
enable(DLG_DELLOG, bf.lines() > 0);
enable(DLG_DELREC);
#ifdef DBG
if (one_saved)
one_saved = yesno_box("Si desidera eliminare i messaggi processati?");
#endif
_mail_semaphore = 0;
if (get_bool(F_DELELAB) && one_saved)
if (one_saved)
{
test_delete();
fill_messages();
@ -1564,6 +1569,9 @@ bool TMailer_mask::on_field_event(TOperable_field& o, TField_event e, long jolly
save_all_lines();
else
save();
TSheet_field & sf = sfield(F_MESSAGES);
sf.disable_column(F_CHECKED);
}
break;
case DLG_DELREC:
@ -1685,6 +1693,18 @@ bool TMailer_mask::unattended() const
return (clock()-_last_use) > 10*CLOCKS_PER_SEC;
}
bool TMailer_mask::on_key(KEY key)
{
if (key == K_SHIFT + K_F12)
{
TSheet_field & sf = sfield(F_MESSAGES);
bool on = sf.column_enabled(F_CHECKED);
sf.enable_column(F_CHECKED, !on);
sf.force_update();
}
return TMask::on_key(key);
}
long TMailer_mask::handler(WINDOW win, EVENT* ep)
{
if (ep->type == E_TIMER && ep->v.timer.id == _timer_id)
@ -1745,6 +1765,8 @@ TMailer_mask::TMailer_mask()
const bool is_super = user() == ::dongle().administrator();
enable(-G_SUPERUSER, is_super);
TSheet_field & sf = sfield(F_MESSAGES);
sf.disable_column(F_CHECKED);
}
TMailer_mask::~TMailer_mask()

1
src/ba/ba7100a.h
View File

@ -6,7 +6,6 @@
#define F_TRACKING 206
#define F_BACKUP 207
#define F_BATCH 208
#define F_DELELAB 209
#define F_DELCANCEL 210
#define F_MESSAGES 300

9
src/ba/ba7100a.uml
View File

@ -131,16 +131,11 @@ BEGIN
PROMPT 1 4 "Registrazione automatica"
END
BOOLEAN F_DELELAB
BEGIN
PROMPT 55 4 "Elimina transazioni elaborate"
END
SPREADSHEET F_MESSAGES 0 -1
BEGIN
PROMPT 0 5 ""
ITEM "@1"
ITEM "Elaborato"
ITEM "Da@40"
ITEM "Data@10"
ITEM "Ora@8"
@ -231,7 +226,7 @@ PAGE "Message" -1 -1 78 19
BOOLEAN F_CHECKED
BEGIN
PROMPT 48 0 "Trasferito"
PROMPT 48 0 "Elaborato"
END
STRING F_SENDER 128 60