From 782f282a3f0ab1121f77279237746ecfd783f8ff Mon Sep 17 00:00:00 2001 From: guy Date: Fri, 11 Nov 1994 18:03:21 +0000 Subject: [PATCH] Maschere di Andrea Correzioni Prima Nota git-svn-id: svn://10.65.10.50/trunk@605 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- cg/Attic/cg1400a.uml | 7 + cg/cg0100.cpp | 3 +- cg/cg0100a.uml | 31 ++- cg/cg0200b.uml | 24 ++- cg/cg0400a.uml | 15 +- cg/cg0500a.uml | 24 ++- cg/cg0500b.uml | 489 ++++++++++++++++++++++--------------------- cg/cg1100a.uml | 9 +- cg/cg1200a.uml | 20 +- cg/cg1200b.uml | 8 +- cg/cg1400a.uml | 7 + cg/cg1500a.uml | 23 +- cg/cg1600a.uml | 23 ++ cg/cg1700a.uml | 1 + cg/cg2100.cpp | 20 +- cg/cg2100a.uml | 5 +- cg/cg2100b.uml | 12 ++ cg/cg2100i.uml | 2 +- cg/cg2101.cpp | 13 +- cg/cg2102.cpp | 6 +- cg/cg2103.cpp | 7 +- cg/cg3100a.uml | 48 +++-- cg/cg3100b.uml | 25 +-- cg/cg3100c.uml | 17 +- cg/cg3200a.uml | 33 ++- cg/cg3300a.uml | 25 ++- cg/cg3300b.uml | 2 +- cg/cg3300c.uml | 17 +- cg/cg3400a.uml | 10 +- cg/cg3400b.uml | 7 +- cg/cg3500a.uml | 11 +- cg/cg5300a.uml | 162 +++++++------- cg/conto.cpp | 10 +- 33 files changed, 646 insertions(+), 470 deletions(-) diff --git a/cg/Attic/cg1400a.uml b/cg/Attic/cg1400a.uml index 3ad4d841b..4c35858c0 100755 --- a/cg/Attic/cg1400a.uml +++ b/cg/Attic/cg1400a.uml @@ -5,6 +5,7 @@ PAGE "STAMPA DELEGHE IVA" -1 -1 58 11 NUMBER F_ABI 5 BEGIN PROMPT 1 1 "Codice ABI " + HELP "Codice ABI della banca per la presentazione della delega" FLAGS "RZ" FIELD CNF_STUDIO->cg.CodABI USE %BAN @@ -21,6 +22,7 @@ END NUMBER F_CAB 5 BEGIN PROMPT 22 1 "Codice CAB " + HELP "Codice CAB della banca per la presentazione della delega" FLAGS "RZ" FIELD CNF_STUDIO->cg.CodCAB COPY USE F_ABI @@ -37,12 +39,14 @@ END DATA F_DATA BEGIN PROMPT 1 3 "Data di stampa " + HELP "Data che viene stampata sulla delega" FLAGS "A" END LIST F_TIPO 21 BEGIN PROMPT 28 3 "Tipo " + HELP "Tipo di delega da stampare" ITEM "1|Periodica" MESSAGE ENABLE,F_MESE ITEM "2|Annuale" MESSAGE "13",F_MESE|DISABLE,F_MESE ITEM "7|Acconti IVA" MESSAGE "12",F_MESE|DISABLE,F_MESE @@ -51,12 +55,14 @@ END NUMBER F_ANNO 4 BEGIN PROMPT 1 5 "Anno " + HELP "Anno di cui si vuole stampare la delega" FLAGS "A" END LIST F_MESE 10 BEGIN PROMPT 13 5 "Mese " + HELP "Mese di cui si vuole stampare la delega" FLAGS "MA" ITEM "13|Annuale" MESSAGE "2",F_TIPO END @@ -64,6 +70,7 @@ END BOOLEAN F_PROVA BEGIN PROMPT 1 7 "Stampa di prova" + HELP "Indicare se si tratta di una stampa di controllo" END BOOLEAN F_AGGIORNA diff --git a/cg/cg0100.cpp b/cg/cg0100.cpp index 7f4bb78cc..dfe452cd8 100755 --- a/cg/cg0100.cpp +++ b/cg/cg0100.cpp @@ -1,8 +1,9 @@ #include -#include #include + #include "cg0.h" #include "cg0100.h" + #define ATTIVITA 1 #define PASSIVITA 2 #define COSTI 3 diff --git a/cg/cg0100a.uml b/cg/cg0100a.uml index dda674a29..4e449c751 100755 --- a/cg/cg0100a.uml +++ b/cg/cg0100a.uml @@ -17,6 +17,7 @@ END NUMBER FLD_CM1_GRUPPO 3 BEGIN PROMPT 2 1 "Gruppo " + HELP "Codice del gruppo" FIELD LF_PCON->GRUPPO FLAGS "R" KEY 1 @@ -38,6 +39,7 @@ END NUMBER FLD_CM1_CONTO 3 BEGIN PROMPT 2 2 "Conto " + HELP "Codice dell'eventuale conto" FIELD LF_PCON->CONTO FLAGS "R" KEY 1 @@ -62,6 +64,7 @@ END NUMBER FLD_CM1_SOTTOCONTO 6 BEGIN PROMPT 2 3 "Sottoconto " + HELP "Codice dell'eventuale sottoconto" FIELD LF_PCON->SOTTOCONTO FLAGS "R" KEY 1 @@ -100,6 +103,7 @@ END NUMBER FLD_CM1_CODTABANALISI 10 BEGIN PROMPT 1 5 "Codice Tabella Analisi " + HELP "Codice di raggruppamento per l'analisi di bilancio" FIELD LF_PCON->CODCBL FLAGS "R" END @@ -115,7 +119,7 @@ BEGIN PROMPT 1 6 "Sezione di bilancio " FIELD LF_PCON->INDBIL GROUP 1 3 - HELP "Indicatore di bilancio" + HELP "Sezione di appartenenza del conto" ITEM "1|1. Attivita'" ITEM "2|2. Passivita'" ITEM "3|3. Costi" @@ -141,6 +145,7 @@ END STRING FLD_CM1_LETTIVD 1 1 BEGIN PROMPT 56 7 "" + HELP "Codice del conto secondo la IV direttiva CEE" FIELD LF_PCON->LETTIVD GROUP 1 5 FLAGS "U" @@ -150,12 +155,13 @@ STRING FLD_CM1_LETTIVDH 1 BEGIN PROMPT 56 7 "" FLAGS "HDU" - GROUP 1 5 + GROUP 5 END NUMBER FLD_CM1_NUMRIVD 8 4 BEGIN PROMPT 60 7 "" + HELP "Codice del conto secondo la IV direttiva CEE" FIELD LF_PCON->NUMRIVD GROUP 1 5 FLAGS "MZ" @@ -165,12 +171,13 @@ NUMBER FLD_CM1_NUMRIVDH 8 4 BEGIN PROMPT 60 7 "" FLAGS "HDMZ" - GROUP 1 5 + GROUP 5 END NUMBER FLD_CM1_NUMIVD 2 BEGIN PROMPT 71 7 "" + HELP "Codice del conto secondo la IV direttiva CEE" FIELD LF_PCON->NUMIVD FLAGS "RZ" GROUP 1 5 @@ -217,6 +224,7 @@ END STRING FLD_CM1_LETTIVDOPP 1 BEGIN PROMPT 56 8 "" + HELP "Codice del conto di sezione opposta secondo la IV direttiva CEE" FIELD LF_PCON->LETTIVDOPP FLAGS "U" GROUP 1 2 4 7 @@ -225,6 +233,7 @@ END NUMBER FLD_CM1_NUMRIVDOPP 8 4 BEGIN PROMPT 60 8 "" + HELP "Codice del conto di sezione opposta secondo la IV direttiva CEE" FIELD LF_PCON->NUMRIVDOPP FLAGS "MZ" GROUP 1 2 4 7 @@ -233,6 +242,7 @@ END NUMBER FLD_CM1_NUMIVDOPP 2 BEGIN PROMPT 71 8 "" + HELP "Codice del conto di sezione opposta secondo la IV direttiva CEE" FIELD LF_PCON->NUMIVDOPP FLAGS "RZ" GROUP 1 2 4 7 @@ -255,7 +265,7 @@ BEGIN PROMPT 1 9 "Tipo Spesa/Ricavo " FIELD LF_PCON->TIPOSPRIC GROUP 1 2 - HELP "Specificare il tipo Spesa/Ricavo" + HELP "Specificare il tipo do conto" ITEM "0|0. Acquisti o vendite in genere" ITEM "1|1. Acquisti beni per rivendita" ITEM "2|2. Acquisti beni ammortizzabili" @@ -268,7 +278,7 @@ END LIST FLD_CM1_RICSER 1 18 BEGIN - PROMPT 1 10 "Ricavi per servizi " + PROMPT 1 10 "Ricavi per servizi " FIELD RICSER FLAGS "H" ITEM "0|Altre attivita'" @@ -277,10 +287,10 @@ END LIST FLD_CM1_TMCF 1 13 BEGIN - PROMPT 1 11 "Tipo sottoconti " + PROMPT 1 11 "Tipo sottoconti " FIELD LF_PCON->TMCF GROUP 1 3 - HELP "Inserire il tipo dei sottoconti" + HELP "Tipo dei sottoconti (Normale o clienti/fornitori)" ITEM " |Normali" ITEM "C|Clienti" ITEM "F|Fornitori" @@ -288,7 +298,8 @@ END LIST FLD_CM2_SEZSALDI 1 10 BEGIN - PROMPT 1 12 "Controllo saldo primanota " + PROMPT 1 12 "Controllo saldo primanota " + HELP "Tipo di controllo del saldo in prima nota" FIELD LF_PCON->SEZSALDI GROUP 1 ITEM " |Nessuno" @@ -299,6 +310,7 @@ END BOOLEAN FLD_CM2_STSOTTBIL BEGIN PROMPT 1 14 "Stampa dettaglio sottoconti su bilanci " + HELP "Indicare se stampare il dettaglio dei sottoconti nei bilanci di verifica" FIELD LF_PCON->STSOTTBIL GROUP 1 3 END @@ -306,6 +318,7 @@ END BOOLEAN FLD_CM2_COMPENS BEGIN PROMPT 50 14 "Compensazione saldi " + HELP "Indicare se e' ammessa la compensazione dei saldi" FIELD LF_PCON->COMPENS GROUP 1 3 END @@ -313,6 +326,7 @@ END BOOLEAN FLD_CM2_STSOTTAB BEGIN PROMPT 1 15 "Stampa dettaglio sottoconti su analisi " + HELP "Indicare se stampare il dettaglio dei sottoconti nell'analisi di bilancio" FIELD LF_PCON->STSOTTAB GROUP 1 3 MESSAGE COPY,FLD_CM2_STSOTTABS @@ -330,6 +344,7 @@ END BOOLEAN FLD_CM2_SOSPESO BEGIN PROMPT 50 15 "Conto sospeso" + HELP "Indicare se sospendere il conto in prima nota" FIELD LF_PCON->SOSPESO GROUP 1 2 END diff --git a/cg/cg0200b.uml b/cg/cg0200b.uml index b40d157fb..1560af4c5 100755 --- a/cg/cg0200b.uml +++ b/cg/cg0200b.uml @@ -5,35 +5,35 @@ PAGE "" -1 -1 76 16 STRING F_RAGSOCI 50 BEGIN PROMPT 1 2 "Rag. soc. " - HELP "Inserire la ragione sociale" + HELP "Ragione sociale del cliente/fornitore" GROUP 1 END STRING F_INDIRI 35 BEGIN PROMPT 1 4 "Indirizzo " - HELP "Inserire l'indirizzo" + HELP "Indirizzo del cliente/fornitore" GROUP 1 END STRING F_CIVI 10 BEGIN PROMPT 54 4 "N. " - HELP "Inserire il numero civico" + HELP "Numero civico del cliente/fornitore" GROUP 1 END STRING F_LOCALI 35 BEGIN PROMPT 1 5 "Localita " - HELP "Inserire la localita" + HELP "Localita' di residenza del C/F" GROUP 1 END STRING F_CAPI 5 BEGIN PROMPT 54 5 "CAP " - HELP "Inserire il Codice di Avviamento Postale" + HELP "Codice di Avviamento Postale del C/F" GROUP 1 END @@ -48,7 +48,7 @@ BEGIN OUTPUT F_STATOI CODTAB CHECKTYPE NORMAL WARNING "Stato assente" - HELP "Inserire il codice dello stato" + HELP "Codice dello stato del cliente/fornitore" GROUP 1 END @@ -69,13 +69,14 @@ BEGIN CHECKTYPE NORMAL WARNING "Comune assente" ADD MASK ba4100a - HELP "Inserire il codice del comune" + HELP "Codice del comune del cliente/fornitore" GROUP 1 END STRING F_DENCOMI 40 BEGIN PROMPT 33 6 "" + HELP "Nome del comne del ciente/fornitore" USE LF_COMUNI KEY 2 INPUT DENCOM F_DENCOMI DISPLAY "Comune@50" DENCOM @@ -95,39 +96,42 @@ END STRING F_PTELI 10 BEGIN PROMPT 2 9 "Telefono " - HELP "Inserire il prefisso ed il numero di telefono" + HELP "Prefisso del numero di telefono" GROUP 1 END STRING F_TELI 30 BEGIN PROMPT 40 9 "" + HELP "Numero di telefono del cliente/fornitore" GROUP 1 END STRING F_PFAXI 10 BEGIN PROMPT 2 10 "Fax " - HELP "Inserire il prefisso del numero di fax" + HELP "Prefisso del numero di fax" GROUP 1 END STRING F_FAXI 30 BEGIN PROMPT 40 10 "" + HELP "Numero di fax del cliente/fornitore" GROUP 1 END BOOLEAN F_IVARIDI BEGIN PROMPT 2 13 "Riduzione IVA" - HELP "Flag per la riduzione IVA" + HELP "Indicare se Š soggetto a riduzione IVA" GROUP 1 END NUMBER F_CODINDI 3 BEGIN PROMPT 1 1 "Codice " + HELP "Codice riferito alla tabella indirizzi" END BUTTON DLG_OK 9 2 diff --git a/cg/cg0400a.uml b/cg/cg0400a.uml index f10e06f7b..b2b388c9c 100755 --- a/cg/cg0400a.uml +++ b/cg/cg0400a.uml @@ -27,6 +27,7 @@ END NUMBER F_ANNO 4 BEGIN PROMPT 4 3 "Anno liquidazione " + HELP "Anno di cui si effettua la liquidazione" FLAGS "A" KEY 1 END @@ -35,6 +36,7 @@ END RADIOBUTTON F_LIVELLO 21 BEGIN PROMPT 4 5 "Livello progressivi " + HELP "Tipo di raggruppamento dei riepiloghi" ITEM "1|Per aliquota" MESSAGE HIDE,F_ATTIVITA|SHOW,F_CODIVA MESSAGE HIDE,F_TIPO1|SHOW,F_TIPO|K_SPACE,F_TIPO @@ -46,6 +48,7 @@ END RADIOBUTTON F_TIPO 18 BEGIN PROMPT 38 5 "Tipo progressivi " + HELP "Tipo di riepilogo da effettuare" ITEM "1|Vendite" MESSAGE HIDE,F_TIPOTABE|SHOW,F_TIPOTAB|HIDE,F_TIPOTABEL MESSAGE COPY,F_TIPO1 @@ -58,6 +61,7 @@ END RADIOBUTTON F_TIPO1 18 BEGIN PROMPT 38 5 "Tipo progressivi " + HELP "Tipo di riepilogo da effettuare" ITEM "1|Vendite" MESSAGE HIDE,F_TIPOTABE|HIDE,F_TIPOTABEL|SHOW,F_TIPOTAB MESSAGE COPY,F_TIPO @@ -71,12 +75,14 @@ END STRING F_CODIVA 3 BEGIN PROMPT 4 10 "Codice IVA " + HELP "Aliquata IVA da riepilogare" FLAGS "R" END RADIOBUTTON F_TIPOTAB 38 BEGIN PROMPT 4 12 "Tipo tabella " + HELP "Tipo di tabella da visualizzare" ITEM "1|Vendite in genere" ITEM "2|Vendite in sospensione d'imposta" END @@ -84,6 +90,7 @@ END STRING F_ATTIVITA 5 BEGIN PROMPT 4 10 "Codice attivita' " + HELP "Codice dell'attivita' di cui si vuole il riepilogo" USE LF_ATTIV FLAGS "H" JOIN %AIS TO LF_ATTIV INTO CODTAB=CODATT @@ -99,6 +106,7 @@ END NUMBER F_TIPOTABEL 1 BEGIN PROMPT 4 12 "Tipo tabella " + HELP "Tipo di tabella da visualizzare" SHEET "Tipo|Descrizione@50" ITEM "1|Acquisti beni per rivendita" ITEM "2|Acquisti beni da ammortizzare detraibili" @@ -112,6 +120,7 @@ END NUMBER F_TIPOTABE 1 BEGIN PROMPT 4 12 "Tipo tabella " + HELP "Tipo di tabella da visualizzare" SHEET "Tipo|Descrizione@50" ITEM "1|Acquisti in genere" ITEM "2|Acquisti indetraibili su operazioni esenti" @@ -127,15 +136,15 @@ END BOOLEAN F_VUOILORDI BEGIN PROMPT 4 16 "Visualizzazione importi lordi " - HELP "Vuoi visualizzare gli importi lordi ? ([+]=si, [ ]=no)" + HELP "Indicare se visualizzare anche gli importi" END -BUTTON DLG_OK 9 3 +BUTTON DLG_OK 9 2 BEGIN PROMPT -12 -1 "" END -BUTTON DLG_CANCEL 9 3 +BUTTON DLG_CANCEL 9 2 BEGIN PROMPT -22 -1 "" END diff --git a/cg/cg0500a.uml b/cg/cg0500a.uml index fcca483b0..9c58797b9 100755 --- a/cg/cg0500a.uml +++ b/cg/cg0500a.uml @@ -16,6 +16,7 @@ END STRING F_COD_CAUS 3 BEGIN PROMPT 3 1 "Codice " + HELP "Codice identificativo della causale" FIELD LF_CAUSALI->CODCAUS KEY 1 FLAGS "U" @@ -54,6 +55,7 @@ END STRING F_TIPO_DOC 2 BEGIN PROMPT 2 4 "Tipo doc. " + HELP "Tipo di documento collegato alla causale" FIELD LF_CAUSALI->TIPODOC USE %TPD INPUT CODTAB F_TIPO_DOC @@ -71,9 +73,10 @@ END STRING F_COD_REG 3 BEGIN PROMPT 23 4 "Cod. reg. " + HELP "Codice registro collegato alla causale" FIELD LF_CAUSALI->REG USE REG - INPUT CODTAB[1,4] F_ANNOES + INPUT CODTAB[1,4] F_ANNOES SELECT INPUT CODTAB[5,7] F_COD_REG DISPLAY "Anno" CODTAB[1,4] DISPLAY "Codice registro " CODTAB[5,7] @@ -101,6 +104,7 @@ END LISTBOX F_TIPO_MOV_1 1 20 BEGIN PROMPT 44 4 "Tipo mov. " + HELP "Tipo di movimento generato dalla causale" FIELD LF_CAUSALI->TIPOMOV HELP "Tipo movimento" ITEM " |Nessuno" MESSAGE COPY,F_TIPO_MOV @@ -114,7 +118,7 @@ LISTBOX F_TIPO_MOV_2 1 20 BEGIN PROMPT 44 4 "Tipo mov. " FIELD LF_CAUSALI->TIPOMOV - HELP "Inserire il tipo movimento" + HELP "Tipo di movimento generato dalla causale" ITEM " |Nessuno" MESSAGE COPY,F_TIPO_MOV ITEM "3|Incasso/pagamento " MESSAGE COPY,F_TIPO_MOV ITEM "5|Insoluto" MESSAGE COPY,F_TIPO_MOV @@ -126,7 +130,7 @@ LISTBOX F_M_770 1 48 BEGIN PROMPT 2 5 "Collegamento Mod.770 " FIELD LF_CAUSALI->M770 - HELP "Inserire il tipo di collegamento Mod.770" + HELP "Tipo di collegamento Mod.770" ITEM " |Nessuno" ITEM "1|Ricevuta e/o pagamento fattura percipiente" ITEM "2|Versamento ritenute percipiente" @@ -198,7 +202,7 @@ BOOLEAN F_DATA_DOC BEGIN PROMPT 2 4 "Data documento" FIELD LF_CAUSALI->DATADOC - HELP "" + HELP "Data del documento collegato con la causale" CHECKTYPE NORMAL END @@ -206,12 +210,14 @@ BOOLEAN F_NUM_DOC BEGIN PROMPT 34 4 "Numero documento" FIELD LF_CAUSALI->NUMDOC + HELP "Numero del documento collegato con la causale" CHECKTYPE NORMAL END BOOLEAN F_AUTO_FAT BEGIN PROMPT 2 6 "Autofattura art.34" + HELP "Indicare se si tratta di autofattura ex art.34" FIELD LF_CAUSALI->AUTOFATT CHECKTYPE NORMAL GROUP 2 @@ -220,6 +226,7 @@ END BOOLEAN F_ALLEGAT BEGIN PROMPT 34 6 "Doc. non va in allegati fine anno" + HELP "Indicare se non inserire negli allegati IVA del documento" FIELD LF_CAUSALI->ALLEG GROUP 2 END @@ -227,6 +234,7 @@ END BOOLEAN F_FAT_RITARDO BEGIN PROMPT 2 8 "Fattura in ritardo" + HELP "Indicare se le fatture vengono registrate al ricevimento" FIELD LF_CAUSALI->RITFATT GROUP 2 END @@ -234,6 +242,7 @@ END 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" FIELD LF_CAUSALI->CODCAUSIM COPY USE F_COD_CAUS @@ -248,6 +257,7 @@ END BOOLEAN F_OP_INTRACOM BEGIN PROMPT 2 10 "Operazione intracomunitaria" + HELP "Indicare se gestire le fatture intracomunitarie" FIELD LF_CAUSALI->INTRACOM GROUP 2 END @@ -255,6 +265,7 @@ END BOOLEAN F_VALINTRA BEGIN PROMPT 34 10 "Gestione valuta per operazioni intrac." + HELP "Indicare se registrare l'importo delle fatture CEE in valute" FIELD LF_CAUSALI->VALINTRA MESSAGE FALSE " ",F_MOV_VALU|ENABLE,F_MOV_VALU MESSAGE TRUE "X",F_MOV_VALU|DISABLE,F_MOV_VALU @@ -264,6 +275,7 @@ END BOOLEAN F_MOV_VALU BEGIN PROMPT 2 12 "Movimento in valuta" + HELP "Indicare se si utilizzano gli importi in valuta" FIELD LF_CAUSALI->MOVVAL GROUP 2 END @@ -271,6 +283,7 @@ END BOOLEAN F_MOV_SEZ BEGIN PROMPT 34 12 "Movimento solo sezionale" + HELP "Indicare se si tratta solo di moviemto di sezione" FIELD LF_CAUSALI->MOVSEZ FLAGS "H" END @@ -278,6 +291,7 @@ END LISTBOX F_OP_FINE_ANNO 1 11 BEGIN PROMPT 2 14 "Operazioni di fine anno " + HELP "Tipo di movimento di fine anno" ITEM " | " ITEM "C|Chiusura" ITEM "A|Apertura" @@ -290,7 +304,7 @@ LISTBOX F_COLL_CESP 1 40 BEGIN PROMPT 2 16 "Collegamento cespiti " FIELD LF_CAUSALI->COLLCESP - HELP "Inserire il tipo di collegamento cespiti" + HELP "Tipo di collegamento cespiti" ITEM " |Nessuno" ITEM "A|Acquisto cespite" ITEM "B|Rettifica acquisto" diff --git a/cg/cg0500b.uml b/cg/cg0500b.uml index d9bdac6e5..f5474bac2 100755 --- a/cg/cg0500b.uml +++ b/cg/cg0500b.uml @@ -1,239 +1,250 @@ -#include "cg0500.h" - -PAGE "" -1 -1 68 11 - -STRING 101 22 -BEGIN - PROMPT 1 1 "Tipo " - FLAGS "D" -END - -LISTBOX SS_TIPOCF 1 11 -BEGIN - PROMPT 33 1 "C/F " - ITEM " |Conto" MESSAGE SHOW,106|HIDE,206|HIDE,306|SHOW,107|HIDE,207|HIDE,307 - ITEM "C|Cliente" MESSAGE SHOW,206|HIDE,106|HIDE,306|SHOW,207|HIDE,107|HIDE,307 - ITEM "F|Fornitore" MESSAGE SHOW,306|HIDE,106|HIDE,206|SHOW,307|HIDE,107|HIDE,207 - FLAGS "DGU" - GROUP 1 -END - -NUMBER SS_GRUPPO 3 -BEGIN - PROMPT 1 3 "Gruppo " - FIELD LF_RCAUSALI->GRUPPO - USE LF_PCON KEY 1 SELECT (CONTO="") - INPUT GRUPPO SS_GRUPPO - DISPLAY "Gruppo" GRUPPO - DISPLAY "Descrizione@50" DESCR - DISPLAY "Tipo C/F" TMCF - CHECKTYPE NORMAL - OUTPUT SS_GRUPPO GRUPPO - OUTPUT 107 DESCR - WARNING "Gruppo assente" - CHECKTYPE NORMAL - GROUP 1 - ADD RUN CG0 -0 -END - -NUMBER SS_CONTO 3 -BEGIN - PROMPT 15 3 "Conto " - FIELD LF_RCAUSALI->CONTO - USE LF_PCON KEY 1 SELECT SOTTOCONTO="" - INPUT GRUPPO SS_GRUPPO - INPUT CONTO SS_CONTO - DISPLAY "Gruppo" GRUPPO - DISPLAY "Conto" CONTO - DISPLAY "Descrizione@50" DESCR - DISPLAY "Tipo C/F" TMCF - CHECKTYPE NORMAL - OUTPUT SS_TIPOCF TMCF - OUTPUT SS_CONTO CONTO - OUTPUT SS_GRUPPO GRUPPO - OUTPUT 107 DESCR - OUTPUT 207 DESCR - OUTPUT 307 DESCR - MESSAGE DIRTY,106|DIRTY,206|DIRTY,306 - WARNING "Conto assente" - ADD RUN CG0 -0 - GROUP 1 -END - -// Sottoconto NORMALE -NUMBER SS_SOTTOCONTO 6 -BEGIN - PROMPT 29 3 "Sottoconto " - FIELD LF_RCAUSALI->SOTTOCONTO - USE LF_PCON - INPUT GRUPPO SS_GRUPPO - INPUT CONTO SS_CONTO - INPUT SOTTOCONTO SS_SOTTOCONTO - DISPLAY "Gruppo" GRUPPO - DISPLAY "Conto" CONTO - DISPLAY "Sottoconto" SOTTOCONTO - DISPLAY "Descrizione@50" DESCR - OUTPUT SS_SOTTOCONTO SOTTOCONTO - OUTPUT 206 SOTTOCONTO - OUTPUT 306 SOTTOCONTO - OUTPUT SS_GRUPPO GRUPPO - OUTPUT SS_CONTO CONTO - OUTPUT 107 DESCR - ADD RUN CG0 -0 - CHECKTYPE NORMAL - WARNING "Sottoconto assente" - GROUP 1 -END - - -// Sottoconto CLIENTI -NUMBER 206 6 -BEGIN - PROMPT 29 3 "Cliente " - FIELD LF_RCAUSALI->SOTTOCONTO - USE LF_CLIFO KEY 1 - INPUT TIPOCF "C" - INPUT CODCF 206 - DISPLAY "Sottoconto" CODCF - DISPLAY "Ragione sociale cliente@50" RAGSOC - DISPLAY "Gruppo" GRUPPO - DISPLAY "Conto" CONTO - OUTPUT 206 CODCF - OUTPUT 106 CODCF - OUTPUT 306 CODCF - OUTPUT 207 RAGSOC - CHECKTYPE NORMAL - WARNING "Cliente assente" - ADD RUN CG0 -1 - GROUP 1 -END - -// Sottoconto FORNITORI -NUMBER 306 6 -BEGIN - PROMPT 29 3 "Fornitore " - FIELD LF_RCAUSALI->SOTTOCONTO - USE LF_CLIFO KEY 1 - INPUT TIPOCF "F" - INPUT CODCF 306 - DISPLAY "Sottoconto" CODCF - DISPLAY "Ragione sociale fornitore@50" RAGSOC - DISPLAY "Gruppo" GRUPPO - DISPLAY "Conto" CONTO - OUTPUT 306 CODCF - OUTPUT 106 CODCF - OUTPUT 206 CODCF - OUTPUT 307 RAGSOC - CHECKTYPE NORMAL - WARNING "Fornitore assente" - ADD RUN CG0 -1 - GROUP 1 -END - -LISTBOX SS_SEZIONE 5 -BEGIN - PROMPT 51 3 "Sezione " - ITEM " | " - ITEM "D|Dare" - ITEM "A|Avere" - FIELD LF_RCAUSALI->SEZIONE - FLAGS "U" - GROUP 1 -END - -// Descrizione normale -STRING 107 50 -BEGIN - PROMPT 1 5 "Descrizione " - FIELD LF_RCAUSALI->DESC - USE LF_PCON KEY 2 - INPUT DESCR 107 - DISPLAY "Descrizione@50" DESCR - DISPLAY "Gruppo" GRUPPO - DISPLAY "Conto" CONTO - DISPLAY "Sottoconto" SOTTOCONTO - OUTPUT SS_SOTTOCONTO SOTTOCONTO - OUTPUT SS_CONTO CONTO - OUTPUT SS_GRUPPO GRUPPO - OUTPUT 107 DESCR - ADD RUN CG0 -0 - GROUP 1 -END - -// Descrizione CLIENTE -STRING 207 50 -BEGIN - PROMPT 1 5 "Rag. Soc. " - FIELD LF_RCAUSALI->DESC - USE LF_CLIFO KEY 2 - INPUT TIPOCF "C" - INPUT RAGSOC 207 - DISPLAY "Tipo C/F" TIPOCF - DISPLAY "Ragione sociale Cliente@50" RAGSOC - DISPLAY "Gruppo" GRUPPO - DISPLAY "Conto" CONTO - DISPLAY "Sottoconto" CODCF - OUTPUT 206 CODCF - OUTPUT 207 RAGSOC - GROUP 1 -END - -// Descrizione FORNITORE -STRING 307 50 -BEGIN - PROMPT 1 5 "Rag. Soc. " - FIELD LF_RCAUSALI->DESC - USE LF_CLIFO KEY 2 - INPUT TIPOCF "F" - INPUT RAGSOC 307 - DISPLAY "Tipo C/F" TIPOCF - DISPLAY "Ragione sociale Fornitore@50" RAGSOC - DISPLAY "Gruppo" GRUPPO - DISPLAY "Conto" CONTO - DISPLAY "Sottoconto" CODCF - OUTPUT 306 CODCF - OUTPUT 307 RAGSOC - GROUP 1 -END - -STRING SS_DESCAGG 5 -BEGIN - PROMPT 1 7 "Descrizione aggiuntiva " - FIELD LF_RCAUSALI->CODDESC - FLAGS "U" - USE %DPN - INPUT CODTAB SS_DESCAGG - DISPLAY "Codice" CODTAB - DISPLAY "Descrizione @50" S0 - OUTPUT SS_DESCAGG CODTAB - OUTPUT 109 S0 - CHECKTYPE NORMAL - GROUP 1 -END - -STRING 109 50 -BEGIN - PROMPT 1 8 "" - FLAGS "D" - GROUP 1 -END - -BUTTON DLG_OK 9 2 -BEGIN - PROMPT -13 -1 "" -END - -BUTTON DLG_CANCEL 9 2 -BEGIN - PROMPT -23 -1 "" -END - -BUTTON DLG_NULL 9 2 -BEGIN - PROMPT -33 -1 "Azzera" - MESSAGE RESET,1@ -END - -ENDPAGE - -ENDMASK +#include "cg0500.h" + +PAGE "" -1 -1 68 11 + +STRING 101 22 +BEGIN + PROMPT 1 1 "Tipo " + FLAGS "D" +END + +LISTBOX SS_TIPOCF 1 11 +BEGIN + PROMPT 33 1 "C/F " + ITEM " |Conto" MESSAGE SHOW,106|HIDE,206|HIDE,306|SHOW,107|HIDE,207|HIDE,307 + ITEM "C|Cliente" MESSAGE SHOW,206|HIDE,106|HIDE,306|SHOW,207|HIDE,107|HIDE,307 + ITEM "F|Fornitore" MESSAGE SHOW,306|HIDE,106|HIDE,206|SHOW,307|HIDE,107|HIDE,207 + FLAGS "DGU" + GROUP 1 +END + +NUMBER SS_GRUPPO 3 +BEGIN + PROMPT 1 3 "Gruppo " + HELP "Codice del gruppo" + FIELD LF_RCAUSALI->GRUPPO + USE LF_PCON KEY 1 SELECT (CONTO="") + INPUT GRUPPO SS_GRUPPO + DISPLAY "Gruppo" GRUPPO + DISPLAY "Descrizione@50" DESCR + DISPLAY "Tipo C/F" TMCF + CHECKTYPE NORMAL + OUTPUT SS_GRUPPO GRUPPO + OUTPUT 107 DESCR + WARNING "Gruppo assente" + CHECKTYPE NORMAL + GROUP 1 + ADD RUN CG0 -0 +END + +NUMBER SS_CONTO 3 +BEGIN + PROMPT 15 3 "Conto " + HELP "Codice del conto" + FIELD LF_RCAUSALI->CONTO + USE LF_PCON KEY 1 SELECT SOTTOCONTO="" + INPUT GRUPPO SS_GRUPPO + INPUT CONTO SS_CONTO + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + DISPLAY "Descrizione@50" DESCR + DISPLAY "Tipo C/F" TMCF + CHECKTYPE NORMAL + OUTPUT SS_TIPOCF TMCF + OUTPUT SS_CONTO CONTO + OUTPUT SS_GRUPPO GRUPPO + OUTPUT 107 DESCR + OUTPUT 207 DESCR + OUTPUT 307 DESCR + MESSAGE DIRTY,106|DIRTY,206|DIRTY,306 + WARNING "Conto assente" + ADD RUN CG0 -0 + GROUP 1 +END + +// Sottoconto NORMALE +NUMBER SS_SOTTOCONTO 6 +BEGIN + PROMPT 29 3 "Sottoconto " + HELP "Codice del sottoconto" + FIELD LF_RCAUSALI->SOTTOCONTO + USE LF_PCON + INPUT GRUPPO SS_GRUPPO + INPUT CONTO SS_CONTO + INPUT SOTTOCONTO SS_SOTTOCONTO + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + DISPLAY "Sottoconto" SOTTOCONTO + DISPLAY "Descrizione@50" DESCR + OUTPUT SS_SOTTOCONTO SOTTOCONTO + OUTPUT 206 SOTTOCONTO + OUTPUT 306 SOTTOCONTO + OUTPUT SS_GRUPPO GRUPPO + OUTPUT SS_CONTO CONTO + OUTPUT 107 DESCR + ADD RUN CG0 -0 + CHECKTYPE NORMAL + WARNING "Sottoconto assente" + GROUP 1 +END + + +// Sottoconto CLIENTI +NUMBER 206 6 +BEGIN + PROMPT 29 3 "Cliente " + HELP "Codice sottoconto del cliente" + FIELD LF_RCAUSALI->SOTTOCONTO + USE LF_CLIFO KEY 1 + INPUT TIPOCF "C" + INPUT CODCF 206 + DISPLAY "Sottoconto" CODCF + DISPLAY "Ragione sociale cliente@50" RAGSOC + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + OUTPUT 206 CODCF + OUTPUT 106 CODCF + OUTPUT 306 CODCF + OUTPUT 207 RAGSOC + CHECKTYPE NORMAL + WARNING "Cliente assente" + ADD RUN CG0 -1 + GROUP 1 +END + +// Sottoconto FORNITORI +NUMBER 306 6 +BEGIN + PROMPT 29 3 "Fornitore " + HELP "Codice sottoconto del cliente" + FIELD LF_RCAUSALI->SOTTOCONTO + USE LF_CLIFO KEY 1 + INPUT TIPOCF "F" + INPUT CODCF 306 + DISPLAY "Sottoconto" CODCF + DISPLAY "Ragione sociale fornitore@50" RAGSOC + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + OUTPUT 306 CODCF + OUTPUT 106 CODCF + OUTPUT 206 CODCF + OUTPUT 307 RAGSOC + CHECKTYPE NORMAL + WARNING "Fornitore assente" + ADD RUN CG0 -1 + GROUP 1 +END + +LISTBOX SS_SEZIONE 5 +BEGIN + PROMPT 51 3 "Sezione " + HELP "Indicare la sezione del conto" + ITEM " | " + ITEM "D|Dare" + ITEM "A|Avere" + FIELD LF_RCAUSALI->SEZIONE + FLAGS "U" + GROUP 1 +END + +// Descrizione normale +STRING 107 50 +BEGIN + PROMPT 1 5 "Descrizione " + HELP "Indicare la descrizione della riga" + FIELD LF_RCAUSALI->DESC + USE LF_PCON KEY 2 + INPUT DESCR 107 + DISPLAY "Descrizione@50" DESCR + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + DISPLAY "Sottoconto" SOTTOCONTO + OUTPUT SS_SOTTOCONTO SOTTOCONTO + OUTPUT SS_CONTO CONTO + OUTPUT SS_GRUPPO GRUPPO + OUTPUT 107 DESCR + ADD RUN CG0 -0 + GROUP 1 +END + +// Descrizione CLIENTE +STRING 207 50 +BEGIN + PROMPT 1 5 "Rag. Soc. " + HELP "Ragione sociale del cliente" + FIELD LF_RCAUSALI->DESC + USE LF_CLIFO KEY 2 + INPUT TIPOCF "C" + INPUT RAGSOC 207 + DISPLAY "Tipo C/F" TIPOCF + DISPLAY "Ragione sociale Cliente@50" RAGSOC + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + DISPLAY "Sottoconto" CODCF + OUTPUT 206 CODCF + OUTPUT 207 RAGSOC + GROUP 1 +END + +// Descrizione FORNITORE +STRING 307 50 +BEGIN + PROMPT 1 5 "Rag. Soc. " + HELP "Ragione sociale del fornitore" + FIELD LF_RCAUSALI->DESC + USE LF_CLIFO KEY 2 + INPUT TIPOCF "F" + INPUT RAGSOC 307 + DISPLAY "Tipo C/F" TIPOCF + DISPLAY "Ragione sociale Fornitore@50" RAGSOC + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + DISPLAY "Sottoconto" CODCF + OUTPUT 306 CODCF + OUTPUT 307 RAGSOC + GROUP 1 +END + +STRING SS_DESCAGG 5 +BEGIN + PROMPT 1 7 "Descrizione aggiuntiva" + HELP "Codice della descrizione aggiuntiva" + FIELD LF_RCAUSALI->CODDESC + FLAGS "U" + USE %DPN + INPUT CODTAB SS_DESCAGG + DISPLAY "Codice" CODTAB + DISPLAY "Descrizione @50" S0 + OUTPUT SS_DESCAGG CODTAB + OUTPUT 109 S0 + CHECKTYPE NORMAL + WARNING "Codice descrizione aggiuntiva assente" + GROUP 1 +END + +STRING 109 50 +BEGIN + PROMPT 1 8 "" + FLAGS "D" + GROUP 1 +END + +BUTTON DLG_OK 9 2 +BEGIN + PROMPT -13 -1 "" +END + +BUTTON DLG_CANCEL 9 2 +BEGIN + PROMPT -23 -1 "" +END + +BUTTON DLG_NULL 9 2 +BEGIN + PROMPT -33 -1 "Azzera" + MESSAGE RESET,1@ +END + +ENDPAGE + +ENDMASK diff --git a/cg/cg1100a.uml b/cg/cg1100a.uml index 6170cfe42..7dff6bfbf 100755 --- a/cg/cg1100a.uml +++ b/cg/cg1100a.uml @@ -23,7 +23,8 @@ END DATE F_DATA_STAMPA BEGIN - PROMPT 2 4 "Data di stampa " + PROMPT 2 4 "Data di stampa " + HELP "Data da riportare sui fogli" FLAGS "A" END @@ -58,9 +59,3 @@ END ENDPAGE ENDMASK - - - - - - diff --git a/cg/cg1200a.uml b/cg/cg1200a.uml index 1c47aada7..ac600cfea 100755 --- a/cg/cg1200a.uml +++ b/cg/cg1200a.uml @@ -81,7 +81,7 @@ BEGIN DISPLAY "Ragione sociale@50" RAGSOC OUTPUT FLD_CLI_CODFR CODCF GROUP 1 3 - HELP "Introdurre codice di inizio stampa: vuoto = inizio archivio" + HELP "Codice di inizio stampa: vuoto = inizio archivio" END STRING FLD_CLI_CODTO 5 @@ -93,7 +93,7 @@ BEGIN COPY DISPLAY FLD_CLI_CODFR OUTPUT FLD_CLI_CODTO CODCF GROUP 1 3 - HELP "Introdurre codice di fine stampa: vuoto = fine archivio" + HELP "Codice di fine stampa: vuoto = fine archivio" NUM_EXPR {(#THIS_FIELD == 0) || (#THIS_FIELD >= #FLD_CLI_CODFR)} WARNING "Limite superiore errato" END @@ -110,7 +110,7 @@ BEGIN OUTPUT FLD_CLI_RAGSOCFR RAGSOC OUTPUT F_TIPOAPERFR TIPOAPER GROUP 1 4 - HELP "Introdurre rag. soc. di inizio stampa: vuoto = inizio archivio" + HELP "Ragione sociale di inizio stampa: vuoto = inizio archivio" END STRING FLD_CLI_RAGSOCTO 50 29 @@ -123,7 +123,7 @@ BEGIN OUTPUT FLD_CLI_RAGSOCTO RAGSOC OUTPUT F_TIPOAPERTO TIPOAPER GROUP 1 4 - HELP "Introdurre ragione soc. di fine stampa: vuoto = fine archivio" + HELP "Ragione sociale di fine stampa: vuoto = fine archivio" STR_EXPR {(#THIS_FIELD == "") || (#THIS_FIELD >= #FLD_CLI_RAGSOCFR)} WARNING "Limite superiore errato" END @@ -137,7 +137,7 @@ BEGIN COPY DISPLAY FLD_CLI_CODFR OUTPUT FLD_FOR_CODFR CODCF GROUP 2 3 - HELP "Introdurre codice di inizio stampa: vuoto = inizio archivio" + HELP "Codice C/F di inizio stampa: vuoto = inizio archivio" END STRING FLD_FOR_CODTO 5 @@ -149,7 +149,7 @@ BEGIN COPY DISPLAY FLD_CLI_CODFR OUTPUT FLD_FOR_CODTO CODCF GROUP 2 3 - HELP "Introdurre codice di fine stampa: vuoto = fine archivio" + HELP "Codice C/F di fine stampa: vuoto = fine archivio" NUM_EXPR {(#THIS_FIELD == 0) || (#THIS_FIELD >= #FLD_FOR_CODFR)} WARNING "Limite superiore errato" END @@ -164,7 +164,7 @@ BEGIN OUTPUT FLD_FOR_RAGSOCFR RAGSOC OUTPUT F_TIPOAPERFR TIPOAPER GROUP 2 4 - HELP "Introdurre rag. soc. di inizio stampa: vuoto = inizio archivio" + HELP "Ragione sociale di inizio stampa: vuoto = inizio archivio" END STRING FLD_FOR_RAGSOCTO 50 29 @@ -177,7 +177,7 @@ BEGIN OUTPUT FLD_FOR_RAGSOCTO RAGSOC OUTPUT F_TIPOAPERTO TIPOAPER GROUP 2 4 - HELP "Introdurre ragione soc. di fine stampa: vuoto = fine archivio" + HELP "Ragione sociale di fine stampa: vuoto = fine archivio" STR_EXPR {(#THIS_FIELD == "") || (#THIS_FIELD >= #FLD_FOR_RAGSOCFR)} WARNING "Limite superiore errato" END @@ -197,7 +197,7 @@ END BOOLEAN CHK_CG12_MOVIM BEGIN PROMPT 4 13 "Solo movimentati" - HELP "Selezionare per stampare solo inclusi archivio movimenti" + HELP "Indicare se stampare solo inclusi archivio movimenti" END LIST LST_CG12_INTERLINE 1 @@ -206,7 +206,7 @@ BEGIN ITEM "0|0" ITEM "1|1" ITEM "2|2" - HELP "Scegliere il numero di righe di interlinea tra i nominativi" + HELP "Indicare il numero di righe di interlinea tra i nominativi" END GROUPBOX DLG_NULL 51 4 diff --git a/cg/cg1200b.uml b/cg/cg1200b.uml index e6466d441..9758632d3 100755 --- a/cg/cg1200b.uml +++ b/cg/cg1200b.uml @@ -5,28 +5,28 @@ NUMBER FLD_CGB_STARTROW 4 BEGIN PROMPT 2 1 "Riga di inizio in etichetta " FLAGS "R" - HELP "Immettere la prima riga da stampare nell'etichetta" + HELP "Prima riga da stampare nell'etichetta" END NUMBER FLD_CGB_STARTCOL 4 BEGIN PROMPT 2 3 "Colonna di inizio in etichetta " FLAGS "R" - HELP "Immettere il margine sinistro desiderato" + HELP "Margine sinistro desiderato" END NUMBER FLD_CGB_ROWSET 4 BEGIN PROMPT 2 5 "N. totale di righe etichetta " FLAGS "R" - HELP "Immettere il numero totale di righe per etichetta" + HELP "Numero totale di righe per etichetta (altezza)" END NUMBER FLD_CGB_COLSET 4 BEGIN PROMPT 2 7 "N. totale colonne etichetta " FLAGS "R" - HELP "Immettere il numero totale di colonne per etichetta" + HELP "Numero totale di colonne per etichetta (larghezza)" END BUTTON DLG_OK 9 2 diff --git a/cg/cg1400a.uml b/cg/cg1400a.uml index 3ad4d841b..4c35858c0 100755 --- a/cg/cg1400a.uml +++ b/cg/cg1400a.uml @@ -5,6 +5,7 @@ PAGE "STAMPA DELEGHE IVA" -1 -1 58 11 NUMBER F_ABI 5 BEGIN PROMPT 1 1 "Codice ABI " + HELP "Codice ABI della banca per la presentazione della delega" FLAGS "RZ" FIELD CNF_STUDIO->cg.CodABI USE %BAN @@ -21,6 +22,7 @@ END NUMBER F_CAB 5 BEGIN PROMPT 22 1 "Codice CAB " + HELP "Codice CAB della banca per la presentazione della delega" FLAGS "RZ" FIELD CNF_STUDIO->cg.CodCAB COPY USE F_ABI @@ -37,12 +39,14 @@ END DATA F_DATA BEGIN PROMPT 1 3 "Data di stampa " + HELP "Data che viene stampata sulla delega" FLAGS "A" END LIST F_TIPO 21 BEGIN PROMPT 28 3 "Tipo " + HELP "Tipo di delega da stampare" ITEM "1|Periodica" MESSAGE ENABLE,F_MESE ITEM "2|Annuale" MESSAGE "13",F_MESE|DISABLE,F_MESE ITEM "7|Acconti IVA" MESSAGE "12",F_MESE|DISABLE,F_MESE @@ -51,12 +55,14 @@ END NUMBER F_ANNO 4 BEGIN PROMPT 1 5 "Anno " + HELP "Anno di cui si vuole stampare la delega" FLAGS "A" END LIST F_MESE 10 BEGIN PROMPT 13 5 "Mese " + HELP "Mese di cui si vuole stampare la delega" FLAGS "MA" ITEM "13|Annuale" MESSAGE "2",F_TIPO END @@ -64,6 +70,7 @@ END BOOLEAN F_PROVA BEGIN PROMPT 1 7 "Stampa di prova" + HELP "Indicare se si tratta di una stampa di controllo" END BOOLEAN F_AGGIORNA diff --git a/cg/cg1500a.uml b/cg/cg1500a.uml index 924f840d0..6644bb7c5 100755 --- a/cg/cg1500a.uml +++ b/cg/cg1500a.uml @@ -24,12 +24,14 @@ END DATE F_DATASTAMPA BEGIN PROMPT 48 1 "Data stampa " + HELP "Data che verra' stampata sul bilancio" FLAGS "A" END NUMBER F_ANNO 4 BEGIN PROMPT 2 3 "Anno esercizio " + HELP "Anno di cui si vuole ottenre il bilancio" USE ESC INPUT CODTAB F_ANNO DISPLAY "Anno" CODTAB @@ -45,7 +47,7 @@ END RADIOBUTTON F_BILANCIO 33 BEGIN PROMPT 2 5 "Tipo bilancio " - HELP "Indicare il tipo di bilancio" + HELP "Indicare il tipo di bilancio da stampare" ITEM "1|Bilancio a sezioni contrapposte" MESSAGE HIDE,F_STAMPA1|RESET,F_STAMPA1|HIDE,F_VERIFICA|RESET,F_VERIFICA MESSAGE HIDE,F_STAMPAV|RESET,F_STAMPAV|HIDE,F_DATADA|RESET,F_DATADA @@ -90,21 +92,25 @@ END DATE F_DATALIM BEGIN PROMPT 2 9 "Data limite " + HELP "Data fino alla quale si vuole la stampa" END BOOLEAN F_TOTALI BEGIN PROMPT 33 9 "Non stampare totali per gruppo " + HELP "Indicare se non si devono stampare i totali dei gruppi" END BOOLEAN F_CODICI BEGIN PROMPT 2 10 "Non stampare codici conti " + HELP "Indicare se non si devono stampare i codici dei conti" END BOOLEAN F_SALDO BEGIN PROMPT 33 10 "Non stampare movimenti con saldo a zero " + HELP "Indicare se non si devono stampare i movimenti con saldo nullo" END TEXT 96 @@ -130,6 +136,7 @@ END DATE F_DATADA BEGIN PROMPT 24 10 "" + HELP "Data dalla quale iniziare la stampa" END DATE F_DATAA @@ -140,6 +147,7 @@ END BOOLEAN F_STAMPAMPROV BEGIN PROMPT 2 11 "Stampa movimenti provvisori " + HELP "Indicare se stampare i movimenti provvisori" END BUTTON DLG_OK 9 2 @@ -159,6 +167,7 @@ PAGE "Pag. 2" -1 -1 74 20 RADIOBUTTON F_VERIFICA 27 BEGIN PROMPT 2 1 "Stampa bilancio di verifica " + HELP "Tipo di bilancio di verifica" ITEM "1|Bilancio" ITEM "2|Saldi di mastro" ITEM "3|Situazione C/F" @@ -167,6 +176,7 @@ END RADIOBUTTON F_STAMPAC 35 BEGIN PROMPT 35 1 "Tipo stampa " + HELP "Help tipo di stampa del bilancio" ITEM "1|Conti movimentati" ITEM "2|Conti con saldo diverso da zero" END @@ -174,6 +184,7 @@ END RADIOBUTTON F_STAMPAV 35 BEGIN PROMPT 35 1 "Tipo stampa " + HELP "Help tipo di stampa del bilancio" ITEM "1|Conti movimentati" ITEM "2|Conti con saldo diverso da zero" ITEM "3|Tutti i conti" @@ -182,6 +193,7 @@ END LIST F_MODULO 10 BEGIN PROMPT 2 8 "Stampa su modulo stretto " + HELP "Indicare il numero di caratteri del foglio (larghezza)" ITEM "1|132 crt." ITEM "2|198 crt." END @@ -189,6 +201,7 @@ END LIST F_SITUAZIONE 11 BEGIN PROMPT 2 10 "Tipo situazione " + HELP "Indicare il tipo di situazione che si vuole ottenere" ITEM " |Entrambi" ITEM "C|Clienti" ITEM "F|Fornitori" @@ -206,6 +219,7 @@ END LIST F_ORDINAMENTO 11 BEGIN PROMPT 2 11 "Tipo ordinamento " + HELP "Indicare il tipo di ordinamento da effettuare" ITEM "1|Per codice" ITEM "2|Alfabetico" END @@ -223,10 +237,3 @@ END ENDPAGE ENDMASK - - - - - - - diff --git a/cg/cg1600a.uml b/cg/cg1600a.uml index fdc3c3eaa..e41fa26de 100755 --- a/cg/cg1600a.uml +++ b/cg/cg1600a.uml @@ -24,6 +24,7 @@ END NUMBER F_ANNOESE 4 BEGIN PROMPT 4 5 "Anno esercizio " + HELP "Anno d'esercizio di cui si vuole la stampa" USE ESC INPUT CODTAB F_ANNOESE DISPLAY "Anno" CODTAB @@ -37,6 +38,7 @@ END NUMBER F_ANNORAFFR 4 BEGIN PROMPT 36 5 "Anno esercizio da raffrontare " + HELP "Anno d'esercizio da raffrontare (in caso di confronto)" COPY USE F_ANNOESE INPUT CODTAB F_ANNORAFFR COPY DISPLAY F_ANNOESE @@ -48,6 +50,7 @@ END LIST F_TIPOBIL 22 BEGIN PROMPT 4 6 "Tipo bilancio " + HELP "Indicare il tipo di bilancio da stampare" ITEM "1|Bilancio scalare" MESSAGE HIDE,F_TIPOSTAMPA1|RESET,F_TIPOSTAMPA1|SHOW,F_TIPOSTAMPA|K_SPACE,F_TIPOSTAMPA MESSAGE SHOW,F_ANNORAFFR|SHOW,F_DATABILRAF @@ -59,6 +62,7 @@ END LIST F_TIPOSTAMPA 23 BEGIN PROMPT 4 7 "Tipo stampa " + HELP "Indicare il tipo di stampa che si vuole avere" ITEM "1|Per data limite" MESSAGE HIDE,F_STAMPAMODULO|HIDE,F_DATAINI|HIDE,F_DATAFINE MESSAGE RESET,F_STAMPAMODULO|RESET,F_DATAINI|RESET,F_DATAFINE @@ -71,7 +75,12 @@ END LIST F_TIPOSTAMPA1 23 BEGIN +<<<<<<< cg1600a.uml + PROMPT 4 7 "Tipo stampa1 " + HELP "Indicare il tipo di stampa che si vuole avere" +======= PROMPT 4 7 "Tipo stampa " +>>>>>>> 1.5 ITEM "1|Per data " MESSAGE HIDE,F_DATALIM MESSAGE RESET,F_DATALIM @@ -86,7 +95,12 @@ END DATE F_DATASTAMPA BEGIN +<<<<<<< cg1600a.uml + PROMPT 4 4 "Data stampa " + HELP "Indicare la data da stampare sul bilancio" +======= PROMPT 4 8 "Data stampa " +>>>>>>> 1.5 FLAGS "A" END @@ -112,50 +126,59 @@ END DATE F_DATALIM BEGIN PROMPT 4 9 "Data limite " + HELP "Data fin alla quale si vuole la stampa" // VALIDATE NOT_EMPTY_FUNC END DATE F_DATABILRAF BEGIN PROMPT 36 9 "Data bil. da raffrontare " + HELP "Data d'esercizio da raffrontare con data limite" // VALIDATE NOT_EMPTY_FUNC END DATE F_DATAINI BEGIN PROMPT 26 9 "" + HELP "Data di inizio calcolo" // VALIDATE NOT_EMPTY_FUNC END DATE F_DATAFINE BEGIN PROMPT 62 9 "" + HELP "Data di fine calcolo" // VALIDATE NOT_EMPTY_FUNC END BOOLEAN F_STAMPAINT BEGIN PROMPT 4 11 "Stampa intera struttura" + HELP "Indicare se ottenere un stampa completa nella sua struttura" END BOOLEAN F_STAMPACOD BEGIN PROMPT 41 11 "Non stampare cod. conti" + HELP "Indicare se non stampare i codici dei conti" END BOOLEAN F_STAMPAMOV BEGIN PROMPT 4 12 "Non stampare mov. con saldo a 0" + HELP "Indicare se non stampare i movimenti con saldo nullo" END BOOLEAN F_STAMPAMOVPROV BEGIN PROMPT 41 12 "Stampa movimenti provvisori" + HELP "Indicare se stampare anche i movimenti provvisori" END BOOLEAN F_STAMPAMODULO BEGIN PROMPT 4 13 "Stampa su modulo stretto" + HELP "Indicare se si stampa su modulo stretto (80 colonne)" END BUTTON DLG_OK 9 2 diff --git a/cg/cg1700a.uml b/cg/cg1700a.uml index fe4c9e4a0..e1d6de0a3 100755 --- a/cg/cg1700a.uml +++ b/cg/cg1700a.uml @@ -24,6 +24,7 @@ END DATE F_DATASTAMPA BEGIN PROMPT 1 4 "Data stampa " + HELP "Data da riportare sui fogli da stampare" FLAGS "A" END diff --git a/cg/cg2100.cpp b/cg/cg2100.cpp index 84eb2a63f..d248522cf 100755 --- a/cg/cg2100.cpp +++ b/cg/cg2100.cpp @@ -312,10 +312,7 @@ void TPrimanota_application::init_mask(TMask& m) if (corrisp) m.hide(F_STATOPAIV); m.show(F_CORRLIRE, intra); - - const bool corrval = intra && valintra; - m.show(F_CORRVALUTA, corrval); - + m.show(F_CORRVALUTA, valintra); m.show(F_CODIVA, m.mode() == MODE_INS); } @@ -357,9 +354,8 @@ const char* TPrimanota_application::get_next_key() TToken_string k(80); k.add(F_NUMREG); k.add(_lastreg+1); - TMask& m = curr_mask(); - if (!m.query_mode()) + if (m.insert_mode()) { k.add(F_CODCAUS); k.add(m.get(F_CODCAUS)); // Ricopia causale k.add(F_DATAREG); k.add(m.get(F_DATAREG)); // data operazione @@ -406,6 +402,14 @@ void TPrimanota_application::init_insert_mode(TMask& m) TBill tc; _causale.bill(nriga, tc); if (tc.conto() < 1) continue; // Considera solo conti validi + if (tc.tipo() > ' ' && tc.sottoconto() != 0) + { + TBill clifo(0, 0, tc.sottoconto(), tc.tipo()); + clifo.descrizione(); + if (clifo.conto() != 0) + tc = clifo; + } + const char sezione = rcaus->get_char(RCA_SEZIONE); const TImporto zero('D', ZERO); const TString80 desc(_causale.desc_agg(i)); @@ -435,6 +439,8 @@ void TPrimanota_application::init_insert_mode(TMask& m) void TPrimanota_application::init_modify_mode(TMask& m) { init_mask(m); + calcola_imp(); // Calcola totale imponibile ed imposte + calcola_saldo(); // Verifica eventuali sbilanci } @@ -751,7 +757,7 @@ int TPrimanota_application::write(const TMask& m) if (iva() != nessuna_iva) { causale().reg().reread(); // Aggiorna protocollo IVA - if (!gestione_saldaconto()) + if (!gestione_saldaconto() && !m.get_bool(F_SOLAIVA)) { const TString16 causimm(causale().causale_inc_imm()); if (causimm.not_empty()) diff --git a/cg/cg2100a.uml b/cg/cg2100a.uml index d600b5201..efade1047 100755 --- a/cg/cg2100a.uml +++ b/cg/cg2100a.uml @@ -32,6 +32,7 @@ END NUMBER F_NUMREG 6 BEGIN PROMPT 1 4 "Operazione n. " + HELP "Numero del movimento di prima nota da gestire" FLAGS "R" FIELD LF_MOV->NUMREG USE LF_MOV @@ -65,7 +66,7 @@ DATE F_DATACOMP BEGIN PROMPT 1 7 "Data di competenza " CHECKTYPE REQUIRED - WARNING "E' obbligatorio specificare la data di competenza" + WARNING "Data di competenza dell'operazione" FLAGS "A" END @@ -78,6 +79,7 @@ END STRING F_CODCAUS 3 BEGIN PROMPT 1 9 "Causale " + HELP "Codice della causale generante l'operazione" FLAGS "U" FIELD LF_MOV->CODCAUS USE LF_CAUSALI KEY 1 @@ -95,6 +97,7 @@ END STRING F_DESCRCAUS 50 BEGIN PROMPT 23 9 "" + HELP "Descrizione della causale generante l'operazione" USE LF_CAUSALI KEY 2 CHECKTYPE NORMAL INPUT DESCR F_DESCRCAUS diff --git a/cg/cg2100b.uml b/cg/cg2100b.uml index 3de007e6d..bef6a9caa 100755 --- a/cg/cg2100b.uml +++ b/cg/cg2100b.uml @@ -41,6 +41,7 @@ END DATE F_DATAREG BEGIN PROMPT 1 3 "Data operazione " + HELP "Data in cui viene effettuata l'operazione" FIELD DATAREG END @@ -48,6 +49,7 @@ END DATE F_DATACOMP BEGIN PROMPT 1 4 "Data di competenza " + HELP "Data di competenza dell'operazione" FIELD DATACOMP END @@ -61,6 +63,7 @@ END DATE F_DATADOC BEGIN PROMPT 1 5 "Data del documento " + HELP "Data del documento generante il movimento" FIELD DATADOC WARNING "Specificare una data del documento non superiore a quella dell'operazione" VALIDATE DATE_CMP_FUNC <= F_DATAREG @@ -69,6 +72,7 @@ END STRING F_NUMDOC 7 BEGIN PROMPT 57 5 "Documento n. " + HELP "Numero del documento generante il movimento" FIELD NUMDOC WARNING "La causale impone di specificare il numero documento" END @@ -81,6 +85,7 @@ END STRING F_DESCAGG 5 BEGIN PROMPT 1 6 "Descrizione " + HELP "Codice descrizione del movimento di contabilita'" FLAGS "U" USE %DPN INPUT CODTAB F_DESCAGG @@ -94,6 +99,7 @@ END STRING F_DESCR 50 BEGIN PROMPT 25 6 "" + HELP "Descrizione del movimento di contabilita'" FIELD DESCR USE %DPN KEY 2 INPUT S0 F_DESCR @@ -105,6 +111,7 @@ END LIST F_PROVVISORIO 1 25 BEGIN PROMPT 1 7 "Movimento provvisorio " + HELP "Indicare se si tratta di movimento provvisorio" FIELD PROVVIS ITEM " |No (movimento normale)" ITEM "P|Si (cancellabile)" @@ -114,6 +121,7 @@ END STRING F_CODCAUS 3 BEGIN PROMPT 1 8 "Causale " + HELP "Codice della causale generante l'operazione" FLAGS "U" FIELD CODCAUS USE LF_CAUSALI KEY 1 @@ -131,6 +139,7 @@ END STRING F_DESCRCAUS 50 BEGIN PROMPT 23 8 "" + HELP "Descrizione della causale generante l'operazione" USE LF_CAUSALI KEY 2 INPUT DESCR F_DESCRCAUS DISPLAY "Descrizione@50" DESCR @@ -141,6 +150,7 @@ END STRING F_VALUTA 3 BEGIN PROMPT 1 9 "Valuta " + HELP "Codice della valuta per movimento" FIELD LF_MOV->CODVAL FLAGS "U" GROUP 3 @@ -158,6 +168,7 @@ END NUMBER F_CAMBIO 15 5 BEGIN PROMPT 20 9 "Cambio " + HELP "Cambio della valuta" FIELD LF_MOV->CAMBIO FLAGS "RU" GROUP 3 @@ -167,6 +178,7 @@ END BOOLEAN F_VISVAL BEGIN PROMPT 47 9 "Visualizza importi in valuta" + HELP "Indicare se gli importi sono visualizzati in valuta (non in Lit)" GROUP 3 END diff --git a/cg/cg2100i.uml b/cg/cg2100i.uml index a917f49d9..fc2ad180f 100755 --- a/cg/cg2100i.uml +++ b/cg/cg2100i.uml @@ -225,7 +225,7 @@ END LIST I_SEZIONE3 1 8 BEGIN - PROMPT 1 9 "Riga 2 " + PROMPT 1 9 "Riga 3 " ITEM "D|Dare" ITEM "A|Avere" END diff --git a/cg/cg2101.cpp b/cg/cg2101.cpp index d912dfa0a..a85faa58e 100755 --- a/cg/cg2101.cpp +++ b/cg/cg2101.cpp @@ -177,13 +177,14 @@ bool TMovimentoPN::controlla_liquidazione(const TDate& data, bool reset) const key << anno << mese; lim.put("CODTAB", key); if (lim.read() == NOERR) - calcolata = lim.get_bool("B0"); + calcolata = lim.get_bool("B1"); // Controlla se calcolata in definitivo - if (calcolata && reset) + if (reset && lim.get_bool("B0")) { - // Resetta il flag di calcolato sulla liquidazione IVA del mese di registrazione - lim.put("B0", FALSE); - lim.write(); + // Resetta i flag di calcolato sulla liquidazione IVA del mese di registrazione + lim.put("B0", FALSE); // calcolato + lim.put("B1", FALSE); // definitivo + lim.rewrite(); } return calcolata; @@ -228,7 +229,7 @@ int TMovimentoPN::registra(bool re, bool force) if (att_mista) { const char tipo = r.get_char("TIPOC"); - if (tipo == ' ') + if (tipo <= ' ') { TBill c(r.get_int("GRUPPO"), r.get_int("CONTO"), r.get_long("SOTTOCONTO")); tipoatt = c.tipo_att(); diff --git a/cg/cg2102.cpp b/cg/cg2102.cpp index 76c1a37a9..10ed42dec 100755 --- a/cg/cg2102.cpp +++ b/cg/cg2102.cpp @@ -126,7 +126,7 @@ bool TPrimanota_application::detraibile(TToken_string& row) return FALSE; const real& prorata = app().causale().reg().prorata(); - return prorata != 100.0; // Se prorata = 100% e' indetraibile + return prorata < 100.0; // Se prorata = 100% e' indetraibile } /////////////////////////////////////////////////////////// @@ -147,6 +147,7 @@ int TPrimanota_application::type2pos(char tipo) } +// Trova nelle righe contabili un conto nelle righe di tipo prescelto int TPrimanota_application::bill2pos(const TBill& conto, char tipo) { TSheet_field& cg = app().cgs(); @@ -165,6 +166,7 @@ int TPrimanota_application::bill2pos(const TBill& conto, char tipo) } +// Trova nelle righe contabili un conto di contropartita per il conto dato int TPrimanota_application::bill2contr(const TBill& conto, char sezione) const { const TArray& rows = cgs().rows_array(); @@ -1034,7 +1036,7 @@ bool TPrimanota_application::sheet_clifo_handler(TMask_field& f, KEY k) const long codice = atol(f.get()); if (codice > 0L) { - TBill c(0, 0, codice, m.get(cid-2)[0]); + TBill c(0, 0, codice, f.dlg() > 300 ? 'F' : 'C'); c.descrizione(); // Carica gruppo e conto m.set(cid-1, c.gruppo()); m.set(cid, c.conto()); diff --git a/cg/cg2103.cpp b/cg/cg2103.cpp index 5c8a3de58..9d525680c 100755 --- a/cg/cg2103.cpp +++ b/cg/cg2103.cpp @@ -352,9 +352,10 @@ const TRectype& TCausale::row(int num) const TBill& TCausale::bill(int num, TBill& conto) const { - const TRectype& rec = row(num); - conto.set(rec.get_int(RCA_GRUPPO), rec.get_int(RCA_CONTO), - rec.get_long(RCA_SOTTOCONTO), rec.get_char(RCA_TIPOCF)); + const TRectype* rec = (const TRectype*)objptr(num); + if (rec != NULL) + conto.set(rec->get_int(RCA_GRUPPO), rec->get_int(RCA_CONTO), + rec->get_long(RCA_SOTTOCONTO), rec->get_char(RCA_TIPOCF)); return conto; } diff --git a/cg/cg3100a.uml b/cg/cg3100a.uml index 2740d5be4..ad35e29ae 100755 --- a/cg/cg3100a.uml +++ b/cg/cg3100a.uml @@ -24,6 +24,7 @@ END DATE F_DATASTAMPA BEGIN PROMPT 48 1 "Data stampa " + HELP "Data in cui viene effettuata la stampa" FLAGS "A" END @@ -31,6 +32,7 @@ NUMBER F_ANNO 4 BEGIN GROUP 3 PROMPT 2 3 "Anno esercizio " + HELP "Anno d'esercizio di cui si vuole la lista" USE ESC CHECKTYPE NORMAL INPUT CODTAB F_ANNO @@ -55,7 +57,7 @@ END LIST F_CONTROLLO 21 BEGIN PROMPT 2 7 "Controllo movimenti errati " - HELP "La scelta 1 stampa tutte le registrazioni senza la segnalazione di quelle errate; la scelta 2 permette di listare tutte le registrazioni inserite, segnalando quelle errate; la scelta 3 stampa solo le registrazioni errate" + HELP "Indicare il tipo di controllo per movimenti errati" ITEM "3|No" MESSAGE HIDE,1@|RESET,1@ ITEM "2|Si" MESSAGE SHOW,1@ ITEM "1|Stampa movimenti errati" MESSAGE SHOW,1@ @@ -70,13 +72,15 @@ END BOOLEAN F_ANNOC BEGIN GROUP 1 - PROMPT 20 8 "anno di competenza " + PROMPT 20 8 "Anno di competenza " + HELP "Indicare se stampa l'anno di competenza" END BOOLEAN F_ALLEGATO BEGIN GROUP 1 - PROMPT 20 9 "allegato iva " + PROMPT 20 9 "Allegato iva " + HELP "Indicare se stampare l'allegato IVA" MESSAGE TRUE DISABLE,F_STAMPA|COPY,F_STAMPA MESSAGE FALSE ENABLE,F_STAMPA END @@ -84,26 +88,42 @@ END RADIOBUTTON F_DECIDI 10 BEGIN PROMPT 2 10 "Stampa " + HELP "Indicare il criterio di scelta dei movimenti" ITEM "2|data" MESSAGE DISABLE,2@|RESET,2@|ENABLE,3@ ITEM "1|numero" MESSAGE DISABLE,3@|RESET,3@|ENABLE,2@ 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 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 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 @@ -119,7 +139,12 @@ 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 @@ -140,7 +165,7 @@ BEGIN DISPLAY "Descrizione@50" DESCR OUTPUT F_CAUSALEINI CODCAUS FLAGS "UR" - HELP "Introdurre codice causale di inizio stampa: vuoto = inizio archivio" + HELP "Causale di inizio stampa: vuoto = inizio archivio" END STRING F_CAUSALEFIN 3 @@ -152,7 +177,7 @@ BEGIN DISPLAY "Descrizione@50" DESCR OUTPUT F_CAUSALEFIN CODCAUS FLAGS "UR" - HELP "Introdurre codice causale di fine stampa: vuoto = fine archivio" + HELP "Causale di fine stampa: vuoto = fine archivio" END STRING F_REGISTROINI 3 @@ -167,7 +192,7 @@ BEGIN OUTPUT F_REGISTROINI CODTAB[5,7] FLAGS "UR" //CHECKTYPE NORMAL - HELP "Introdurre cod. registro iva di inizio stampa: vuoto = inizio archivio" + HELP "Codice registro iva di inizio stampa: vuoto = inizio archivio" END STRING F_REGISTROFIN 3 @@ -182,17 +207,19 @@ BEGIN OUTPUT F_REGISTROFIN CODTAB[5,7] FLAGS "UR" //CHECKTYPE NORMAL - HELP "Introdurre cod. registro iva di fine stampa: vuoto = fine archivio" + HELP "Codice registro iva di fine stampa: vuoto = fine archivio" END BOOLEAN F_STAMPA BEGIN PROMPT 2 16 "Stampa imponibili, imposte e codici iva " + HELP "Indicare se stampare i valori degli imponibili, dell'imposte e i codici IVA" END BOOLEAN F_STAMPAMOVP BEGIN PROMPT 2 17 "Stampa movimenti provvisori " + HELP "Indicare se stampare i movimenti provvisori" END /* @@ -215,10 +242,3 @@ END ENDPAGE ENDMASK - - - - - - - diff --git a/cg/cg3100b.uml b/cg/cg3100b.uml index 84a94f8c3..9b24b0f3a 100755 --- a/cg/cg3100b.uml +++ b/cg/cg3100b.uml @@ -25,13 +25,14 @@ END DATE F_DATASTAMPA BEGIN PROMPT 48 1 "Data stampa " + HELP "Data in cui viene effettuata la stampa" FLAGS "A" END NUMBER F_ANNO 4 BEGIN PROMPT 2 4 "Anno esercizio " - //HELP "Se non indicato nessun anno esercizio significa che si richiede la stampa come specificato nei campi: dalla data, alla data" + HELP "Anno d'esercizio di cui si vuole la stampa" USE ESC KEY 1 CHECKTYPE NORMAL INPUT CODTAB F_ANNO @@ -45,18 +46,20 @@ END DATE F_DATAINI BEGIN PROMPT 2 6 "Stampa movimenti dalla data " - //HELP "Se non indicato nessun valore viene effettuata una stampa completa in ordine di data" + HELP "Data da cui iniziare la stampa" END DATE F_DATAFIN BEGIN PROMPT 45 6 "alla data " -END + HELP "Data fino a cui eseguire la stampa" +END + LIST F_TIPOELENCO 8 BEGIN PROMPT 2 7 "Tipo elenco " - //HELP "Se si desidera l'elenco per clienti e fornitori, specificare prima il codice del cliente da cui iniziare la stampa e poi quello del fornitore" + HELP "Indicare cosa includere nella stampa" ITEM "C|Clienti" MESSAGE HIDE,2@|SHOW,1@|RESET,1@ ITEM "F|Fornitori" @@ -68,7 +71,7 @@ END NUMBER F_CODICEINI 6 BEGIN PROMPT 2 8 "Stampa dal codice " - //HELP "Se si desidera l'elenco per clienti e fornitori, specificare prima il codice del cliente da cui iniziare la stampa e poi quello del fornitore" + HELP "Indicare il codice da cui iniziare la stampa" GROUP 1 USE LF_CLIFO INPUT TIPOCF F_TIPOELENCO SELECT @@ -82,6 +85,7 @@ END NUMBER F_CODICEFIN 6 BEGIN PROMPT 45 8 "al codice " + HELP "Indicare il codice a cui terminare la stampa" GROUP 1 COPY USE F_CODICEINI INPUT TIPOCF F_TIPOELENCO SELECT @@ -95,6 +99,7 @@ END NUMBER F_CODICEINI1 6 BEGIN PROMPT 2 8 "Stampa dal codice " + HELP "Indicare il codice da cui iniziare la stampa" GROUP 2 COPY USE F_CODICEINI INPUT TIPOCF F_CODICEINI1 @@ -108,6 +113,7 @@ END NUMBER F_CODICEFIN1 6 BEGIN PROMPT 45 8 "al codice " + HELP "Indicare il codice a cui terminare la stampa" GROUP 2 COPY USE F_CODICEINI INPUT TIPOCF F_CODICEFIN1 @@ -122,11 +128,13 @@ BOOLEAN F_CAMBIO BEGIN GROUP 2 PROMPT 2 10 "Cambio pagina per cliente/fornitore " + HELP "Indicare se cambiare pagina nel passaggio da clienti a fornitori" END BOOLEAN F_STAMPAMOVP BEGIN PROMPT 2 11 "Stampa movimenti provvisori " + HELP "Indicare se stampare i movimenti provvisori" END /* @@ -149,10 +157,3 @@ END ENDPAGE ENDMASK - - - - - - - diff --git a/cg/cg3100c.uml b/cg/cg3100c.uml index 37491b76d..07461d31b 100755 --- a/cg/cg3100c.uml +++ b/cg/cg3100c.uml @@ -26,6 +26,7 @@ END NUMBER F_ANNO 4 BEGIN PROMPT 2 5 "Anno esercizio " + HELP "Anno d'esercizio di cui si vuole la stampa" USE ESC CHECKTYPE NORMAL INPUT CODTAB F_ANNO @@ -39,12 +40,14 @@ END DATE F_DATASTAMPA BEGIN PROMPT 2 6 "Data stampa " + HELP "Data in cui viene effettuata la stampa" FLAGS "A" END RADIOBUTTON F_DECIDI 10 BEGIN - PROMPT 2 8 "Stampa " + PROMPT 2 8 "Stampa " + HELP "Criteri di selezione dei movimenti" ITEM "2|data" MESSAGE DISABLE,2@|RESET,2@|ENABLE,1@ ITEM "1|numero" @@ -54,18 +57,21 @@ END DATE F_DATAINI BEGIN PROMPT 19 9 "Stampa mov. dalla data " + HELP "Data da cui iniziare la stampa dei movimenti" GROUP 1 END DATE F_DATAFIN BEGIN PROMPT 55 9 "alla data " + HELP "Data a cui terminare la stampa dei movimenti" GROUP 1 END NUMBER F_NUMEROINI 7 BEGIN PROMPT 19 10 "Stampa mov. dal numero " + HELP "Numero da cui iniziare la stampa dei movimenti" FLAGS "R" GROUP 2 END @@ -73,6 +79,7 @@ END NUMBER F_NUMEROFIN 7 BEGIN PROMPT 55 10 "al numero " + HELP "Numero a cui terminare la stampa dei movimenti" FLAGS "R" GROUP 2 END @@ -80,6 +87,7 @@ END BOOLEAN F_STAMPAMOVP BEGIN PROMPT 2 12 "Stampa movimenti provvisori " + HELP "Indicare se stampare i movimenti provvisori" END TEXT DLG_NULL @@ -100,10 +108,3 @@ END ENDPAGE ENDMASK - - - - - - - diff --git a/cg/cg3200a.uml b/cg/cg3200a.uml index 016925cca..b0226023a 100755 --- a/cg/cg3200a.uml +++ b/cg/cg3200a.uml @@ -45,7 +45,7 @@ END NUMBER F_ANNO 4 BEGIN PROMPT 47 1 "Anno esercizio " - HELP "Inserire un anno esercizio presente nella tabella oppure niente: in quest'ultimo caso non e' possibile fare il controllo competenza esercizio" + HELP "Anno esercizio di cui stampare i mastrini" USE ESC INPUT CODTAB F_ANNO DISPLAY "Anno Esercizio" CODTAB @@ -61,6 +61,7 @@ END LIST F_TIPOCF_INI 25 BEGIN PROMPT 4 4 "Ricerca " + HELP "Indicare il tipo di mastrini da stamapare" ITEM " |Gruppo/conto/sottoconto" MESSAGE HIDE,2@|HIDE,3@|RESET,2@|RESET,3@|SHOW,1@ ITEM "C|Clienti" @@ -72,11 +73,13 @@ END NUMBER F_GRUPPOINI 3 BEGIN PROMPT 4 5 "Da Gruppo - Conto - Sottoconto " + HELP "Codice conto da cui iniziare la stampa" END NUMBER F_CONTOINI_CONTO 3 BEGIN PROMPT 41 5 "" + HELP "Codice conto da cui iniziare la stampa" USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="") INPUT GRUPPO F_GRUPPOINI INPUT CONTO F_CONTOINI_CONTO @@ -98,6 +101,7 @@ END NUMBER F_CONTOINI_CLIENTE 3 BEGIN PROMPT 41 5 "" + HELP "Codice conto da cui iniziare la stampa" USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="C") INPUT GRUPPO F_GRUPPOINI INPUT CONTO F_CONTOINI_CLIENTE @@ -120,6 +124,7 @@ END NUMBER F_CONTOINI_FORN 3 BEGIN PROMPT 41 5 "" + HELP "Codice conto da cui iniziare la stampa" USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="F") INPUT GRUPPO F_GRUPPOINI INPUT CONTO F_CONTOINI_FORN @@ -142,6 +147,7 @@ END NUMBER F_SOTTOCINI_CONTO 6 BEGIN PROMPT 48 5 "" + HELP "Codice conto da cui iniziare la stampa" USE LF_PCON //SELECT SOTTOCONTO!="" INPUT GRUPPO F_GRUPPOINI INPUT CONTO F_CONTOINI_CONTO @@ -176,6 +182,7 @@ END NUMBER F_SOTTOCINI_CLIENTE 6 BEGIN PROMPT 48 5 "" + HELP "Codice conto da cui iniziare la stampa" USE LF_CLIFO //CHECKTYPE NORMAL INPUT TIPOCF "C" @@ -194,6 +201,7 @@ END STRING F_DESCRINI_CLIENTE 50 BEGIN PROMPT 4 6 "Ragione sociale C " + HELP "Codice conto da cui iniziare la stampa" FIELD LF_CLIFO->RAGSOC USE LF_CLIFO KEY 2 INPUT TIPOCF "C" @@ -211,6 +219,7 @@ END NUMBER F_SOTTOCINI_FORN 6 BEGIN PROMPT 48 5 "" + HELP "Codice conto da cui iniziare la stampa" USE LF_CLIFO //CHECKTYPE NORMAL INPUT TIPOCF "F" @@ -229,6 +238,7 @@ END STRING F_DESCRINI_FORN 50 BEGIN PROMPT 4 6 "Ragione Sociale F " + HELP "Codice conto da cui iniziare la stampa" USE LF_CLIFO KEY 2 INPUT TIPOCF "F" INPUT RAGSOC F_DESCRINI_FORN @@ -245,6 +255,7 @@ END LIST F_TIPOCF_FINE 25 BEGIN PROMPT 4 7 "Ricerca " + HELP "Indicare il tipo di mastrini da stamapare" ITEM " |Gruppo/conto/sottoconto" MESSAGE HIDE,5@|HIDE,6@|RESET,5@|RESET,6@|SHOW,4@ ITEM "C|Clienti" @@ -261,6 +272,7 @@ END NUMBER F_CONTOFINE_CONTO 3 BEGIN PROMPT 41 8 "" + HELP "Codice conto a cui terminare la stampa" USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="") INPUT GRUPPO F_GRUPPOFINE INPUT CONTO F_CONTOFINE_CONTO @@ -281,6 +293,7 @@ END NUMBER F_CONTOFINE_CLIENTE 3 BEGIN PROMPT 41 8 "" + HELP "Codice conto a cui terminare la stampa" USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="C") INPUT GRUPPO F_GRUPPOFINE INPUT CONTO F_CONTOFINE_CLIENTE @@ -302,6 +315,7 @@ END NUMBER F_CONTOFINE_FORN 3 BEGIN PROMPT 41 8 "" + HELP "Codice conto a cui terminare la stampa" USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="F") INPUT GRUPPO F_GRUPPOFINE INPUT CONTO F_CONTOFINE_FORN @@ -323,6 +337,7 @@ END NUMBER F_SOTTOCFINE_CONTO 6 BEGIN PROMPT 48 8 "" + HELP "Codice conto a cui terminare la stampa" USE LF_PCON SELECT SOTTOCONTO!="" INPUT GRUPPO F_GRUPPOFINE INPUT CONTO F_CONTOFINE_CONTO @@ -343,6 +358,7 @@ END STRING F_DESCRFINE_CONTO 50 BEGIN PROMPT 4 9 "Descrizione " + HELP "Codice conto a cui terminare la stampa" USE LF_PCON KEY 2 CHECKTYPE NORMAL INPUT DESCR F_DESCRINI_CONTO @@ -357,6 +373,7 @@ END NUMBER F_SOTTOCFINE_CLIENTE 6 BEGIN PROMPT 48 8 "" + HELP "Codice conto a cui terminare la stampa" USE LF_CLIFO //CHECKTYPE NORMAL INPUT TIPOCF "C" @@ -375,6 +392,7 @@ END STRING F_DESCRFINE_CLIENTE 50 BEGIN PROMPT 4 9 "Ragione sociale " + HELP "Codice conto a cui terminare la stampa" FIELD LF_CLIFO->RAGSOC CHECKTYPE NORMAL USE LF_CLIFO KEY 2 @@ -392,6 +410,7 @@ END NUMBER F_SOTTOCFINE_FORN 6 BEGIN PROMPT 48 8 "" + HELP "Codice conto a cui terminare la stampa" USE LF_CLIFO //CHECKTYPE NORMAL INPUT TIPOCF "F" @@ -410,6 +429,7 @@ END STRING F_DESCRFINE_FORN 50 BEGIN PROMPT 4 9 "Ragione Sociale " + HELP "Codice conto a cui terminare la stampa" USE LF_CLIFO KEY 2 CHECKTYPE NORMAL INPUT TIPOCF "F" @@ -426,31 +446,37 @@ END DATE F_DATAINI BEGIN PROMPT 26 11 "" + HELP "Data da cui iniziare la stampa" END DATE F_DATAFINE BEGIN PROMPT 62 11 "" + HELP "Data a cui terminare la stampa" END BOOLEAN F_STAMPATOTIVA BEGIN PROMPT 4 12 "Stampa totali documenti IVA" + HELP "Inidcare se stampare un totale per ogni tipo di doc. IVA" END BOOLEAN F_STAMPAPROGRE BEGIN PROMPT 44 12 "Stampa progressivi attuali" + HELP "Indcare se stampare dati attuali a fondo pagina" END BOOLEAN F_STAMPAMOVPROV BEGIN PROMPT 4 13 "Stampa movimenti provvisori" + HELP "Indicare se stampare movimenti provvisori" END LIST F_STAMPANUM 15 BEGIN PROMPT 4 15 "Stampa numerazione " + HELP "Indicare il tipo di numerazione da stampare" ITEM "1|Operazione" ITEM "2|Riga giornale" ITEM "3|Nessuna" @@ -459,6 +485,7 @@ END LIST F_TIPOSTAMPA 34 BEGIN PROMPT 4 16 "Tipo stampa " + HELP "Indicare il tipo di stampa da ottenere" ITEM "1|Mastrini movimentati nel periodo" ITEM "2|Mastrini con saldi diversi da 0" ITEM "3|Completa" @@ -468,6 +495,7 @@ END BOOLEAN F_MEMORIZZA BEGIN PROMPT 4 17 "Memorizza scelte" + HELP "Indicare se riproporre le scelte effettuate" END BUTTON DLG_OK 9 2 @@ -487,6 +515,7 @@ PAGE "Stampa Mastrini" -1 -1 60 10 LIST F_NUMCARAT 10 BEGIN PROMPT 4 2 "Numero caratteri " + HELP "Indicare il numero di caratteri del foglio di stampa (larghezza)" ITEM "1|132 crt." ITEM "2|198 crt." END @@ -494,6 +523,7 @@ END LIST F_FORMATO 23 BEGIN PROMPT 4 4 "Formato modulo di stampa " + HELP "Indicare l'altezza del modulo di stampa" ITEM "66|11 pollici (27,94 cm)" ITEM "72|12 pollici (30,48 cm)" END @@ -501,6 +531,7 @@ END LIST F_NUMMAST 5 BEGIN PROMPT 4 6 "Numero mastrini per pagina " + HELP "Indicare il numero di mastrini contenuti in una pagina" ITEM "1|Uno" ITEM "2|Due" END diff --git a/cg/cg3300a.uml b/cg/cg3300a.uml index 46d17693c..06579fcb0 100755 --- a/cg/cg3300a.uml +++ b/cg/cg3300a.uml @@ -9,21 +9,21 @@ PAGE "" -1 -1 65 19 DATE F_DATA_STAMPA BEGIN PROMPT 2 1 "Data " - HELP "Inserire la data" + HELP "Data in cui viene fatta la stampa" FLAGS "A" END NUMBER F_ANNO_STAMPA 4 BEGIN PROMPT 30 1 "Anno di stampa " - HELP "Inserire l'anno" + HELP "Anno di cui stampare gli allegati" FLAGS "A" END RADIOBUTTON F_MODO_STAMPA 25 BEGIN PROMPT 2 3 "Destinazione" - HELP "Abilita stampe di controllo" + HELP "Indicare funzione della stampa" ITEM "1|Stampa su modulo" MESSAGE DISABLE,F_TRONC|DISABLE,F_ARROT|HIDE,F_STAMPA_TUTTI MESSAGE SHOW,F_TIPO_STAMPA @@ -40,7 +40,7 @@ END RADIOBUTTON F_TIPO_STAMPA 28 BEGIN PROMPT 31 3 "Tipo di stampa " - HELP "Scegliere il tipo di stampa desiderata" + HELP "Indicare il tipo di stampa desiderata" ITEM "1|Clienti" MESSAGE SHOW,F_ANNO_PREC ITEM "2|Fornitori" @@ -73,32 +73,32 @@ END BOOLEAN F_STAMPA_TUTTI BEGIN PROMPT 2 9 "Stampa tutti i clienti/fornitori movimentati" - HELP "Se disabilitato stampa solo i clienti/fornitori che vanno in allegati" + HELP "Se disabilitato stampa solo i clienti/fornitori che vanno in allegato" FLAGS "H" END BOOLEAN F_TRONC BEGIN PROMPT 2 10 "Importi non troncati " - HELP "Indicare se si desidera eliminare gli zeri delle migliaia" + HELP "Indicare se eliminare gli zeri delle migliaia" END BOOLEAN F_ARROT BEGIN PROMPT 2 11 "Importi non arrotondati " - HELP "Indicare se si desidera che vengano arrotondati gli importi" + HELP "Indicare se vengano arrotondati gli importi" END BOOLEAN F_ANNO_PREC BEGIN PROMPT 31 10 "Estratto anno precedente " - HELP "Indicare se si desidera solo il saldo dell'anno precedente" + HELP "Indicare se stamapre solo il saldo dell'anno precedente" END BOOLEAN F_ATTIVITA BEGIN PROMPT 31 11 "Elenco distinto per attivita'" - HELP "Indicare se si desidera un elenco diviso per attivita'. Se disabilitato il programma stampa un elenco attribuendo tutto all'attivita' prevalente" + HELP "Indicare se stampare un elenco diviso per attivita'" END STRING F_RICERCA_ATT 5 @@ -115,13 +115,13 @@ END BOOLEAN F_RICALCOLA BEGIN PROMPT 46 13 "Ricalcola " - HELP "Se attivato ricalcola ogni ditta prima di stampare" + HELP "Indicare se ricalcolare ogni ditta prima di stampare" END STRING F_DA_DITTA 5 BEGIN PROMPT 1 14 "Da ditta " - HELP "Indicare la ditta di partenza della stampa. Se in bianco vuol dire dalla prima" + HELP "Ditta di partenza della stampa: vuoto = inizio archivio" FLAGS "R" USE LF_NDITTE KEY 1 INPUT CODDITTA F_DA_DITTA @@ -133,7 +133,7 @@ END STRING F_A_DITTA 5 BEGIN PROMPT 22 14 "A ditta " - HELP "Indicare l'ultima ditta da stampare. Se in bianco vuol dire fino all'ultima" + HELP "Ultima ditta da stampare: vuoto = fine archivio" FLAGS "R" USE LF_NDITTE KEY 1 INPUT CODDITTA F_A_DITTA @@ -156,4 +156,3 @@ END ENDPAGE ENDMASK - diff --git a/cg/cg3300b.uml b/cg/cg3300b.uml index 19485baf5..719cd9e56 100755 --- a/cg/cg3300b.uml +++ b/cg/cg3300b.uml @@ -10,7 +10,7 @@ PAGE "" -1 -1 27 6 NUMBER F_ANNO_RICALCOLA 4 BEGIN PROMPT 2 1 "Anno: " - HELP "Inserire l'anno di dichiarazione" + HELP "Anno di cui stampare la dichiarazione" FLAGS "A" END diff --git a/cg/cg3300c.uml b/cg/cg3300c.uml index ed5e224a7..1a689c147 100755 --- a/cg/cg3300c.uml +++ b/cg/cg3300c.uml @@ -9,21 +9,21 @@ PAGE "Stampa su disco" -1 -1 65 16 DATE F_DATA_STAMPA BEGIN PROMPT 2 1 "Data " - HELP "Inserire la data" + HELP "Data in cui effettuare la stampa" FLAGS "A" END NUMBER F_ANNO_STAMPA 4 BEGIN PROMPT 30 1 "Anno di stampa " - HELP "Inserire l'anno" + HELP "Anno di cui effettuare la stampa" FLAGS "A" END RADIOBUTTON F_TIPO_STAMPA2 20 BEGIN PROMPT 2 3 "Tipo di stampa " - HELP "Scegliere il tipo di stampa desiderata" + HELP "Indicare arhcivio da stampare" ITEM "1|Clienti" MESSAGE SHOW,F_ANNO_PREC ITEM "2|Fornitori" @@ -41,13 +41,13 @@ END BOOLEAN F_ANNO_PREC BEGIN PROMPT 30 5 "Estratto anno precedente " - HELP "Indicare se si desidera solo il saldo dell'anno precedente" + HELP "Indicare se stampare solo il saldo dell'anno precedente" END BOOLEAN F_ATTIVITA BEGIN PROMPT 30 6 "Elenco distinto per attivita'" - HELP "Indicare se si desidera un elenco diviso per attivita'. Se disabilitato il programma stampa un elenco attribuendo tutto all'attivita' prevalente" + HELP "Indicare se stampare un elenco diviso per attivita'" END STRING F_RICERCA_ATT 5 @@ -64,13 +64,13 @@ END BOOLEAN F_RICALCOLA BEGIN PROMPT 46 9 "Ricalcola " - HELP "Se attivato ricalcola ogni ditta prima di stampare" + HELP "Indicare se ricalcolare ogni ditta prima di stampare" END STRING F_DA_DITTA 5 BEGIN PROMPT 2 11 "Da ditta " - HELP "Indicare la ditta di partenza della stampa. Se in bianco vuol dire dalla prima" + HELP "Ditta di partenza della stampa. vuoto = prima" FLAGS "R" USE LF_NDITTE KEY 1 INPUT CODDITTA F_DA_DITTA @@ -82,7 +82,7 @@ END STRING F_A_DITTA 5 BEGIN PROMPT 23 11 "A ditta " - HELP "Indicare l'ultima ditta da stampare. Se in bianco vuol dire fino all'ultima" + HELP "Ultima ditta da stampare. vuoto = ultima" FLAGS "R" USE LF_NDITTE KEY 1 INPUT CODDITTA F_A_DITTA @@ -105,4 +105,3 @@ END ENDPAGE ENDMASK - diff --git a/cg/cg3400a.uml b/cg/cg3400a.uml index 64d4dec0a..d96b3be18 100755 --- a/cg/cg3400a.uml +++ b/cg/cg3400a.uml @@ -5,6 +5,7 @@ PAGE "Stampa Libro Giornale" -1 -1 70 15 STRING CODREG 3 BEGIN PROMPT 1 1 "Codice registro " + HELP "Codice del libro giornale da stampare" USE REG SELECT (I0 = 5) || (I0 = 4) // INPUT CODTAB[1,4] ANNO_ESER INPUT CODTAB[5,7] CODREG @@ -51,6 +52,7 @@ END RADIOBUTTON DLG_NULL 20 BEGIN PROMPT 1 5 "" + HELP "Indicare l'intervallo di pagine da stampare" ITEM "1|Tutto" MESSAGE DISABLE, PAGINA_DA ITEM "2|Da pagina" MESSAGE ENABLE, PAGINA_DA END @@ -58,8 +60,10 @@ END NUMBER PAGINA_DA 5 BEGIN PROMPT 13 8 "" + HEL‡P "Numero di pagina da cui iniziare la stampa" END + GROUPBOX DLG_NULL 33 5 BEGIN PROMPT 33 5 "Formato pagina" @@ -68,6 +72,7 @@ END LISTBOX STAMPA_WIDTH 3 BEGIN PROMPT 35 6 "Numero di colonne " + HELP "Numero di colonne del modulo di stampa (larghezza)" ITEM "1|132 colonne" ITEM "2|198 colonne" END @@ -75,16 +80,19 @@ END NUMBER STAMPA_LEN 3 BEGIN PROMPT 35 7 "Numero di righe " + HELP "Numero di righe del modulo di stampa (altezza)" END DATE DATA_DA BEGIN PROMPT 2 10 "Dalla data " + HELP "Data da cui iniziare la stampa" END DATE DATA_A BEGIN PROMPT 2 11 "Alla data " + HELP "Data a cui terminare la stampa" // VALIDATE DATE_CMP_FUNC >= DATA_DA WARNING "Specificare la data di fine stampa" CHECKTYPE REQUIRED @@ -93,6 +101,7 @@ END BOOLEAN STAMPA_DEF BEGIN PROMPT 34 10 "Stampa definitiva" + HELP "Indicare se stampare su bollato" MESSAGE TRUE DISABLE,DATA_DA | CLEAR, DATA_DA MESSAGE FALSE ENABLE,DATA_DA END @@ -111,4 +120,3 @@ END ENDPAGE ENDMASK - diff --git a/cg/cg3400b.uml b/cg/cg3400b.uml index 653ef9aea..eca7aa9a8 100755 --- a/cg/cg3400b.uml +++ b/cg/cg3400b.uml @@ -21,17 +21,17 @@ BEGIN FLAGS "D" END -BUTTON DLG_OK 9 3 +BUTTON DLG_OK 9 2 BEGIN PROMPT -13 7 "" END -BUTTON DLG_CANCEL 9 3 +BUTTON DLG_CANCEL 9 2 BEGIN PROMPT -23 7 "" END -BUTTON DLG_RIPRISTINA 10 3 +BUTTON DLG_RIPRISTINA 10 2 BEGIN PROMPT -33 7 "Ripristina" END @@ -39,4 +39,3 @@ END ENDPAGE ENDMASK - diff --git a/cg/cg3500a.uml b/cg/cg3500a.uml index 35d7f30f6..3a11f8b1a 100755 --- a/cg/cg3500a.uml +++ b/cg/cg3500a.uml @@ -24,12 +24,14 @@ END DATE F_DATASTAMPA BEGIN PROMPT 43 1 "Data di stampa " + HELP "Data in cui effettuare la stampa" FLAGS "A" END NUMBER F_ANNO 4 BEGIN PROMPT 2 3 "Anno esercizio " + HELP "Anno d'esercizio di cui effettuare la stampa" FLAGS "RZ" USE ESC INPUT CODTAB F_ANNO @@ -44,6 +46,7 @@ END RADIOBUTTON F_STAMPA 26 BEGIN PROMPT 2 5 "Scelta stampa " + HELP "Indicare il grado di riepilogo" ITEM "1|Stampa riepilogo conti" ITEM "2|Stampa riepilogo gruppi" END @@ -51,6 +54,7 @@ END RADIOBUTTON F_RICHIESTA 40 BEGIN PROMPT 2 9 "Richiesta stampa " + HELP "Indicare il tipo di movimenti da stampare" ITEM "1|Stampa progressivi attuali" ITEM "2|Stampa progressivi movimenti eliminati" END @@ -68,10 +72,3 @@ END ENDPAGE ENDMASK - - - - - - - diff --git a/cg/cg5300a.uml b/cg/cg5300a.uml index e0e1dbd4f..b47207896 100755 --- a/cg/cg5300a.uml +++ b/cg/cg5300a.uml @@ -9,82 +9,82 @@ PAGE "Parametri liquidazione" -1 -1 78 15 GROUPBOX DLG_NULL 71 3 BEGIN -PROMPT 4 0 "Ditta" -FLAGS "R" + PROMPT 4 0 "Ditta" + FLAGS "R" END NUMBER F_CODDITTA 5 BEGIN -PROMPT 6 1 "Codice " -FLAGS "DFGR" -USE LF_NDITTE -INPUT CODDITTA F_CODDITTA -DISPLAY "Codice" CODDITTA -DISPLAY "Ragione Sociale@50" RAGSOC -OUTPUT F_CODDITTA CODDITTA -OUTPUT F_RAGSOC RAGSOC -CHECKTYPE REQUIRED + PROMPT 6 1 "Codice " + FLAGS "DFGR" + USE LF_NDITTE + INPUT CODDITTA F_CODDITTA + DISPLAY "Codice" CODDITTA + DISPLAY "Ragione Sociale@50" RAGSOC + OUTPUT F_CODDITTA CODDITTA + OUTPUT F_RAGSOC RAGSOC + CHECKTYPE REQUIRED END STRING F_RAGSOC 50 BEGIN -PROMPT 20 1 "" -FLAGS "D" + PROMPT 20 1 "" + FLAGS "D" END NUMBER F_YEAR 4 BEGIN -PROMPT 6 3 "Anno " -FIELD LIA->CODTAB -USE LIA -INPUT CODTAB F_YEAR -DISPLAY "Anno@40" CODTAB -DISPLAY "@2" S0 -OUTPUT F_YEAR CODTAB -KEY 1 -FLAGS "RZ" -CHECKTYPE REQUIRED -ADD NONE + PROMPT 6 3 "Anno " + FIELD LIA->CODTAB + USE LIA + INPUT CODTAB F_YEAR + DISPLAY "Anno@40" CODTAB + DISPLAY "@2" S0 + OUTPUT F_YEAR CODTAB + KEY 1 + FLAGS "RZ" + CHECKTYPE REQUIRED + ADD NONE END GROUPBOX DLG_NULL 71 5 BEGIN -PROMPT 4 4 "Parametri ditta" + PROMPT 4 4 "Parametri ditta" END LIST F_FREQ_VERS 14 BEGIN -PROMPT 6 5 "Frequenza versamenti " -ITEM "M|Mensile" -ITEM "T|Trimestrale" -FIELD LIA->S7 + PROMPT 6 5 "Frequenza versamenti " + ITEM "M|Mensile" + ITEM "T|Trimestrale" + FIELD LIA->S7 END NUMBER F_CRED_PREC 15 0 BEGIN -PROMPT 6 6 "Credito precedente " -FIELD LIA->R0 -PICTURE "." -FLAGS "R" + PROMPT 6 6 "Credito precedente " + FIELD LIA->R0 + PICTURE "." + FLAGS "R" END NUMBER F_CRED_COST 15 0 BEGIN -PROMPT 6 7 "Credito di costo " -FIELD LIA->R5 -PICTURE "." -FLAGS "R" + PROMPT 6 7 "Credito di costo " + FIELD LIA->R5 + PICTURE "." + FLAGS "R" END SPREADSHEET F_SHEET_PLA 78 6 BEGIN PROMPT 1 10 "Parametri attivita'" -ITEM "Attivita'@5" -ITEM "Tipo@1" -ITEM "% Pro-rata@6" -ITEM "Plafond art.8@15" -ITEM "Plafond art.8b@15" -ITEM "Plafond art.9@15" + ITEM "Attivita'@5" + ITEM "Tipo@1" + ITEM "% Pro-rata@6" + ITEM "Plafond art.8@15" + ITEM "Plafond art.8b@15" + ITEM "Plafond art.9@15" END ENDPAGE @@ -94,80 +94,82 @@ PAGE "" -1 -1 65 16 NUMBER F_CODATT 5 BEGIN -PROMPT 4 1 "Codice Attivita' " -FLAGS "DZG" -USE %AIS -INPUT CODTAB F_CODATT -DISPLAY "Codice" CODTAB -DISPLAY "Descrizione@50" S0 -OUTPUT F_CODATT CODTAB -OUTPUT F_DESATT S0 -CHECKTYPE NORMAL + PROMPT 4 1 "Codice Attivita' " + FLAGS "DZG" + USE %AIS + INPUT CODTAB F_CODATT + DISPLAY "Codice" CODTAB + DISPLAY "Descrizione@50" S0 + OUTPUT F_CODATT CODTAB + OUTPUT F_DESATT S0 + CHECKTYPE NORMAL END STRING F_DESATT 50 30 BEGIN -PROMPT 31 1 "" -FLAGS "D" + PROMPT 31 1 "" + FLAGS "D" END LIST F_TIPOATT 26 BEGIN -PROMPT 4 3 "Tipo " -FLAGS "U" -ITEM " |Altre" -ITEM "M|Mista" -ITEM "E|Mista evidenziata" -ITEM "S|Servizio o mista generica" + PROMPT 4 3 "Tipo " + FLAGS "U" + ITEM " |Altre" + ITEM "M|Mista" + ITEM "E|Mista evidenziata" + ITEM "S|Servizio o mista generica" END NUMBER F_PRORATA 6 2 BEGIN -PROMPT 4 5 "% Pro-Rata " -PICTURE ".2" -FLAGS "R" -GROUP 1 + PROMPT 4 5 "% Pro-Rata " + PICTURE ".2" + NUM_EXPR {(#F_PRORATA>=0.0)&&(#F_PRORATA<=100.0)} + WARNING "La percentuale deve essere compresa tra 0 e 100" + FLAGS "R" + GROUP 1 END NUMBER F_P8 15 BEGIN -PROMPT 4 7 "Plafond art. 8 " -PICTURE "." -FLAGS "R" -GROUP 1 + PROMPT 4 7 "Plafond art. 8 " + PICTURE "." + FLAGS "R" + GROUP 1 END NUMBER F_P8B 15 BEGIN -PROMPT 4 9 "Plafond art. 8b " -PICTURE "." -FLAGS "R" -GROUP 1 + PROMPT 4 9 "Plafond art. 8b " + PICTURE "." + FLAGS "R" + GROUP 1 END NUMBER F_P9 15 BEGIN -PROMPT 4 11 "Plafond art. 9 " -PICTURE "." -FLAGS "R" -GROUP 1 + PROMPT 4 11 "Plafond art. 9 " + PICTURE "." + FLAGS "R" + GROUP 1 END BUTTON DLG_OK 9 2 BEGIN -PROMPT -13 -1 "" + PROMPT -13 -1 "" END BUTTON DLG_CANCEL 9 2 BEGIN -PROMPT -23 -1 "" + PROMPT -23 -1 "" END BUTTON DLG_NULL 9 2 BEGIN -PROMPT -33 -1 "Azzera" -MESSAGE RESET,1@ + PROMPT -33 -1 "Azzera" + MESSAGE RESET,1@ END ENDPAGE diff --git a/cg/conto.cpp b/cg/conto.cpp index af7129294..97ba8d8da 100755 --- a/cg/conto.cpp +++ b/cg/conto.cpp @@ -182,15 +182,15 @@ bool TBill::read(TRectype &r) int TBill::tipo_att() { int tipo_att = 1; - if (tipo() == ' ' && ok()) + if (tipo() <= ' ' && ok()) { TBill bill(gruppo(), conto()); - TRectype conto(LF_PCON); bill.read(conto); - const TIndbil ib = (TIndbil)conto.get_int("INDBIL"); + TRectype rec(LF_PCON); bill.read(rec); + const TIndbil ib = (TIndbil)rec.get_int("INDBIL"); if (ib == ib_passivita || ib == ib_ricavi) { - read(conto); - const int ricser = conto.get_int("RICSER"); + read(rec); + const int ricser = rec.get_int("RICSER"); tipo_att = (ricser == 0) ? 2 : 1; } }