Corretto errore MI4090

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

cg/cg0500a.uml

@@ -19,7 +19,7 @@ BEGIN
   HELP "Codice identificativo della causale"
   FIELD LF_CAUSALI->CODCAUS
   KEY 1
-  FLAGS "U"
+  FLAGS "UZ"
   USE LF_CAUSALI
   INPUT CODCAUS F_COD_CAUS
   DISPLAY "Codice" CODCAUS
@@ -94,7 +94,7 @@ BEGIN
   OUTPUT F_CORRISP B0
   WARNING "Registro assente o non compatibile col tipo documento"
   CHECKTYPE NORMAL
-  FLAGS "DU"
+  FLAGS "DUZ"
 END
 
 // Questo rimane quasi sempre nascosto
@@ -248,7 +248,7 @@ STRING F_COD_CAUS_IM 3
 BEGIN
   PROMPT 34 8 "Codice causale per l'incasso immediato "
   HELP "Codice causale nel caso di incasso immediato"
-  FLAGS "U"
+  FLAGS "UZ"
   FIELD LF_CAUSALI->CODCAUSIM
   COPY USE F_COD_CAUS
   INPUT CODCAUS F_COD_CAUS_IM

cg/cg1500a.uml

@@ -39,8 +39,8 @@ BEGIN
   DISPLAY "Data fine esercizio" D1
   OUTPUT F_ANNO CODTAB
   //CHECKTYPE NORMAL
-  //MESSAGE HIDE,98|HIDE,99|SHOW,96|SHOW,97  //se il campo e' vuoto manda questi messaggi
+  //MESSAGE HIDE,98|HIDE,99|SHOW,96|SHOW,97 
-  //MESSAGE EMPTY HIDE,96|HIDE,97|SHOW,98|SHOW,99  //se invece e' pieno manda questi
+  //MESSAGE EMPTY HIDE,96|HIDE,97|SHOW,98|SHOW,99
   FLAGS "RZ"
 END
 

cg/cg3100a.uml

@@ -95,35 +95,21 @@ END
 
 DATE F_DATAINI
 BEGIN
-<<<<<<< cg3100a.uml
-     PROMPT 19 11 "Stampa mov. dalla data "
-     HELP "Data da cui iniziare la stampa"
-=======
      PROMPT 16 11 "Stampa mov. dalla data "
-     //HELP "Se non indicato nessun valore viene effettuata una stampa completa in ordine di data"
+     HELP "Data da cui iniziare la stampa"
->>>>>>> 1.12
      GROUP 3
 END
 
 DATE F_DATAFIN
 BEGIN
-<<<<<<< cg3100a.uml
-    PROMPT 55 11 "alla data "
-    HELP "Data fino a cui stampare i movimenti"
-=======
     PROMPT 52 11 "alla data "
->>>>>>> 1.12
+    HELP "Data fino a cui stampare i movimenti"
     GROUP 3
 END
 
 NUMBER F_NUMEROINI 7
 BEGIN
-<<<<<<< cg3100a.uml
-    PROMPT 19 12 "Stampa mov. dal numero "
-    HELP "Numero del movimento da cui iniziare la stampa"
-=======
     PROMPT 16 12 "Stampa mov. dal numero "
->>>>>>> 1.12
     USE LF_MOV KEY 1
     INPUT NUMREG F_NUMEROINI
     DISPLAY "Numero@6" NUMREG 
@@ -135,16 +121,12 @@ BEGIN
     CHECKTYPE NORMAL 
     FLAGS "R"
     GROUP 2
+    HELP "Numero del movimento da cui iniziare la stampa"
 END
 
 NUMBER F_NUMEROFIN 7
 BEGIN
-<<<<<<< cg3100a.uml
-    PROMPT 55 12 "al numero "
-    HELP "Numero del movimenti fino cui fare la stampa"
-=======
     PROMPT 52 12 "al numero "
