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

@@ -6,12 +6,12 @@ TOOLBAR "" 0 20 0 2
 
 BUTTON DLG_OK 10 2
 BEGIN
-	PROMPT -12 -1 ""
+  PROMPT -12 -1 ""
 END
 
 BUTTON DLG_QUIT 10 2
 BEGIN
-	PROMPT -22 -1 ""
+  PROMPT -22 -1 ""
 END
 
 ENDPAGE
@@ -22,109 +22,109 @@ PAGE "Impostazione parametri ditta" -1 -1 77 8
 
 NUMBER FLD_ANLIIV 4
 BEGIN
-	PROMPT 2 1 "@bANNO LIQUIDAZIONE IVA   "
+  PROMPT 2 1 "@bANNO LIQUIDAZIONE IVA   "
-        HELP "Indicare l'anno dell'esercizio IVA corrente"
+  HELP "Indicare l'anno dell'esercizio IVA corrente"
-	FIELD AnLiIv
+  FIELD AnLiIv
 END
 
 BOOLEAN CHK_ANCFCM
 BEGIN
-	PROMPT 4 4 "Anagrafica clienti / anagrafica fornitori"
+  PROMPT 4 4 "Anagrafica clienti / anagrafica fornitori"
-        HELP "Indicare se gestire un'unica anagrafica clienti/fornitori"
+  HELP "Indicare se gestire un'unica anagrafica clienti/fornitori"
-	FLAGS "D"
+  FLAGS "D"
-	FIELD AnCfCm
+  FIELD AnCfCm
 END
 
 BOOLEAN CHK_PCTCCM
 BEGIN
-	PROMPT 4 5 "Piano conti / tabella causali"
+  PROMPT 4 5 "Piano conti / tabella causali"
-        HELP "Indicare se gestire un'unico archivio piano dei conti/causali"
+  HELP "Indicare se gestire un'unico archivio piano dei conti/causali"
-	FLAGS "D"
+  FLAGS "D"
-	FIELD PcTcCm
+  FIELD PcTcCm
 END
 
 GROUPBOX DLG_NULL 53 4
 BEGIN
-	PROMPT 2 3 "Archivi in comune"
+  PROMPT 2 3 "Archivi in comune"
 END
 
 
 RADIOBUTTON LST_RIFPAR 20
 BEGIN
-	PROMPT 55 3 "Riferimenti partite "
+  PROMPT 55 3 "Riferimenti partite "
-        HELP "Indicaer il criterio dei riferimenti delle partite"
+  HELP "Indicaer il criterio dei riferimenti delle partite"
-	ITEM " |N. protocollo"
+  ITEM " |N. protocollo"
-	ITEM "X|N. documento"
+  ITEM "X|N. documento"
-	HELP ""
+  HELP ""
-	FIELD RifPar
+  FIELD RifPar
 END
 
 GROUPBOX DLG_NULL 76 11
 BEGIN
-	PROMPT 2 7 ""
+  PROMPT 2 7 ""
 END
 
 BOOLEAN CHK_GSLBCN
 BEGIN
-	PROMPT 4 8 "Gestione libro cronologico "
+  PROMPT 4 8 "Gestione libro cronologico "
-        HELP "Indicare se attivare il libro cronologico della gestione per i professionisti"
+  HELP "Indicare se attivare il libro cronologico della gestione per i professionisti"
-	FIELD GsLbCn
+  FIELD GsLbCn
 END
 
 BOOLEAN CHK_STTFFR
 BEGIN
-	PROMPT 4 9 "Stampa totali fatture a fine registro "
+  PROMPT 4 9 "Stampa totali fatture a fine registro "
-        HELP "Indicare se attivare il computo dei totali fatture a fine registro"
+  HELP "Indicare se attivare il computo dei totali fatture a fine registro"
-	FIELD StTfFr
+  FIELD StTfFr
 END
 
 BOOLEAN CHK_STLGIU
 BEGIN
-	PROMPT 4 10 "Stampa libro giornale e libro IVA unico " 
+  PROMPT 4 10 "Stampa libro giornale e libro IVA unico " 
-        HELP "Indicare se utilizzare un unico registro per libro giornale e libro IVA"
+  HELP "Indicare se utilizzare un unico registro per libro giornale e libro IVA"
-	FIELD StLgiU
+  FIELD StLgiU
 END
 
 BOOLEAN CHK_GESSAL
 BEGIN
