Aggiunto caricamento opzionale dei file standard

Corretta maschera registri


git-svn-id: svn://10.65.10.50/trunk@684 c028cbd2-c16b-5b4b-a496-9718f37d4682

ba/ba0.cpp

@@ -162,8 +162,9 @@ bool TMenu_application::build_firm_data(long codditta, bool flagcom)
   }
   if (exist)
     return message_box("Direttorio dati danneggiato, impossibile attivare la ditta %ld", codditta);
-  if (!yesno_box("I dati della ditta %ld non esistono: si desidera generarli?", codditta))
+  if (!yesno_box("Gli archivi della ditta %ld non esistono: si desidera generarli?", codditta))
     return FALSE; 
+  set_autoload_new_files(yesno_box("Si desidera precaricare gli archivi standard"));
   s = s.path();
 #if XVT_OS == XVT_OS_SCOUNIX
   if (mkdir(s, 0777) == -1)
@@ -245,6 +246,7 @@ bool TMenu_application::build_firm_data(long codditta, bool flagcom)
 
   set_firm(old_firm);
   set_cursor(TASK_WIN, CURSOR_ARROW);
+  set_autoload_new_files(TRUE);
   return TRUE;
 }
 

ba/batbreg.uml

@@ -38,11 +38,12 @@ BEGIN
   OUTPUT F_DESCR S0
   CHECKTYPE REQUIRED  
   MESSAGE COPY,20@
+  MESSAGE FALSE COPY,20@
 END
 
 STRING F_CODICE 3
 BEGIN
-  PROMPT 4 2 "Codice registro   "
+  PROMPT 51 1 "Codice registro   "
   Help "Codice del registro"
   FIELD CODTAB[5,7]
   FLAGS "U"
@@ -220,58 +221,25 @@ PAGE "Registri pag.2" -1 -1 78 18
 
 NUMBER DLG_NULL 4
 BEGIN
-  PROMPT 2 1 "Anno/Registro "
+  PROMPT 4 1 "Anno              "
-  FLAGS "D"
+  FLAGS "DP"
   GROUP 20
 END
 
 STRING DLG_NULL 3
 BEGIN
-  PROMPT 22 1 ""
+  PROMPT 51 1 "Codice registro   "
   FLAGS "D"
   GROUP 21
 END
 
 STRING DLG_NULL 50
 BEGIN
-  PROMPT 27 1 ""
+  PROMPT 4 3 "Descrizione       "
   GROUP 22
   FLAGS "D"
 END 
 
-BOOLEAN F_STAMPA_COSTI_RICAVI
-BEGIN
-  PROMPT 2 3 "Stampa costi/ricavi su libro cronologico "
-  FIELD B2
-  GROUP 5
-END
-	     
-LIST F_FREQUENZA_STAMPA 1 16
-BEGIN
-  PROMPT 2 3 "Stampa reg.riepilogativo "
-  HELP "Intervallo per fare il riepilogo"
-  FIELD S9
-  GROUP 4
-  ITEM "M|Mensile"
-  ITEM "T|Trimestrale"
-END
-
-BOOLEAN F_VENTIL
-BEGIN
-  PROMPT 2 3 "Attivita' con ventilazione"
-  HELP "Indicare se vengono registrate operazioni con ventilazione IVA"
-  FIELD B3
-  GROUP 3
-END
-
-BOOLEAN F_STAMPA_SULLO_STESSO_REGISTRO
-BEGIN
-  PROMPT 2 3 "Stampa sullo stesso registro"
-  HELP "Indicare se il nuovo esercizio viene stampato sullo stesso registro"
-  FIELD B8
-  GROUP 6
-END
-
 BOOLEAN F_REGSOSP
 BEGIN
   PROMPT 2 5 "Registro in sospensione "
@@ -381,9 +349,42 @@ BEGIN
   GROUP 6
 END
 
+BOOLEAN F_STAMPA_COSTI_RICAVI
+BEGIN
+  PROMPT 42 9 "Stampa costi/ricavi su libro cronologico "
+  FIELD B2
+  GROUP 5
+END
+	     
+LIST F_FREQUENZA_STAMPA 1 16
+BEGIN
+  PROMPT 42 9 "Stampa reg.riepilogativo "
+  HELP "Intervallo per fare il riepilogo"
+  FIELD S9
+  GROUP 4
+  ITEM "M|Mensile"
+  ITEM "T|Trimestrale"
+END
+
+BOOLEAN F_VENTIL
+BEGIN
+  PROMPT 46 9 "Attivita' con ventilazione"
+  HELP "Indicare se vengono registrate operazioni con ventilazione IVA"
+  FIELD B3
+  GROUP 3
+END
+
+BOOLEAN F_STAMPA_SULLO_STESSO_REGISTRO
+BEGIN
+  PROMPT 42 9 "Stampa sullo stesso registro"
+  HELP "Indicare se il nuovo esercizio viene stampato sullo stesso registro"
+  FIELD B8
+  GROUP 6
+END
+
 LIST F_MESE_STAMPA_ULTIMA_LIQ 10
 BEGIN
-  PROMPT 2 11 "Mese stampa ultima liquidazione "
+  PROMPT 2 11 "Mese stampa ultima liquidaz. "
   HELP "Mese in cui e' stata stampata l'ultima liquidazione"
   FIELD I4
   FLAGS "M"