->>>>>>> 1.12
     COPY USE F_NUMEROINI
     INPUT NUMREG F_NUMEROFIN
     COPY DISPLAY F_NUMEROINI
@@ -154,6 +136,7 @@ BEGIN
     NUM_EXPR {(#F_NUMEROFIN==0)||(#F_NUMEROFIN>=#F_NUMEROINI)}
     WARNING "Limite superiore errato"
     GROUP 2
+    HELP "Numero del movimenti fino cui fare la stampa"
 END
 
 STRING F_CAUSALEINI 3
@@ -164,7 +147,7 @@ BEGIN
     DISPLAY "Codice causale" CODCAUS
     DISPLAY "Descrizione@50" DESCR
     OUTPUT F_CAUSALEINI CODCAUS
-    FLAGS "UR"
+    FLAGS "UZ"
     HELP "Causale di inizio stampa: vuoto = inizio archivio"
 END
 
@@ -176,7 +159,7 @@ BEGIN
     DISPLAY "Codice causale" CODCAUS
     DISPLAY "Descrizione@50" DESCR
     OUTPUT F_CAUSALEFIN CODCAUS
-    FLAGS "UR"
+    FLAGS "UZ"
     HELP "Causale di fine stampa: vuoto = fine archivio"
 END
 
@@ -190,7 +173,7 @@ BEGIN
   DISPLAY "Cod. registro iva" CODTAB[5,7]
   DISPLAY "Descrizione@40" S0
   OUTPUT F_REGISTROINI CODTAB[5,7]
-  FLAGS "UR"
+  FLAGS "UZ"
   //CHECKTYPE NORMAL
   HELP "Codice registro iva di inizio stampa: vuoto = inizio archivio"
 END
@@ -205,7 +188,7 @@ BEGIN
     DISPLAY "Cod. registro iva" CODTAB[5,7]
     DISPLAY "Descrizione@40" S0
     OUTPUT F_REGISTROFIN CODTAB[5,7]
-    FLAGS "UR"
+    FLAGS "UZ"
     //CHECKTYPE NORMAL
     HELP "Codice registro iva di fine stampa: vuoto = fine archivio"
 END

cg/cg3400a.uml

@@ -21,7 +21,7 @@ BEGIN
 //    OUTPUT DATA_A D1
 //    CHECKTYPE NORMAL
     WARNING "Registro inesistente"
-    FLAGS "U"
+    FLAGS "UZ"
 END
 
 NUMBER ANNO_ESER 4

cg/cg4400a.uml

@@ -96,7 +96,7 @@ BEGIN
   OUTPUT ANNO CODTAB[1,4] 
   OUTPUT CODICE_LIBRO CODTAB[5,7]
   //CHECKTYPE NORMAL
-  FLAGS "UR"
+  FLAGS "UZ"
   GROUP 1
 END
 
@@ -113,7 +113,7 @@ BEGIN
   OUTPUT ANNO CODTAB[1,4] 
   OUTPUT CODICE_LIBRO_PROVA CODTAB[5,7]
   //CHECKTYPE NORMAL
-  FLAGS "UR"
+  FLAGS "UZ"
   GROUP 1
 END
 
@@ -208,7 +208,7 @@ BEGIN
   OUTPUT ANNO CODTAB[1,4] 
   OUTPUT CODICE_LIBRO_IVA CODTAB[5,7]
   //CHECKTYPE NORMAL
-  FLAGS "UR"
+  FLAGS "UZ"
   GROUP 2
 END
 

cg/cg4600a.uml

@@ -27,6 +27,7 @@ BEGIN
   PROMPT 2 4 "Codice causale chiusura "
   HELP "Codice causale che genera il movimento di chiusura"
   USE LF_CAUSALI KEY 1
+  FLAGS "UZ"
   DISPLAY "Codice" CODCAUS
   DISPLAY "Descrizione @50" DESCR
   OUTPUT F_CHIUSURA CODCAUS
@@ -39,6 +40,7 @@ BEGIN
   PROMPT 2 5 "Codice causale apertura "
   HELP "Codice causale che genera il movimento di apertura"
   COPY USE F_CHIUSURA
+  FLAGS "UZ"
   COPY DISPLAY F_CHIUSURA
   OUTPUT F_APERTURA CODCAUS
   INPUT  CODCAUS F_APERTURA

cg/cg5000a.uml

@@ -110,12 +110,14 @@ BEGIN
 	PROMPT 3 9 "Codice IVA per ricavi misti agenzie di viaggio              "
         HELP "Codice IVA per scorporo operazioni con l'esetero per agenzie di viaggio"
 	USE %IVA
+	FLAGS "U"
 	INPUT CODTAB FLD_CODAGV
 	DISPLAY "Codice" CODTAB
 	DISPLAY "Descrizione@50" S0
 	OUTPUT FLD_CODAGV CODTAB
 	CHECKTYPE NORMAL
 	FIELD CodAgv
+        VALIDATE ZEROFILL_FUNC 2
 END
 
 GROUPBOX DLG_NULL 74 4

cg/cg5100a.uml

@@ -141,7 +141,7 @@ STRING FLD_CODLIC 3
 BEGIN
   PROMPT 1 2 "Codice libro incassi/pagamenti "
   HELP "Indicare il codice del libro degli incassi/pagamenti"
-	USE %REG SELECT I0=5
+  USE REG SELECT I0=5
   INPUT CODTAB[1,4] FLD_ANLIIV SELECT
   INPUT  CODTAB[5,7] FLD_CODLIC
   DISPLAY "Anno" CODTAB[1,4]
@@ -149,6 +149,7 @@ BEGIN
   DISPLAY "Descrizione@50" S0
   OUTPUT FLD_CODLIC CODTAB[5,7]
   CHECKTYPE NORMAL
+  FLAGS "UZ"
   FIELD CodLic
 END
 
@@ -177,7 +178,7 @@ BEGIN
   OUTPUT FLD_DCOCACH DESCR
   CHECKTYPE NORMAL
   ADD RUN cg0 -4
-	FLAGS "U"
+  FLAGS "UZ"
   FIELD CoCaCh
 END
 
@@ -198,7 +199,7 @@ STRING FLD_COCAAP 3
 BEGIN
   PROMPT 1 5 "Codice causale apertura        "
   HELP "Codice della causale di apertura che generera' il movimento"
-	FLAGS "U"
+  FLAGS "UZ"
   USE LF_CAUSALI SELECT MOVAP="A" 
   INPUT CODCAUS FLD_COCAAP        
   COPY DISPLAY FLD_COCACH
@@ -636,7 +637,7 @@ STRING FLD_RRCCRA 3
 BEGIN
 	PROMPT 3 6 "Causale ratei    "
   HELP "Codice causale dei ratei per movimento di contabilita'"
-	FLAGS "U"
+	FLAGS "UZ"
 	USE LF_CAUSALI
 	INPUT  CODCAUS FLD_RRCCRA       
 	COPY DISPLAY FLD_COCACH
@@ -663,7 +664,7 @@ STRING FLD_RRCCRI 3
 BEGIN
 	PROMPT 3 8 "Causale risconti "
   HELP "Codice causale dei risconti per movimento di contabilita'"
-	FLAGS "U"
+	FLAGS "UZ"
 	COPY USE FLD_RRCCRA
 	INPUT  CODCAUS FLD_RRCCRI       
 	COPY DISPLAY FLD_COCACH

cg/cg5400a.uml

@@ -33,7 +33,7 @@ END
 STRING F_REG 3
 BEGIN
   PROMPT 4 3 "Registro  "
-  FLAGS "U"
+  FLAGS "UZ"
   USE REG SELECT I0<6
   INPUT CODTAB[1,4] F_YEAR
   INPUT CODTAB[5,7] F_REG