-	PROMPT 4 11 "Gestione saldaconto "
+  PROMPT 4 11 "Gestione saldaconto "
-        HELP "Indicare se attivare la gestione del saldaconto clienti/fornitori"
+  HELP "Indicare se attivare la gestione del saldaconto clienti/fornitori"
-	FIELD GesSal
+  FIELD GesSal
 END
 
 BOOLEAN CHK_NRCLIDX
 BEGIN
-	PROMPT 4 12 "N. Rif. allineato a destra per clienti"
+  PROMPT 4 12 "N. Rif. allineato a destra per clienti"
-        HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto"
+  HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto"
-	FIELD NrCliDx
+  FIELD NrCliDx
 END
 
 BOOLEAN CHK_NRFORDX
 BEGIN
-	PROMPT 4 13 "N. Rif. allineato a destra per fornitori"
+  PROMPT 4 13 "N. Rif. allineato a destra per fornitori"
-        HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto"
+  HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto"
-	FIELD NrForDx
+  FIELD NrForDx
 END
 
 BOOLEAN CHK_GESVAL
 BEGIN
-	PROMPT 4 14 "Gestione Valuta"
+  PROMPT 4 14 "Gestione Valuta"
-        HELP "Indicare se gestire i movimenti prima nota in valuta"
+  HELP "Indicare se gestire i movimenti prima nota in valuta"
-	FIELD GesVal                                         
+  FIELD GesVal                                         
 END
 
 BOOLEAN CHK_GELIDI
 BEGIN
-	PROMPT 4 15 "Gestione liquidazione differita"
+  PROMPT 4 15 "Gestione liquidazione differita"
-        HELP "Indicare se effettuare la liq. diff. ex DL 151 del 13-5-91 convertito da L. 202"
+  HELP "Indicare se effettuare la liq. diff. ex DL 151 del 13-5-91 convertito da L. 202"
-	FIELD GeLiDi
+  FIELD GeLiDi
 END
 
 BOOLEAN CHK_GESVEN
 BEGIN
-	PROMPT 4 16 "Gestione vendite"
+  PROMPT 4 16 "Gestione vendite"
-        HELP "Indicare se e' attivata anche la gestione delle vendite"
+  HELP "Indicare se e' attivata anche la gestione delle vendite"
-	FIELD GesVen
+  FIELD GesVen
 END
 
 ENDPAGE
@@ -134,223 +134,224 @@ PAGE "Impostazione parametri ditta" -1 -1 77 8
 
 GROUPBOX DLG_NULL 78 12
 BEGIN 
-	PROMPT 1 7 "Codici sottoconto per chiusura automatica dei conti"
+  PROMPT 1 7 "Codici sottoconto per chiusura automatica dei conti"
 END
 
 STRING FLD_CODLIC 3
 BEGIN
-	PROMPT 1 2 "Codice libro incassi/pagamenti "
+  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[1,4] FLD_ANLIIV SELECT
-	INPUT  CODTAB[5,7] FLD_CODLIC
+  INPUT  CODTAB[5,7] FLD_CODLIC
-	DISPLAY "Anno" CODTAB[1,4]
+  DISPLAY "Anno" CODTAB[1,4]
-	DISPLAY "Codice Registro" CODTAB[5,7]
+  DISPLAY "Codice Registro" CODTAB[5,7]
-	DISPLAY "Descrizione@50" S0
+  DISPLAY "Descrizione@50" S0
-	OUTPUT FLD_CODLIC CODTAB[5,7]
+  OUTPUT FLD_CODLIC CODTAB[5,7]
-	CHECKTYPE NORMAL
+  CHECKTYPE NORMAL
-	FIELD CodLic
+  FLAGS "UZ"
+  FIELD CodLic
 END
 
 STRING FLD_CODLIN 1
 BEGIN
-        PROMPT 1 3 "Codice lingua                  "
+  PROMPT 1 3 "Codice lingua                  "
-        HELP "Indicare la lingua utilizzata"
+  HELP "Indicare la lingua utilizzata"
-	USE %LNG
+  USE %LNG
-	DISPLAY "Codice" CODTAB
+  DISPLAY "Codice" CODTAB
-	DISPLAY "Descrizione@50" S0
+  DISPLAY "Descrizione@50" S0
-	OUTPUT FLD_CODLIN CODTAB
+  OUTPUT FLD_CODLIN CODTAB
-	INPUT  CODTAB FLD_CODLIN        
+  INPUT  CODTAB FLD_CODLIN        
-	CHECKTYPE NORMAL
+  CHECKTYPE NORMAL
-	FIELD CodLin
+  FIELD CodLin
 END
 
 STRING FLD_COCACH 3
 BEGIN
