diff --git a/cg/cg0500a.uml b/cg/cg0500a.uml index 660e2efd0..58ddba998 100755 --- a/cg/cg0500a.uml +++ b/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 diff --git a/cg/cg1500a.uml b/cg/cg1500a.uml index 03ce8901b..48a29cf5d 100755 --- a/cg/cg1500a.uml +++ b/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 EMPTY HIDE,96|HIDE,97|SHOW,98|SHOW,99 //se invece e' pieno manda questi + //MESSAGE HIDE,98|HIDE,99|SHOW,96|SHOW,97 + //MESSAGE EMPTY HIDE,96|HIDE,97|SHOW,98|SHOW,99 FLAGS "RZ" END diff --git a/cg/cg3100a.uml b/cg/cg3100a.uml index ad35e29ae..235844495 100755 --- a/cg/cg3100a.uml +++ b/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" ->>>>>>> 1.12 + HELP "Data da cui iniziare la stampa" 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 diff --git a/cg/cg3400a.uml b/cg/cg3400a.uml index d96b3be18..a22f56715 100755 --- a/cg/cg3400a.uml +++ b/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 diff --git a/cg/cg4400a.uml b/cg/cg4400a.uml index d99c01266..24b115482 100755 --- a/cg/cg4400a.uml +++ b/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 diff --git a/cg/cg4600a.uml b/cg/cg4600a.uml index 04f079633..a2bbe0e66 100755 --- a/cg/cg4600a.uml +++ b/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 diff --git a/cg/cg5000a.uml b/cg/cg5000a.uml index 8fa9cab1c..ef262932f 100755 --- a/cg/cg5000a.uml +++ b/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 diff --git a/cg/cg5100a.uml b/cg/cg5100a.uml index 5838475cc..0646fb689 100755 --- a/cg/cg5100a.uml +++ b/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 " - HELP "Indicare l'anno dell'esercizio IVA corrente" - FIELD AnLiIv + PROMPT 2 1 "@bANNO LIQUIDAZIONE IVA " + HELP "Indicare l'anno dell'esercizio IVA corrente" + FIELD AnLiIv END BOOLEAN CHK_ANCFCM BEGIN - PROMPT 4 4 "Anagrafica clienti / anagrafica fornitori" - HELP "Indicare se gestire un'unica anagrafica clienti/fornitori" - FLAGS "D" - FIELD AnCfCm + PROMPT 4 4 "Anagrafica clienti / anagrafica fornitori" + HELP "Indicare se gestire un'unica anagrafica clienti/fornitori" + FLAGS "D" + FIELD AnCfCm END BOOLEAN CHK_PCTCCM BEGIN - PROMPT 4 5 "Piano conti / tabella causali" - HELP "Indicare se gestire un'unico archivio piano dei conti/causali" - FLAGS "D" - FIELD PcTcCm + PROMPT 4 5 "Piano conti / tabella causali" + HELP "Indicare se gestire un'unico archivio piano dei conti/causali" + FLAGS "D" + 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 " - HELP "Indicaer il criterio dei riferimenti delle partite" - ITEM " |N. protocollo" - ITEM "X|N. documento" - HELP "" - FIELD RifPar + PROMPT 55 3 "Riferimenti partite " + HELP "Indicaer il criterio dei riferimenti delle partite" + ITEM " |N. protocollo" + ITEM "X|N. documento" + HELP "" + 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 " - HELP "Indicare se attivare il libro cronologico della gestione per i professionisti" - FIELD GsLbCn + PROMPT 4 8 "Gestione libro cronologico " + HELP "Indicare se attivare il libro cronologico della gestione per i professionisti" + FIELD GsLbCn END BOOLEAN CHK_STTFFR BEGIN - PROMPT 4 9 "Stampa totali fatture a fine registro " - HELP "Indicare se attivare il computo dei totali fatture a fine registro" - FIELD StTfFr + PROMPT 4 9 "Stampa totali fatture a fine registro " + HELP "Indicare se attivare il computo dei totali fatture a fine registro" + FIELD StTfFr END BOOLEAN CHK_STLGIU BEGIN - PROMPT 4 10 "Stampa libro giornale e libro IVA unico " - HELP "Indicare se utilizzare un unico registro per libro giornale e libro IVA" - FIELD StLgiU + PROMPT 4 10 "Stampa libro giornale e libro IVA unico " + HELP "Indicare se utilizzare un unico registro per libro giornale e libro IVA" + FIELD StLgiU END BOOLEAN CHK_GESSAL BEGIN - PROMPT 4 11 "Gestione saldaconto " - HELP "Indicare se attivare la gestione del saldaconto clienti/fornitori" - FIELD GesSal + PROMPT 4 11 "Gestione saldaconto " + HELP "Indicare se attivare la gestione del saldaconto clienti/fornitori" + FIELD GesSal END BOOLEAN CHK_NRCLIDX BEGIN - PROMPT 4 12 "N. Rif. allineato a destra per clienti" - HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto" - FIELD NrCliDx + PROMPT 4 12 "N. Rif. allineato a destra per clienti" + HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto" + FIELD NrCliDx END BOOLEAN CHK_NRFORDX BEGIN - PROMPT 4 13 "N. Rif. allineato a destra per fornitori" - HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto" - FIELD NrForDx + PROMPT 4 13 "N. Rif. allineato a destra per fornitori" + HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto" + FIELD NrForDx END BOOLEAN CHK_GESVAL BEGIN - PROMPT 4 14 "Gestione Valuta" - HELP "Indicare se gestire i movimenti prima nota in valuta" - FIELD GesVal + PROMPT 4 14 "Gestione Valuta" + HELP "Indicare se gestire i movimenti prima nota in valuta" + FIELD GesVal END BOOLEAN CHK_GELIDI BEGIN - PROMPT 4 15 "Gestione liquidazione differita" - HELP "Indicare se effettuare la liq. diff. ex DL 151 del 13-5-91 convertito da L. 202" - FIELD GeLiDi + PROMPT 4 15 "Gestione liquidazione differita" + HELP "Indicare se effettuare la liq. diff. ex DL 151 del 13-5-91 convertito da L. 202" + FIELD GeLiDi END BOOLEAN CHK_GESVEN BEGIN - PROMPT 4 16 "Gestione vendite" - HELP "Indicare se e' attivata anche la gestione delle vendite" - FIELD GesVen + PROMPT 4 16 "Gestione vendite" + HELP "Indicare se e' attivata anche la gestione delle vendite" + 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 - INPUT CODTAB[1,4] FLD_ANLIIV SELECT - INPUT CODTAB[5,7] FLD_CODLIC - DISPLAY "Anno" CODTAB[1,4] - DISPLAY "Codice Registro" CODTAB[5,7] - DISPLAY "Descrizione@50" S0 - OUTPUT FLD_CODLIC CODTAB[5,7] - CHECKTYPE NORMAL - FIELD CodLic + USE REG SELECT I0=5 + INPUT CODTAB[1,4] FLD_ANLIIV SELECT + INPUT CODTAB[5,7] FLD_CODLIC + DISPLAY "Anno" CODTAB[1,4] + DISPLAY "Codice Registro" CODTAB[5,7] + DISPLAY "Descrizione@50" S0 + OUTPUT FLD_CODLIC CODTAB[5,7] + CHECKTYPE NORMAL + FLAGS "UZ" + FIELD CodLic END STRING FLD_CODLIN 1 BEGIN - PROMPT 1 3 "Codice lingua " - HELP "Indicare la lingua utilizzata" - USE %LNG - DISPLAY "Codice" CODTAB - DISPLAY "Descrizione@50" S0 - OUTPUT FLD_CODLIN CODTAB - INPUT CODTAB FLD_CODLIN - CHECKTYPE NORMAL - FIELD CodLin + PROMPT 1 3 "Codice lingua " + HELP "Indicare la lingua utilizzata" + USE %LNG + DISPLAY "Codice" CODTAB + DISPLAY "Descrizione@50" S0 + OUTPUT FLD_CODLIN CODTAB + INPUT CODTAB FLD_CODLIN + CHECKTYPE NORMAL + FIELD CodLin END STRING FLD_COCACH 3 BEGIN - PROMPT 1 4 "Codice causale chiusura " - HELP "Codice della causale di chiusura che generera' il movimento" - USE LF_CAUSALI SELECT MOVAP="C" - INPUT CODCAUS FLD_COCACH - DISPLAY "Codice" CODCAUS - DISPLAY "Descrizione@50" DESCR - OUTPUT FLD_COCACH CODCAUS - OUTPUT FLD_DCOCACH DESCR - CHECKTYPE NORMAL - ADD RUN cg0 -4 - FLAGS "U" - FIELD CoCaCh + PROMPT 1 4 "Codice causale chiusura " + HELP "Codice della causale di chiusura che generera' il movimento" + USE LF_CAUSALI SELECT MOVAP="C" + INPUT CODCAUS FLD_COCACH + DISPLAY "Codice" CODCAUS + DISPLAY "Descrizione@50" DESCR + OUTPUT FLD_COCACH CODCAUS + OUTPUT FLD_DCOCACH DESCR + CHECKTYPE NORMAL + ADD RUN cg0 -4 + FLAGS "UZ" + FIELD CoCaCh END STRING FLD_DCOCACH 50 35 BEGIN - PROMPT 40 4 "" - HELP "Codice della causale di chiusura che generera' il movimento" - USE LF_CAUSALI KEY 2 SELECT MOVAP="C" - INPUT DESCR FLD_DCOCACH - DISPLAY "Descrizione@50" DESCR - DISPLAY "Codice" CODCAUS - COPY OUTPUT FLD_COCACH + PROMPT 40 4 "" + HELP "Codice della causale di chiusura che generera' il movimento" + USE LF_CAUSALI KEY 2 SELECT MOVAP="C" + INPUT DESCR FLD_DCOCACH + DISPLAY "Descrizione@50" DESCR + DISPLAY "Codice" CODCAUS + 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 " - HELP "Codice della causale di apertura che generera' il movimento" - FLAGS "U" - USE LF_CAUSALI SELECT MOVAP="A" - INPUT CODCAUS FLD_COCAAP - COPY DISPLAY FLD_COCACH - OUTPUT FLD_COCAAP CODCAUS - OUTPUT FLD_DCOCAAP DESCR - ADD RUN cg0 -4 - CHECKTYPE NORMAL - FIELD CoCaAp + PROMPT 1 5 "Codice causale apertura " + HELP "Codice della causale di apertura che generera' il movimento" + FLAGS "UZ" + USE LF_CAUSALI SELECT MOVAP="A" + INPUT CODCAUS FLD_COCAAP + COPY DISPLAY FLD_COCACH + OUTPUT FLD_COCAAP CODCAUS + OUTPUT FLD_DCOCAAP DESCR + ADD RUN cg0 -4 + CHECKTYPE NORMAL + FIELD CoCaAp END STRING FLD_DCOCAAP 50 35 BEGIN - PROMPT 40 5 "" - HELP "Codice della causale di apertura che generera' il movimento" - USE LF_CAUSALI KEY 2 SELECT MOVAP="A" - INPUT DESCR FLD_DCOCAAP - COPY DISPLAY FLD_DCOCACH - COPY OUTPUT FLD_COCAAP + PROMPT 40 5 "" + HELP "Codice della causale di apertura che generera' il movimento" + USE LF_CAUSALI KEY 2 SELECT MOVAP="A" + INPUT DESCR FLD_DCOCAAP + COPY DISPLAY FLD_DCOCACH + 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 " - HELP "Codice del conto di riepilogo del bilancio di chiusura" - USE LF_PCON SELECT SOTTOCONTO!="" - INPUT GRUPPO FLD_CSBICHG - INPUT CONTO FLD_CSBICHC - INPUT SOTTOCONTO FLD_CSBICHS - DISPLAY "Gruppo" GRUPPO - DISPLAY "Conto" CONTO - DISPLAY "Sottoconto" SOTTOCONTO - DISPLAY "Descrizione@50" DESCR - OUTPUT FLD_CSBICHG GRUPPO - OUTPUT FLD_CSBICHC CONTO - OUTPUT FLD_CSBICHS SOTTOCONTO - OUTPUT FLD_DCSBICH DESCR - FIELD CsBiChG - ADD RUN cg0 -0 + PROMPT 2 10 "Bilancio di chiusura " + HELP "Codice del conto di riepilogo del bilancio di chiusura" + USE LF_PCON SELECT SOTTOCONTO!="" + INPUT GRUPPO FLD_CSBICHG + INPUT CONTO FLD_CSBICHC + INPUT SOTTOCONTO FLD_CSBICHS + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + DISPLAY "Sottoconto" SOTTOCONTO + DISPLAY "Descrizione@50" DESCR + OUTPUT FLD_CSBICHG GRUPPO + OUTPUT FLD_CSBICHC CONTO + OUTPUT FLD_CSBICHS SOTTOCONTO + OUTPUT FLD_DCSBICH DESCR + FIELD CsBiChG + ADD RUN cg0 -0 END NUMBER FLD_CSBICHC 3 BEGIN - PROMPT 33 10 "" - HELP "Codice del conto di riepilogo del bilancio di chiusura" - COPY ALL FLD_CSBICHG - FIELD CsBiChC - ADD RUN cg0 -0 + PROMPT 33 10 "" + HELP "Codice del conto di riepilogo del bilancio di chiusura" + COPY ALL FLD_CSBICHG + FIELD CsBiChC + ADD RUN cg0 -0 END NUMBER FLD_CSBICHS 6 BEGIN - PROMPT 40 10 "" - HELP "Codice del conto di riepilogo del bilancio di chiusura" - COPY USE FLD_CSBICHG - COPY INPUT FLD_CSBICHG - COPY DISPLAY FLD_CSBICHG - OUTPUT FLD_CSBICHG GRUPPO - OUTPUT FLD_CSBICHC CONTO - OUTPUT FLD_CSBICHS SOTTOCONTO - OUTPUT FLD_DCSBICH DESCR - CHECKTYPE NORMAL - FIELD CsBiChS - ADD RUN cg0 -0 + PROMPT 40 10 "" + HELP "Codice del conto di riepilogo del bilancio di chiusura" + COPY USE FLD_CSBICHG + COPY INPUT FLD_CSBICHG + COPY DISPLAY FLD_CSBICHG + OUTPUT FLD_CSBICHG GRUPPO + OUTPUT FLD_CSBICHC CONTO + OUTPUT FLD_CSBICHS SOTTOCONTO + OUTPUT FLD_DCSBICH DESCR + CHECKTYPE NORMAL + FIELD CsBiChS + ADD RUN cg0 -0 END STRING FLD_DCSBICH 50 25 BEGIN - PROMPT 50 10 "" - HELP "Codice del conto di riepilogo del bilancio di chiusura" - USE LF_PCON KEY 2 SELECT SOTTOCONTO!="" - INPUT DESCR FLD_DCSBICH - DISPLAY "Descrizione@50" DESCR - DISPLAY "Gruppo" GRUPPO - DISPLAY "Conto" CONTO - DISPLAY "Sottoconto" SOTTOCONTO - COPY OUTPUT FLD_CSBICHG - ADD RUN cg0 -0 + PROMPT 50 10 "" + HELP "Codice del conto di riepilogo del bilancio di chiusura" + USE LF_PCON KEY 2 SELECT SOTTOCONTO!="" + INPUT DESCR FLD_DCSBICH + DISPLAY "Descrizione@50" DESCR + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + DISPLAY "Sottoconto" SOTTOCONTO + COPY OUTPUT FLD_CSBICHG + ADD RUN cg0 -0 END STRING FLD_CSPRPEG 3 BEGIN - PROMPT 2 11 "Profitti e perdite " - HELP "Codice del conto di riepilogo del profitti e perdite" - COPY USE FLD_CSBICHG - COPY DISPLAY FLD_CSBICHG - OUTPUT FLD_CSPRPEG GRUPPO - OUTPUT FLD_CSPRPEC CONTO - OUTPUT FLD_CSPRPES SOTTOCONTO - OUTPUT FLD_DCSPRPE DESCR - INPUT GRUPPO FLD_CSPRPEG - INPUT CONTO FLD_CSPRPEC - INPUT SOTTOCONTO FLD_CSPRPES - FIELD CsPrPeG - ADD RUN cg0 -0 + PROMPT 2 11 "Profitti e perdite " + HELP "Codice del conto di riepilogo del profitti e perdite" + COPY USE FLD_CSBICHG + COPY DISPLAY FLD_CSBICHG + OUTPUT FLD_CSPRPEG GRUPPO + OUTPUT FLD_CSPRPEC CONTO + OUTPUT FLD_CSPRPES SOTTOCONTO + OUTPUT FLD_DCSPRPE DESCR + INPUT GRUPPO FLD_CSPRPEG + INPUT CONTO FLD_CSPRPEC + INPUT SOTTOCONTO FLD_CSPRPES + FIELD CsPrPeG + ADD RUN cg0 -0 END NUMBER FLD_CSPRPEC 3 BEGIN - PROMPT 33 11 "" - HELP "Codice del conto di riepilogo del profitti e perdite" - COPY ALL FLD_CSPRPEG - FIELD CsPrPeC - ADD RUN cg0 -0 + PROMPT 33 11 "" + HELP "Codice del conto di riepilogo del profitti e perdite" + COPY ALL FLD_CSPRPEG + FIELD CsPrPeC + ADD RUN cg0 -0 END NUMBER FLD_CSPRPES 6 BEGIN - PROMPT 40 11 "" - HELP "Codice del conto di riepilogo del profitti e perdite" - COPY USE FLD_CSPRPEG - COPY INPUT FLD_CSPRPEG - COPY DISPLAY FLD_CSPRPEG - OUTPUT FLD_CSPRPEG GRUPPO - OUTPUT FLD_CSPRPEC CONTO - OUTPUT FLD_CSPRPES SOTTOCONTO - OUTPUT FLD_DCSPRPE DESCR - CHECKTYPE NORMAL - FIELD CsPrPeS - ADD RUN cg0 -0 + PROMPT 40 11 "" + HELP "Codice del conto di riepilogo del profitti e perdite" + COPY USE FLD_CSPRPEG + COPY INPUT FLD_CSPRPEG + COPY DISPLAY FLD_CSPRPEG + OUTPUT FLD_CSPRPEG GRUPPO + OUTPUT FLD_CSPRPEC CONTO + OUTPUT FLD_CSPRPES SOTTOCONTO + OUTPUT FLD_DCSPRPE DESCR + CHECKTYPE NORMAL + FIELD CsPrPeS + ADD RUN cg0 -0 END STRING FLD_DCSPRPE 50 25 BEGIN - PROMPT 50 11 "" - HELP "Codice del conto di riepilogo del profitti e perdite" - COPY USE FLD_DCSBICH - INPUT DESCR FLD_DCSPRPE - COPY DISPLAY FLD_DCSBICH - COPY OUTPUT FLD_CSPRPEG - ADD RUN cg0 -0 + PROMPT 50 11 "" + HELP "Codice del conto di riepilogo del profitti e perdite" + COPY USE FLD_DCSBICH + INPUT DESCR FLD_DCSPRPE + COPY DISPLAY FLD_DCSBICH + COPY OUTPUT FLD_CSPRPEG + ADD RUN cg0 -0 END NUMBER FLD_CSBIAPG 3 BEGIN - PROMPT 2 12 "Bilancio di apertura " - HELP "Codice del conto di riepilogo del bilancio di apertura" - COPY USE FLD_CSBICHG - COPY DISPLAY FLD_CSBICHG - OUTPUT FLD_CSBIAPG GRUPPO + PROMPT 2 12 "Bilancio di apertura " + HELP "Codice del conto di riepilogo del bilancio di apertura" + COPY USE FLD_CSBICHG + COPY DISPLAY FLD_CSBICHG + 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'" - FLAGS "U" + HELP "Codice causale dei ratei per movimento di contabilita'" + 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'" - FLAGS "U" + HELP "Codice causale dei risconti per movimento di contabilita'" + 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 diff --git a/cg/cg5400a.uml b/cg/cg5400a.uml index b00222629..cddd37e54 100755 --- a/cg/cg5400a.uml +++ b/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