diff --git a/ca/ca2500.cpp b/ca/ca2500.cpp
index 0db14c653..5144e016f 100644
--- a/ca/ca2500.cpp
+++ b/ca/ca2500.cpp
@@ -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);
diff --git a/ca/ca2500a.uml b/ca/ca2500a.uml
index b16d1715c..79cf8fa05 100644
--- a/ca/ca2500a.uml
+++ b/ca/ca2500a.uml
@@ -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