-	PROMPT 1 4 "Codice causale chiusura        "
+  PROMPT 1 4 "Codice causale chiusura        "
-        HELP "Codice della causale di chiusura che generera' il movimento"
+  HELP "Codice della causale di chiusura che generera' il movimento"
-	USE LF_CAUSALI SELECT MOVAP="C" 
+  USE LF_CAUSALI SELECT MOVAP="C" 
-	INPUT  CODCAUS FLD_COCACH       
+  INPUT  CODCAUS FLD_COCACH       
-	DISPLAY "Codice" CODCAUS
+  DISPLAY "Codice" CODCAUS
-	DISPLAY "Descrizione@50" DESCR
+  DISPLAY "Descrizione@50" DESCR
-	OUTPUT FLD_COCACH CODCAUS
+  OUTPUT FLD_COCACH CODCAUS
-	OUTPUT FLD_DCOCACH DESCR
+  OUTPUT FLD_DCOCACH DESCR
-	CHECKTYPE NORMAL
+  CHECKTYPE NORMAL
-	ADD RUN cg0 -4
+  ADD RUN cg0 -4
-	FLAGS "U"
+  FLAGS "UZ"
-	FIELD CoCaCh
+  FIELD CoCaCh
 END
 
 STRING FLD_DCOCACH 50 35
 BEGIN
-	PROMPT 40 4 ""
+  PROMPT 40 4 ""
-        HELP "Codice della causale di chiusura che generera' il movimento"
+  HELP "Codice della causale di chiusura che generera' il movimento"
-	USE LF_CAUSALI KEY 2 SELECT MOVAP="C" 
+  USE LF_CAUSALI KEY 2 SELECT MOVAP="C" 
-	INPUT  DESCR FLD_DCOCACH       
+  INPUT  DESCR FLD_DCOCACH       
-	DISPLAY "Descrizione@50" DESCR
+  DISPLAY "Descrizione@50" DESCR
-	DISPLAY "Codice" CODCAUS
+  DISPLAY "Codice" CODCAUS
-	COPY OUTPUT FLD_COCACH 
+  COPY OUTPUT FLD_COCACH 
  	CHECKTYPE NORMAL
-	ADD RUN cg0 -4
+  ADD RUN cg0 -4
 END
 
 STRING FLD_COCAAP 3
 BEGIN
-	PROMPT 1 5 "Codice causale apertura        "
+  PROMPT 1 5 "Codice causale apertura        "
-        HELP "Codice della causale di apertura che generera' il movimento"
+  HELP "Codice della causale di apertura che generera' il movimento"
-	FLAGS "U"
+  FLAGS "UZ"
-	USE LF_CAUSALI SELECT MOVAP="A" 
+  USE LF_CAUSALI SELECT MOVAP="A" 
-	INPUT CODCAUS FLD_COCAAP        
+  INPUT CODCAUS FLD_COCAAP        
-	COPY DISPLAY FLD_COCACH
+  COPY DISPLAY FLD_COCACH
-	OUTPUT FLD_COCAAP CODCAUS
+  OUTPUT FLD_COCAAP CODCAUS
-	OUTPUT FLD_DCOCAAP DESCR
+  OUTPUT FLD_DCOCAAP DESCR
-	ADD RUN cg0 -4
+  ADD RUN cg0 -4
-	CHECKTYPE NORMAL
+  CHECKTYPE NORMAL
-	FIELD CoCaAp
+  FIELD CoCaAp
 END
 
 STRING FLD_DCOCAAP 50 35
 BEGIN
-	PROMPT 40 5 ""
+  PROMPT 40 5 ""
-        HELP "Codice della causale di apertura che generera' il movimento"
+  HELP "Codice della causale di apertura che generera' il movimento"
-	USE LF_CAUSALI KEY 2 SELECT MOVAP="A" 
+  USE LF_CAUSALI KEY 2 SELECT MOVAP="A" 
-	INPUT  DESCR FLD_DCOCAAP       
+  INPUT  DESCR FLD_DCOCAAP       
-	COPY DISPLAY FLD_DCOCACH
+  COPY DISPLAY FLD_DCOCACH
-	COPY OUTPUT FLD_COCAAP 
+  COPY OUTPUT FLD_COCAAP 
  	CHECKTYPE NORMAL
