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

Patch level : 10.0 272

Browse Source 
Files correlati     :  ca2.exe 
Ricompilazione Demo : [ ]
Commento            :

Aggiunto esecuzione ripetuta dell' invio a Board. con un intervallo in minuti dopo la M
La linea di comando ad esempio è ca2 -4 -M60 -uADMIN


git-svn-id: svn://10.65.10.50/branches/R_10_00@23209 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
bonazzi 2016-07-08 16:16:35 +00:00
parent a379b353fe
commit 3469b56f48
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ca/ca2500.cpp
View File

@ -242,12 +242,16 @@ void TBoard_app::main_loop()
{
TBoard_msk m;
bool batch = false;
int mins = 1;
if (argc() > 2)
{
const TFixed_string a(argv(2));
batch = toupper(a[1]) == 'M';
mins = atoi(a.right(1));
if (mins <1)
mins = 1;
}
if (batch)
@ -257,7 +261,7 @@ void TBoard_app::main_loop()
if (tray != NULL_WIN)
xvt_vobj_set_visible(task, FALSE);
xvt_timer_create(m.win(), 60 * 1000L);
xvt_timer_create(m.win(), mins * 60 * 1000L);
while (m.run() == K_ENTER)
{
TSheet_field& s = m.sfield(F_FILES);

2
ca/ca2500a.uml
View File

@ -16,11 +16,13 @@ END
DATE F_DATA_INI
BEGIN
PROMPT 1 2 "Data iniziale "
FLAGS "H"
END
DATE F_DATA_FIN
BEGIN
PROMPT 1 3 "Data finale "
FLAGS "H"
END
SPREADSHEET F_FILES 78 -1