-	ADD RUN cg0 -4
+  ADD RUN cg0 -4
 END
 
 TEXT    DLG_NULL
 BEGIN
-	PROMPT 26 8 "Gruppo Conto Sottoconto"
+  PROMPT 26 8 "Gruppo Conto Sottoconto"
 END
 
 TEXT    DLG_NULL 
 BEGIN
-	PROMPT 25 9 "________________________"
+  PROMPT 25 9 "________________________"
 END
 
 NUMBER  FLD_CSBICHG 3
 BEGIN
-	PROMPT 2 10 "Bilancio di chiusura    "
+  PROMPT 2 10 "Bilancio di chiusura    "
-        HELP "Codice del conto di riepilogo del bilancio di chiusura"
+  HELP "Codice del conto di riepilogo del bilancio di chiusura"
-	USE LF_PCON SELECT SOTTOCONTO!=""
+  USE LF_PCON SELECT SOTTOCONTO!=""
-	INPUT GRUPPO FLD_CSBICHG 
+  INPUT GRUPPO FLD_CSBICHG 
-	INPUT CONTO FLD_CSBICHC
+  INPUT CONTO FLD_CSBICHC
-	INPUT SOTTOCONTO FLD_CSBICHS
+  INPUT SOTTOCONTO FLD_CSBICHS
-	DISPLAY "Gruppo" GRUPPO
+  DISPLAY "Gruppo" GRUPPO
-	DISPLAY "Conto" CONTO
+  DISPLAY "Conto" CONTO
-	DISPLAY "Sottoconto" SOTTOCONTO
+  DISPLAY "Sottoconto" SOTTOCONTO
-	DISPLAY "Descrizione@50" DESCR
+  DISPLAY "Descrizione@50" DESCR
-	OUTPUT FLD_CSBICHG GRUPPO
+  OUTPUT FLD_CSBICHG GRUPPO
-	OUTPUT FLD_CSBICHC CONTO
+  OUTPUT FLD_CSBICHC CONTO
-	OUTPUT FLD_CSBICHS SOTTOCONTO
+  OUTPUT FLD_CSBICHS SOTTOCONTO
-	OUTPUT FLD_DCSBICH DESCR
+  OUTPUT FLD_DCSBICH DESCR
-	FIELD CsBiChG
+  FIELD CsBiChG
-	ADD RUN cg0 -0
+  ADD RUN cg0 -0
 END
 
 NUMBER  FLD_CSBICHC 3
 BEGIN
-	PROMPT 33 10 ""
+  PROMPT 33 10 ""
-        HELP "Codice del conto di riepilogo del bilancio di chiusura"
+  HELP "Codice del conto di riepilogo del bilancio di chiusura"
-	COPY ALL FLD_CSBICHG
+  COPY ALL FLD_CSBICHG
-	FIELD CsBiChC
+  FIELD CsBiChC
-	ADD RUN cg0 -0
+  ADD RUN cg0 -0
 END
 
 NUMBER FLD_CSBICHS 6
 BEGIN
-	PROMPT 40 10 ""
+  PROMPT 40 10 ""
-        HELP "Codice del conto di riepilogo del bilancio di chiusura"
+  HELP "Codice del conto di riepilogo del bilancio di chiusura"
-	COPY USE FLD_CSBICHG
+  COPY USE FLD_CSBICHG
-	COPY INPUT FLD_CSBICHG
+  COPY INPUT FLD_CSBICHG
-	COPY DISPLAY FLD_CSBICHG
+  COPY DISPLAY FLD_CSBICHG
-	OUTPUT FLD_CSBICHG GRUPPO
+  OUTPUT FLD_CSBICHG GRUPPO
-	OUTPUT FLD_CSBICHC CONTO
+  OUTPUT FLD_CSBICHC CONTO
-	OUTPUT FLD_CSBICHS SOTTOCONTO
+  OUTPUT FLD_CSBICHS SOTTOCONTO
-	OUTPUT FLD_DCSBICH DESCR
+  OUTPUT FLD_DCSBICH DESCR
-	CHECKTYPE NORMAL
+  CHECKTYPE NORMAL
-	FIELD CsBiChS
+  FIELD CsBiChS
-	ADD RUN cg0 -0
+  ADD RUN cg0 -0
 END
 
 STRING FLD_DCSBICH 50 25
 BEGIN
-	PROMPT 50 10 ""
+  PROMPT 50 10 ""
-        HELP "Codice del conto di riepilogo del bilancio di chiusura"
+  HELP "Codice del conto di riepilogo del bilancio di chiusura"
-	USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
+  USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
-	INPUT DESCR FLD_DCSBICH 
+  INPUT DESCR FLD_DCSBICH 
-	DISPLAY "Descrizione@50" DESCR
+  DISPLAY "Descrizione@50" DESCR
-	DISPLAY "Gruppo" GRUPPO
+  DISPLAY "Gruppo" GRUPPO
-	DISPLAY "Conto" CONTO
+  DISPLAY "Conto" CONTO
-	DISPLAY "Sottoconto" SOTTOCONTO
+  DISPLAY "Sottoconto" SOTTOCONTO
-	COPY OUTPUT FLD_CSBICHG
+  COPY OUTPUT FLD_CSBICHG
-	ADD RUN cg0 -0
+  ADD RUN cg0 -0
 END
 
 STRING  FLD_CSPRPEG 3
 BEGIN
-	PROMPT 2 11 "Profitti e perdite      "
+  PROMPT 2 11 "Profitti e perdite      "
-        HELP "Codice del conto di riepilogo del profitti e perdite"
+  HELP "Codice del conto di riepilogo del profitti e perdite"
-	COPY USE FLD_CSBICHG
+  COPY USE FLD_CSBICHG
-	COPY DISPLAY FLD_CSBICHG
+  COPY DISPLAY FLD_CSBICHG
-	OUTPUT FLD_CSPRPEG GRUPPO
+  OUTPUT FLD_CSPRPEG GRUPPO
-	OUTPUT FLD_CSPRPEC CONTO
+  OUTPUT FLD_CSPRPEC CONTO
-	OUTPUT FLD_CSPRPES SOTTOCONTO
+  OUTPUT FLD_CSPRPES SOTTOCONTO
-	OUTPUT FLD_DCSPRPE DESCR
+  OUTPUT FLD_DCSPRPE DESCR
-	INPUT GRUPPO FLD_CSPRPEG 
+  INPUT GRUPPO FLD_CSPRPEG 
-	INPUT CONTO FLD_CSPRPEC
+  INPUT CONTO FLD_CSPRPEC
-	INPUT SOTTOCONTO FLD_CSPRPES
+  INPUT SOTTOCONTO FLD_CSPRPES
-	FIELD CsPrPeG
+  FIELD CsPrPeG
-	ADD RUN cg0 -0
+  ADD RUN cg0 -0
 END
 
 NUMBER  FLD_CSPRPEC 3
 BEGIN
-        PROMPT 33 11 ""
+  PROMPT 33 11 ""
-        HELP "Codice del conto di riepilogo del profitti e perdite"
+  HELP "Codice del conto di riepilogo del profitti e perdite"
-	COPY ALL FLD_CSPRPEG
+  COPY ALL FLD_CSPRPEG
-	FIELD CsPrPeC
+  FIELD CsPrPeC
-	ADD RUN cg0 -0
+  ADD RUN cg0 -0
 END
 
 NUMBER  FLD_CSPRPES 6
 BEGIN
-	PROMPT 40 11 ""
+  PROMPT 40 11 ""
-        HELP "Codice del conto di riepilogo del profitti e perdite"
+  HELP "Codice del conto di riepilogo del profitti e perdite"
-	COPY USE FLD_CSPRPEG
+  COPY USE FLD_CSPRPEG
-	COPY INPUT FLD_CSPRPEG
+  COPY INPUT FLD_CSPRPEG
-	COPY DISPLAY FLD_CSPRPEG
+  COPY DISPLAY FLD_CSPRPEG
-	OUTPUT FLD_CSPRPEG GRUPPO
+  OUTPUT FLD_CSPRPEG GRUPPO
-	OUTPUT FLD_CSPRPEC CONTO
+  OUTPUT FLD_CSPRPEC CONTO
-	OUTPUT FLD_CSPRPES SOTTOCONTO
+  OUTPUT FLD_CSPRPES SOTTOCONTO
-	OUTPUT FLD_DCSPRPE DESCR
+  OUTPUT FLD_DCSPRPE DESCR
-	CHECKTYPE NORMAL
+  CHECKTYPE NORMAL
-	FIELD CsPrPeS
+  FIELD CsPrPeS
-	ADD RUN cg0 -0
+  ADD RUN cg0 -0
 END
 
 STRING FLD_DCSPRPE 50 25
 BEGIN
-	PROMPT 50 11 ""
+  PROMPT 50 11 ""
-        HELP "Codice del conto di riepilogo del profitti e perdite"
+  HELP "Codice del conto di riepilogo del profitti e perdite"
-	COPY USE FLD_DCSBICH
+  COPY USE FLD_DCSBICH
-	INPUT DESCR FLD_DCSPRPE 
+  INPUT DESCR FLD_DCSPRPE 
-	COPY DISPLAY FLD_DCSBICH
+  COPY DISPLAY FLD_DCSBICH
-	COPY OUTPUT FLD_CSPRPEG
+  COPY OUTPUT FLD_CSPRPEG
-	ADD RUN cg0 -0
+  ADD RUN cg0 -0
 END
 
 
 NUMBER  FLD_CSBIAPG 3
 BEGIN
-	PROMPT 2 12 "Bilancio di apertura    "
+  PROMPT 2 12 "Bilancio di apertura    "
-        HELP "Codice del conto di riepilogo del bilancio di apertura"
+  HELP "Codice del conto di riepilogo del bilancio di apertura"
-	COPY USE FLD_CSBICHG
+  COPY USE FLD_CSBICHG
-	COPY DISPLAY FLD_CSBICHG
+  COPY DISPLAY FLD_CSBICHG
-	OUTPUT FLD_CSBIAPG GRUPPO
+  OUTPUT FLD_CSBIAPG GRUPPO
 	OUTPUT FLD_CSBIAPC CONTO
 	OUTPUT FLD_CSBIAPS SOTTOCONTO
 	OUTPUT FLD_DCSBIAP DESCR
@@ -365,7 +366,7 @@ END
 NUMBER  FLD_CSBIAPC 3
 BEGIN
 	PROMPT 33 12 ""
-        HELP "Codice del conto di riepilogo del bilancio di apertura"
+  HELP "Codice del conto di riepilogo del bilancio di apertura"
 	COPY ALL FLD_CSBIAPG        
 	FIELD CsBiApC
 	ADD RUN cg0 -0
@@ -374,7 +375,7 @@ END
 NUMBER  FLD_CSBIAPS 6
 BEGIN
 	PROMPT 40 12 ""
-        HELP "Codice del conto di riepilogo del bilancio di apertura"
+  HELP "Codice del conto di riepilogo del bilancio di apertura"
 	COPY USE FLD_CSBIAPG        
 	COPY INPUT FLD_CSBIAPG        
 	COPY DISPLAY FLD_CSBIAPG        
@@ -390,7 +391,7 @@ END
 STRING FLD_DCSBIAP 50 25
 BEGIN
 	PROMPT 50 12 ""
-        HELP "Codice del conto di riepilogo del bilancio di apertura"
+  HELP "Codice del conto di riepilogo del bilancio di apertura"
 	COPY USE FLD_DCSBICH
 	INPUT DESCR FLD_DCSBIAP 
 	COPY DISPLAY FLD_DCSBICH
@@ -402,7 +403,7 @@ END
 NUMBER  FLD_CSUECPG 3
 BEGIN
 	PROMPT 2 13 "Utile esercizio patrim. "
-        HELP "Codice del conto patrimoniale dell'utile d'esercizio"
+  HELP "Codice del conto patrimoniale dell'utile d'esercizio"
 	COPY USE FLD_CSBICHG
 	COPY DISPLAY FLD_CSBICHG
 	OUTPUT FLD_CSUECPG GRUPPO
@@ -418,7 +419,7 @@ END
 NUMBER  FLD_CSUECPC 3
 BEGIN
 	PROMPT 33 13 ""
-        HELP "Codice del conto patrimoniale dell'utile d'esercizio"
+  HELP "Codice del conto patrimoniale dell'utile d'esercizio"
 	COPY ALL FLD_CSUECPG  
 	FIELD CsUeCpC
 	ADD RUN cg0 -0
@@ -426,7 +427,7 @@ END
 NUMBER  FLD_CSUECPS 6
 BEGIN
 	PROMPT 40 13 ""
-        HELP "Codice del conto patrimoniale dell'utile d'esercizio"
+  HELP "Codice del conto patrimoniale dell'utile d'esercizio"
 	COPY USE FLD_CSUECPG  
 	COPY INPUT FLD_CSUECPG  
 	COPY DISPLAY FLD_CSUECPG  
@@ -442,7 +443,7 @@ END
 STRING FLD_DCSUECP 50 25
 BEGIN
 	PROMPT 50 13 ""
-        HELP "Codice del conto patrimoniale dell'utile d'esercizio"
+  HELP "Codice del conto patrimoniale dell'utile d'esercizio"
 	COPY USE FLD_DCSBICH
 	INPUT DESCR FLD_DCSUECP 
 	COPY DISPLAY FLD_DCSBICH
@@ -453,7 +454,7 @@ END
 NUMBER  FLD_CSPECPG 3
 BEGIN
 	PROMPT 2 14 "Perdita eserc. patrim.  "
-        HELP "Codice del conto patrimoniale della perdita d'esercizio"
+  HELP "Codice del conto patrimoniale della perdita d'esercizio"
 	COPY USE FLD_CSBICHG
 	COPY DISPLAY FLD_CSBICHG
 	OUTPUT FLD_CSPECPG GRUPPO
@@ -470,7 +471,7 @@ END
 NUMBER  FLD_CSPECPC 3
 BEGIN
 	PROMPT 33 14 ""
-        HELP "Codice del conto patrimoniale della perdita d'esercizio"
+  HELP "Codice del conto patrimoniale della perdita d'esercizio"
 	COPY ALL FLD_CSPECPG
 	FIELD CsPeCpC
 	ADD RUN cg0 -0
@@ -479,7 +480,7 @@ END
 NUMBER  FLD_CSPECPS 6
 BEGIN
 	PROMPT 40 14 ""
-        HELP "Codice del conto patrimoniale della perdita d'esercizio"
+  HELP "Codice del conto patrimoniale della perdita d'esercizio"
 	COPY USE FLD_CSPECPG
 	COPY INPUT FLD_CSPECPG
 	COPY DISPLAY FLD_CSPECPG
@@ -495,7 +496,7 @@ END
 STRING FLD_DCSPECP 50 25
 BEGIN
 	PROMPT 50 14 ""
-        HELP "Codice del conto patrimoniale della perdita d'esercizio"
+  HELP "Codice del conto patrimoniale della perdita d'esercizio"
 	COPY USE FLD_DCSBICH
 	INPUT DESCR FLD_DCSPECP 
 	COPY DISPLAY FLD_DCSBICH
@@ -506,7 +507,7 @@ END
 NUMBER  FLD_CSUECEG 3
 BEGIN
 	PROMPT 2 15 "Utile esercizio econ.   "
-        HELP "Codice del conto economico dell'utile d'esercizio"
+  HELP "Codice del conto economico dell'utile d'esercizio"
 	COPY USE FLD_CSBICHG
 	COPY DISPLAY FLD_CSBICHG
 	OUTPUT FLD_CSUECEG GRUPPO
@@ -522,7 +523,7 @@ END
 NUMBER  FLD_CSUECEC 3
 BEGIN
 	PROMPT 33 15 ""
-        HELP "Codice del conto economico dell'utile d'esercizio"
+  HELP "Codice del conto economico dell'utile d'esercizio"
 	COPY ALL FLD_CSUECEG
 	FIELD CsUeCeC
 	ADD RUN cg0 -0
@@ -530,7 +531,7 @@ END
 NUMBER  FLD_CSUECES 6
 BEGIN
 	PROMPT 40 15 ""
-        HELP "Codice del conto economico dell'utile d'esercizio"
+  HELP "Codice del conto economico dell'utile d'esercizio"
 	COPY USE FLD_CSUECEG
 	COPY INPUT FLD_CSUECEG
 	COPY DISPLAY FLD_CSUECEG
@@ -546,7 +547,7 @@ END
 STRING FLD_DCSUECE 50 25
 BEGIN
 	PROMPT 50 15 ""
-        HELP "Codice del conto economico dell'utile d'esercizio"
+  HELP "Codice del conto economico dell'utile d'esercizio"
 	COPY USE FLD_DCSBICH
 	INPUT DESCR FLD_DCSUECE 
 	COPY DISPLAY FLD_DCSBICH
@@ -557,7 +558,7 @@ END
 NUMBER  FLD_CSPECEG 3
 BEGIN
 	PROMPT 2 16 "Perdita eserc. econ.    "
-        HELP "Codice del conto economico della perdita d'esercizio"
+  HELP "Codice del conto economico della perdita d'esercizio"
 	COPY USE FLD_CSBICHG
 	COPY DISPLAY FLD_CSBICHG
 	OUTPUT FLD_CSPECEG GRUPPO
@@ -573,7 +574,7 @@ END
 NUMBER  FLD_CSPECEC 3
 BEGIN
 	PROMPT 33 16 ""
-        HELP "Codice del conto economico della perdita d'esercizio"
+  HELP "Codice del conto economico della perdita d'esercizio"
 	COPY ALL FLD_CSPECEG
 	FIELD CsPeCeC
 	ADD RUN cg0 -0
@@ -581,7 +582,7 @@ END
 NUMBER  FLD_CSPECES 6
 BEGIN
 	PROMPT 40 16 ""
-        HELP "Codice del conto economico della perdita d'esercizio"
+  HELP "Codice del conto economico della perdita d'esercizio"
 	COPY USE FLD_CSPECEG
 	COPY INPUT FLD_CSPECEG
 	COPY DISPLAY FLD_CSPECEG
@@ -596,7 +597,7 @@ END
 STRING FLD_DCSPECE 50 25
 BEGIN
 	PROMPT 50 16 ""
-        HELP "Codice del conto economico della perdita d'esercizio"
+  HELP "Codice del conto economico della perdita d'esercizio"
 	USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
 	INPUT DESCR FLD_DCSPECE 
 	COPY DISPLAY FLD_DCSBICH
@@ -619,7 +620,7 @@ END
 RADIOBUTTON LST_RRFRAM 16
 BEGIN
 	PROMPT 3 2 ""
-        HELP "Frequenza del calcolo dei ratei e risconti"
+  HELP "Frequenza del calcolo dei ratei e risconti"
 	ITEM "A|Freq. Annuale"
 	ITEM "M|Freq. Mensile"
 	FIELD RrFrAm
@@ -628,20 +629,20 @@ END
 BOOLEAN CHK_RRMECO
 BEGIN
 	PROMPT 26 3 "Mese Commerciale"
-        HELP "Indicare se viene utilizzato nel calcolo il mese commerciale"
+  HELP "Indicare se viene utilizzato nel calcolo il mese commerciale"
 	FIELD RrMeCo
 END
 
 STRING FLD_RRCCRA 3
 BEGIN
 	PROMPT 3 6 "Causale ratei    "
-        HELP "Codice causale dei ratei per movimento di contabilita'"
+  HELP "Codice causale dei ratei per movimento di contabilita'"
-	FLAGS "U"
+	FLAGS "UZ"
 	USE LF_CAUSALI
 	INPUT  CODCAUS FLD_RRCCRA       
 	COPY DISPLAY FLD_COCACH
 	OUTPUT FLD_RRCCRA CODCAUS
-        OUTPUT FLD_DRRCCRA DESCR
+  OUTPUT FLD_DRRCCRA DESCR
 	CHECKTYPE NORMAL
 	ADD RUN cg0 -4
 	FIELD RrCcRa
@@ -650,7 +651,7 @@ END
 STRING FLD_DRRCCRA 50 48
 BEGIN
 	PROMPT 26 6 ""
-        HELP "Descrizione causale dei ratei per movimento di contabilita'"
+  HELP "Descrizione causale dei ratei per movimento di contabilita'"
 	USE LF_CAUSALI KEY 2
 	INPUT  DESCR FLD_DRRCCRA       
 	COPY DISPLAY FLD_DCOCACH
@@ -662,13 +663,13 @@ END
 STRING FLD_RRCCRI 3
 BEGIN
 	PROMPT 3 8 "Causale risconti "
-        HELP "Codice causale dei risconti per movimento di contabilita'"
+  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
 	OUTPUT FLD_RRCCRI CODCAUS
-        OUTPUT FLD_DRRCCRI DESCR
+  OUTPUT FLD_DRRCCRI DESCR
 	CHECKTYPE NORMAL
 	ADD RUN cg0 -4
 	FIELD RrCcRi
@@ -677,7 +678,7 @@ END
 STRING FLD_DRRCCRI 50 48
 BEGIN
 	PROMPT 26 8 ""
-        HELP "Descrizione causale dei risconti per movimento di contabilita'"
+  HELP "Descrizione causale dei risconti per movimento di contabilita'"
 	USE LF_CAUSALI KEY 2
 	INPUT  DESCR FLD_DRRCCRI       
 	COPY DISPLAY FLD_DCOCACH

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