Corretti conflitti

git-svn-id: svn://10.65.10.50/trunk@621 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1994-11-14 13:26:55 +00:00
parent 6964384386
commit c39c2e551c
13 changed files with 361 additions and 255 deletions

View File

@ -439,8 +439,9 @@ void TPrimanota_application::init_insert_mode(TMask& m)
void TPrimanota_application::init_modify_mode(TMask& m) void TPrimanota_application::init_modify_mode(TMask& m)
{ {
init_mask(m); init_mask(m);
calcola_imp(); // Calcola totale imponibile ed imposte calcola_saldo(); // Verifica eventuali sbilanci contabili
calcola_saldo(); // Verifica eventuali sbilanci if (iva() != nessuna_iva)
calcola_imp(); // Calcola totale imponibile ed imposte
} }

View File

@ -21,20 +21,19 @@ NUMBER FLD_CG41_YEAR 4
BEGIN BEGIN
PROMPT 3 6 "Anno da riordinare " PROMPT 3 6 "Anno da riordinare "
FLAGS "A" FLAGS "A"
HELP "Inserire l'anno relativamente al quale si desidera il riordino degli archivi" HELP "Anno del quale si desidera il riordino degli archivi"
END END
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -12 -1 "Annulla"
END
BUTTON DLG_OK 9 2 BUTTON DLG_OK 9 2
BEGIN BEGIN
PROMPT -22 -1 "Conferma" PROMPT -12 -1 "Conferma"
END
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -22 -1 "Annulla"
END END
ENDPAGE ENDPAGE
ENDMASK ENDMASK

View File

@ -4,6 +4,7 @@ PAGE "Calcolo Liquidazioni" -1 -1 68 15
RADIOBUTTON CG43_RDB_VERS 15 RADIOBUTTON CG43_RDB_VERS 15
BEGIN BEGIN
PROMPT 4 1 "Versamenti" PROMPT 4 1 "Versamenti"
HELP "Indicare di quali versamenti procedere con la liquidazione"
ITEM "1|Tutti" MESSAGE HIDE,CG43_LST_TRIM|SHOW,CG43_LST_MESE ITEM "1|Tutti" MESSAGE HIDE,CG43_LST_TRIM|SHOW,CG43_LST_MESE
ITEM "2|Mensili" MESSAGE HIDE,CG43_LST_TRIM|SHOW,CG43_LST_MESE ITEM "2|Mensili" MESSAGE HIDE,CG43_LST_TRIM|SHOW,CG43_LST_MESE
ITEM "3|Trimestrali" MESSAGE SHOW,CG43_LST_TRIM|HIDE,CG43_LST_MESE ITEM "3|Trimestrali" MESSAGE SHOW,CG43_LST_TRIM|HIDE,CG43_LST_MESE
@ -19,7 +20,7 @@ NUMBER CG43_FLD_DFR 5
BEGIN BEGIN
PROMPT 24 2 "Da codice " PROMPT 24 2 "Da codice "
FLAGS "UR" FLAGS "UR"
HELP "Immettere codice ditta di partenza per la selezione" HELP "Codice ditta di partenza per la selezione"
USE LF_NDITTE KEY 1 USE LF_NDITTE KEY 1
DISPLAY "Codice" CODDITTA DISPLAY "Codice" CODDITTA
DISPLAY "Ragione sociale@50" RAGSOC DISPLAY "Ragione sociale@50" RAGSOC
@ -31,7 +32,7 @@ NUMBER CG43_FLD_DTO 5
BEGIN BEGIN
PROMPT 24 3 "A codice " PROMPT 24 3 "A codice "
FLAGS "UR" FLAGS "UR"
HELP "Immettere codice ditta di fine selezione" HELP "Codice ditta di fine selezione"
COPY USE CG43_FLD_DFR COPY USE CG43_FLD_DFR
DISPLAY "Codice" CODDITTA DISPLAY "Codice" CODDITTA
DISPLAY "Ragione sociale@50" RAGSOC DISPLAY "Ragione sociale@50" RAGSOC
@ -48,12 +49,14 @@ END
BUTTON DLG_SELECT 10 2 BUTTON DLG_SELECT 10 2
BEGIN BEGIN
PROMPT 48 2 "~Selezione" PROMPT 48 2 "~Selezione"
HELP "Selezione ditte di cui fare la liquidazione"
MESSAGE EXIT, DLG_SELECT MESSAGE EXIT, DLG_SELECT
END END
BUTTON CG43_BUT_ANN 10 BUTTON CG43_BUT_ANN 10
BEGIN BEGIN
PROMPT 48 4 "A~zzera" PROMPT 48 4 "A~zzera"
HELP "Azzerare la selezione delle ditte da fare la liquidazione"
MESSAGE EXIT,CG43_BUT_ANN MESSAGE EXIT,CG43_BUT_ANN
END END
@ -68,7 +71,7 @@ END
NUMBER CG43_FLD_ANNO 4 NUMBER CG43_FLD_ANNO 4
BEGIN BEGIN
PROMPT 30 7 "Anno " PROMPT 30 7 "Anno "
HELP "Immettere l'anno di calcolo" HELP "Anno di cui effettuare il calcolo"
FLAGS "A" FLAGS "A"
END END
@ -76,7 +79,7 @@ END
LIST CG43_LST_MESE 10 LIST CG43_LST_MESE 10
BEGIN BEGIN
PROMPT 4 7 "Periodo " PROMPT 4 7 "Periodo "
HELP "Immettere il mese di calcolo liquidazione" HELP "Mese di cui effettuare il calcolo liquidazione"
ITEM "13|Annuale" ITEM "13|Annuale"
FLAGS "AM" FLAGS "AM"
END END
@ -84,7 +87,7 @@ END
LIST CG43_LST_TRIM 12 LIST CG43_LST_TRIM 12
BEGIN BEGIN
PROMPT 4 7 "Periodo " PROMPT 4 7 "Periodo "
HELP "Immettere il trimestre di calcolo liquidazione" HELP "Trimestre di cui effettuare il calcolo liquidazione"
ITEM "3|1 Trimestre " ITEM "3|1 Trimestre "
ITEM "6|2 Trimestre " ITEM "6|2 Trimestre "
ITEM "9|3 Trimestre " ITEM "9|3 Trimestre "
@ -95,6 +98,7 @@ END
LIST CG43_LST_CALC 13 LIST CG43_LST_CALC 13
BEGIN BEGIN
PROMPT 4 8 "Ricalcola " PROMPT 4 8 "Ricalcola "
HELP "Indicare se rifare il calcolo durante la stampa"
// ITEM "1|Se necessario" // ITEM "1|Se necessario"
ITEM "2|Mese corrente" ITEM "2|Mese corrente"
ITEM "3|Tutti i mesi" ITEM "3|Tutti i mesi"
@ -111,7 +115,7 @@ END
BOOLEAN CG43_CHK_STAMPA BOOLEAN CG43_CHK_STAMPA
BEGIN BEGIN
PROMPT 5 11 "Esegui " PROMPT 5 11 "Esegui "
HELP "Se selezionato, stampa il prospetto delle liquidazioni" HELP "Indicare se stampare il prospetto delle liquidazioni"
MESSAGE TRUE ENABLE,CG43_FLD_DATA MESSAGE TRUE ENABLE,CG43_FLD_DATA
MESSAGE FALSE DISABLE,CG43_FLD_DATA MESSAGE FALSE DISABLE,CG43_FLD_DATA
END END
@ -120,7 +124,7 @@ END
DATE CG43_FLD_DATA DATE CG43_FLD_DATA
BEGIN BEGIN
PROMPT 16 11 "con data " PROMPT 16 11 "con data "
HELP "Immettere la data di stampa" HELP "Data di stampa del prospetto delle liquidazioni"
FLAGS "A" FLAGS "A"
END END
@ -128,7 +132,7 @@ END
BOOLEAN CG43_CHK_FINAL BOOLEAN CG43_CHK_FINAL
BEGIN BEGIN
PROMPT 47 11 "Definitivo" PROMPT 47 11 "Definitivo"
HELP "Se selezionato, la liquidazione e' registrata come definitiva" HELP "Indicare se la liquidazione e' registrata come definitiva"
END END

View File

@ -1,16 +1,18 @@
#include "cg4300b.h" #include "cg4300b.h"
PAGE "Estrazione deleghe" -1 -1 45 9 PAGE "Estrazione deleghe" -1 -1 45 10
NUMBER FLD_CGB_YEAR 4 NUMBER FLD_CGB_YEAR 4
BEGIN BEGIN
PROMPT 2 1 "Anno estrazione " PROMPT 2 1 "Anno estrazione "
HELP "Anno d'esercizio da cui effettuare le estrazioni"
FLAGS "A" FLAGS "A"
END END
LIST FLD_CGB_MONTH 10 LIST FLD_CGB_MONTH 10
BEGIN BEGIN
PROMPT 2 2 "Mese estrazione " PROMPT 2 2 "Mese estrazione "
HELP "Mese da cui effettuare le estrazioni"
FLAGS "AM" FLAGS "AM"
ITEM "13|Annuale" ITEM "13|Annuale"
END END
@ -23,12 +25,14 @@ END
BUTTON DLG_SELECT 10 2 BUTTON DLG_SELECT 10 2
BEGIN BEGIN
PROMPT -12 5 "Scegli" PROMPT -12 5 "Scegli"
HELP "Selezionare le ditte di cui estrarre le deleghe"
MESSAGE EXIT,DLG_SELECT MESSAGE EXIT,DLG_SELECT
END END
BUTTON BUT_CGB_ALL 10 2 BUTTON BUT_CGB_ALL 10 2
BEGIN BEGIN
PROMPT -22 5 "Tutte" PROMPT -22 5 "Tutte"
HELP "Selezionare tutte le ditte di cui estrarre le deleghe"
MESSAGE EXIT,BUT_CGB_ALL MESSAGE EXIT,BUT_CGB_ALL
END END

View File

@ -6,6 +6,7 @@ PAGE "Calcolo acconto" -1 -1 52 11
RADIOBUTTON RDB_CGC_BASE 4 21 RADIOBUTTON RDB_CGC_BASE 4 21
BEGIN BEGIN
PROMPT 3 1 "Base di calcolo" PROMPT 3 1 "Base di calcolo"
HELP "Indicare l'anno di cui calcolare l'acconto"
ITEM "1|Anno precedente" ITEM "1|Anno precedente"
ITEM "2|Anno in corso" ITEM "2|Anno in corso"
END END
@ -13,7 +14,7 @@ END
BOOLEAN CHK_CGC_PRINT BOOLEAN CHK_CGC_PRINT
BEGIN BEGIN
PROMPT 27 2 "Stampa prospetto" PROMPT 27 2 "Stampa prospetto"
HELP "Questo campo puo' assumere solamente i valori vero e falso" HELP "Indicare se stampare anche un prospetto riepilogativo"
MESSAGE TRUE ENABLE,CHK_CGC_BASE MESSAGE TRUE ENABLE,CHK_CGC_BASE
MESSAGE FALSE DISABLE,CHK_CGC_BASE MESSAGE FALSE DISABLE,CHK_CGC_BASE
END END
@ -21,12 +22,13 @@ END
BOOLEAN CHK_CGC_BASE BOOLEAN CHK_CGC_BASE
BEGIN BEGIN
PROMPT 27 3 "Stampa base di calcolo" PROMPT 27 3 "Stampa base di calcolo"
HELP "Questo campo puo' assumere solamente i valori vero e falso" HELP "Indicare se stampare la base di calcolo"
END END
NUMBER FLD_CGC_YEAR 4 NUMBER FLD_CGC_YEAR 4
BEGIN BEGIN
PROMPT 3 5 "Anno da elaborare " PROMPT 3 5 "Anno da elaborare "
HELP "Anno di cui si vuole il calcolo acconto"
FLAGS "A" FLAGS "A"
END END
@ -38,12 +40,14 @@ END
BUTTON DLG_SELECT 10 2 BUTTON DLG_SELECT 10 2
BEGIN BEGIN
PROMPT -12 7 "Scegli" PROMPT -12 7 "Scegli"
HELP "Selezionare le ditte di cui fare il calcolo dell'acconto"
MESSAGE EXIT,DLG_SELECT MESSAGE EXIT,DLG_SELECT
END END
BUTTON BUT_CGC_ALL 10 2 BUTTON BUT_CGC_ALL 10 2
BEGIN BEGIN
PROMPT -22 7 "Tutte" PROMPT -22 7 "Tutte"
HELP "Selezionare tutte le ditte di cui fare il calcolo dell'acconto"
MESSAGE EXIT,BUT_CGC_ALL MESSAGE EXIT,BUT_CGC_ALL
END END
@ -59,5 +63,3 @@ END
ENDPAGE ENDPAGE
ENDMASK ENDMASK

View File

@ -9,6 +9,7 @@ PAGE "Stampa registri IVA" -1 -1 56 16
LISTBOX TIPO_STAMPA 1 48 LISTBOX TIPO_STAMPA 1 48
BEGIN BEGIN
PROMPT 2 1 "Tipo " PROMPT 2 1 "Tipo "
HELP "Indicare il tipo di stampa da eseguire"
ITEM "3|Stampa di prova" ITEM "3|Stampa di prova"
MESSAGE SHOW,3@|HIDE,1@|RESET,1@|HIDE,2@|RESET,2@|SHOW,CODICE_LIBRO MESSAGE SHOW,3@|HIDE,1@|RESET,1@|HIDE,2@|RESET,2@|SHOW,CODICE_LIBRO
ITEM "1|Libri bollati della ditta" ITEM "1|Libri bollati della ditta"
@ -27,7 +28,7 @@ END
NUMBER DA_CODICE 5 NUMBER DA_CODICE 5
BEGIN BEGIN
PROMPT 21 3 "Da codice " PROMPT 21 3 "Da codice "
HELP "Immettere codice ditta di partenza per la selezione" HELP "Codice ditta di partenza per la selezione"
USE LF_NDITTE KEY 1 USE LF_NDITTE KEY 1
CHECKTYPE NORMAL CHECKTYPE NORMAL
INPUT CODDITTA DA_CODICE INPUT CODDITTA DA_CODICE
@ -39,7 +40,7 @@ END
NUMBER A_CODICE 5 NUMBER A_CODICE 5
BEGIN BEGIN
PROMPT 21 4 "A codice " PROMPT 21 4 "A codice "
HELP "Immettere codice ditta di fine selezione" HELP "Codice ditta di fine selezione"
COPY USE DA_CODICE COPY USE DA_CODICE
CHECKTYPE NORMAL CHECKTYPE NORMAL
INPUT CODDITTA A_CODICE INPUT CODDITTA A_CODICE
@ -56,17 +57,20 @@ END
BUTTON DLG_SELECT 9 2 BUTTON DLG_SELECT 9 2
BEGIN BEGIN
PROMPT 42 3 "~Selezione" PROMPT 42 3 "~Selezione"
HELP "Indicare le ditta da selezionare per la stampa"
END END
BUTTON F_ANNULLA 9 BUTTON F_ANNULLA 9
BEGIN BEGIN
PROMPT 42 5 "A~zzera" PROMPT 42 5 "A~zzera"
HELP "Togliere la selezione alle ditte"
MESSAGE RESET,DA_CODICE|RESET,A_CODICE MESSAGE RESET,DA_CODICE|RESET,A_CODICE
END END
DATE DATA_STAMPA DATE DATA_STAMPA
BEGIN BEGIN
PROMPT 28 7 "Data stampa " PROMPT 28 7 "Data stampa "
HELP "Data in cui viene stampato il registro"
FLAG "AH" FLAG "AH"
GROUP 3 GROUP 3
END END
@ -74,6 +78,7 @@ END
NUMBER ANNO 4 NUMBER ANNO 4
BEGIN BEGIN
PROMPT 2 3 "Anno " PROMPT 2 3 "Anno "
HELP "Anno di cui si vuole stampare il registro"
FLAGS "A" FLAGS "A"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -137,12 +142,14 @@ END
DATE DA_DATA DATE DA_DATA
BEGIN BEGIN
PROMPT 5 9 "Dalla data " PROMPT 5 9 "Dalla data "
HELP "Data di partenza per la stampa del registro"
GROUP 3 GROUP 3
END END
DATE A_DATA DATE A_DATA
BEGIN BEGIN
PROMPT 30 9 "Alla data " PROMPT 30 9 "Alla data "
HELP "Data di fine per la stampa del registro"
VALIDATE DATE_CMP_FUNC >= DA_DATA VALIDATE DATE_CMP_FUNC >= DA_DATA
WARNING "Inserire una data non inferiore alla data limite inferiore" WARNING "Inserire una data non inferiore alla data limite inferiore"
GROUP 3 GROUP 3
@ -151,6 +158,7 @@ END
LISTBOX FINO_A_MESE 10 LISTBOX FINO_A_MESE 10
BEGIN BEGIN
PROMPT 5 9 "Fino al mese " PROMPT 5 9 "Fino al mese "
HELP "Mese fino al quale eseguire la stampa"
FLAGS "M" FLAGS "M"
GROUP 1 GROUP 1
END END
@ -158,6 +166,7 @@ END
LISTBOX MESE 10 LISTBOX MESE 10
BEGIN BEGIN
PROMPT 5 9 "Mese " PROMPT 5 9 "Mese "
HELP "Mese di cui eseguire la stampa"
FLAGS "M" FLAGS "M"
GROUP 2 GROUP 2
END END
@ -165,7 +174,7 @@ END
LISTBOX TIPO_RIEPILOGATIVO 11 LISTBOX TIPO_RIEPILOGATIVO 11
BEGIN BEGIN
PROMPT 2 11 "Tipo riepilogativo " PROMPT 2 11 "Tipo riepilogativo "
HELP "Selezionare Del periodo/Annuale a seconda che si desideri la stampa della liquidazione periodica/annuale" HELP "Indicare il periodo di cui si vuole stampare il registro"
ITEM "P|Del periodo" ITEM "P|Del periodo"
ITEM "A|Annuale" ITEM "A|Annuale"
GROUP 1 GROUP 1
@ -181,6 +190,7 @@ END
NUMBER ULTIMA_PAGINA 4 NUMBER ULTIMA_PAGINA 4
BEGIN BEGIN
PROMPT 2 12 "Ultimo numero di pagina stampata libro unico " PROMPT 2 12 "Ultimo numero di pagina stampata libro unico "
HELP "Numero dell'ultima pagina del libro unico stampata"
FLAGS "R" FLAGS "R"
GROUP 2 GROUP 2
END END
@ -188,7 +198,7 @@ END
STRING CODICE_LIBRO_IVA 3 STRING CODICE_LIBRO_IVA 3
BEGIN BEGIN
PROMPT 2 13 "Eventuale codice libro IVA " PROMPT 2 13 "Eventuale codice libro IVA "
HELP "Se non viene indicato nessun cod. libro IVA, vengono stampati tutti i registri delle ditte selezionate" HELP "Libro IVA da stampare. Vuoto = tutti"
USE REG SELECT (I0<"3") && (S6=="") && (CODTAB[1,4]==#111) USE REG SELECT (I0<"3") && (S6=="") && (CODTAB[1,4]==#111)
INPUT CODTAB[1,4] ANNO INPUT CODTAB[1,4] ANNO
INPUT CODTAB[5,7] CODICE_LIBRO_IVA INPUT CODTAB[5,7] CODICE_LIBRO_IVA
@ -216,4 +226,3 @@ END
ENDPAGE ENDPAGE
ENDMASK ENDMASK

View File

@ -1,6 +1,6 @@
#include "cg4500a.h" #include "cg4500a.h"
PAGE "" -1 -1 74 14 PAGE "Apertura esercizio contabile" -1 -1 74 14
NUMBER F_CODDITTA 5 NUMBER F_CODDITTA 5
BEGIN BEGIN
@ -42,6 +42,7 @@ END
NUMBER F_NUOVOANNO 4 NUMBER F_NUOVOANNO 4
BEGIN BEGIN
PROMPT 1 7 "Nuovo anno esercizio " PROMPT 1 7 "Nuovo anno esercizio "
HELP "Anno di cui si vuole aprire un nuovo esercizio contabile"
FLAGS "RZ" FLAGS "RZ"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -49,12 +50,14 @@ END
DATE F_DATAINI DATE F_DATAINI
BEGIN BEGIN
PROMPT 1 8 "Data inizio nuovo esercizio " PROMPT 1 8 "Data inizio nuovo esercizio "
HELP "Data di inizio del nuovo esercizio contabile"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
DATE F_DATAFIN DATE F_DATAFIN
BEGIN BEGIN
PROMPT 1 9 "Data fine nuovo esercizio " PROMPT 1 9 "Data fine nuovo esercizio "
HELP "Data di fine nuovo esercizio contabile"
WARNING "Inserire una data non inferiore alla data di inizio del nuovo esercizio" WARNING "Inserire una data non inferiore alla data di inizio del nuovo esercizio"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
VALIDATE DATE_CMP_FUNC >= F_DATAINI VALIDATE DATE_CMP_FUNC >= F_DATAINI
@ -73,10 +76,3 @@ END
ENDPAGE ENDPAGE
ENDMASK ENDMASK

View File

@ -1,6 +1,6 @@
#include "cg4500b.h" #include "cg4500b.h"
PAGE "" -1 -1 73 10 PAGE "Apertura nuovo esercizio IVA" -1 -1 73 10
NUMBER F_CODDITTA 5 NUMBER F_CODDITTA 5
BEGIN BEGIN
@ -24,6 +24,7 @@ END
NUMBER F_ANNOIVA 4 NUMBER F_ANNOIVA 4
BEGIN BEGIN
PROMPT 2 4 "Nuovo anno esercizio IVA " PROMPT 2 4 "Nuovo anno esercizio IVA "
HELP "Anno di cui si vuole aprire un nuovo esercizio IVA"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
//FLAGS "A" //FLAGS "A"
END END
@ -31,6 +32,7 @@ END
STRING F_FREQUENZA 1 STRING F_FREQUENZA 1
BEGIN BEGIN
PROMPT 2 5 "Frequenza versamenti (M/T) " PROMPT 2 5 "Frequenza versamenti (M/T) "
HELP "Indicare la frequenza delle liquidazioni IVA per il nuovo esercizio"
END END
BUTTON DLG_OK 9 2 BUTTON DLG_OK 9 2

View File

@ -25,6 +25,7 @@ END
STRING F_CHIUSURA 3 STRING F_CHIUSURA 3
BEGIN BEGIN
PROMPT 2 4 "Codice causale chiusura " PROMPT 2 4 "Codice causale chiusura "
HELP "Codice causale che genera il movimento di chiusura"
USE LF_CAUSALI KEY 1 USE LF_CAUSALI KEY 1
DISPLAY "Codice" CODCAUS DISPLAY "Codice" CODCAUS
DISPLAY "Descrizione @50" DESCR DISPLAY "Descrizione @50" DESCR
@ -36,6 +37,7 @@ END
STRING F_APERTURA 3 STRING F_APERTURA 3
BEGIN BEGIN
PROMPT 2 5 "Codice causale apertura " PROMPT 2 5 "Codice causale apertura "
HELP "Codice causale che genera il movimento di apertura"
COPY USE F_CHIUSURA COPY USE F_CHIUSURA
COPY DISPLAY F_CHIUSURA COPY DISPLAY F_CHIUSURA
OUTPUT F_APERTURA CODCAUS OUTPUT F_APERTURA CODCAUS
@ -45,11 +47,13 @@ END
DATE F_DATAC DATE F_DATAC
BEGIN BEGIN
PROMPT 36 4 "Data/Anno chiusura " PROMPT 36 4 "Data/Anno chiusura "
HELP "Data in cui effettuare il movimento di chiusura"
END END
DATE F_DATAAP DATE F_DATAAP
BEGIN BEGIN
PROMPT 36 5 "Data/Anno apertura " PROMPT 36 5 "Data/Anno apertura "
HELP "Data in cui effettuare il movimento di apertura"
WARNING "Inserire una data non inferiore alla data di chiusura" WARNING "Inserire una data non inferiore alla data di chiusura"
VALIDATE DATE_CMP_FUNC >= F_DATAC VALIDATE DATE_CMP_FUNC >= F_DATAC
END END
@ -75,6 +79,7 @@ END
NUMBER F_BILCHG 3 NUMBER F_BILCHG 3
BEGIN BEGIN
PROMPT 3 9 "Bilancio di chiusura " PROMPT 3 9 "Bilancio di chiusura "
HELP "Codice conto di riepilogo del bilancio di chiusura"
USE LF_PCON KEY 1 SELECT SOTTOCONTO!="" USE LF_PCON KEY 1 SELECT SOTTOCONTO!=""
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
@ -92,6 +97,7 @@ END
NUMBER F_BILCHC 3 NUMBER F_BILCHC 3
BEGIN BEGIN
PROMPT 44 9 "" PROMPT 44 9 ""
HELP "Codice conto di riepilogo del bilancio di chiusura"
COPY ALL F_BILCHG COPY ALL F_BILCHG
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -99,6 +105,7 @@ END
NUMBER F_BILCHS 6 NUMBER F_BILCHS 6
BEGIN BEGIN
PROMPT 51 9 "" PROMPT 51 9 ""
HELP "Codice conto di riepilogo del bilancio di chiusura"
COPY ALL F_BILCHG COPY ALL F_BILCHG
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
@ -107,6 +114,7 @@ END
NUMBER F_PROPERG 3 NUMBER F_PROPERG 3
BEGIN BEGIN
PROMPT 3 10 "Profitti e perdite " PROMPT 3 10 "Profitti e perdite "
HELP "Codice conto di riepilogo del Profitti e perdite"
COPY USE F_BILCHG COPY USE F_BILCHG
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
@ -121,9 +129,9 @@ END
NUMBER F_PROPERC 3 NUMBER F_PROPERC 3
BEGIN BEGIN
PROMPT 44 10 "" PROMPT 44 10 ""
HELP "Codice conto di riepilogo del Profitti e perdite"
COPY USE F_BILCHG COPY USE F_BILCHG
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
COPY OUTPUT F_PROPERG COPY OUTPUT F_PROPERG
COPY INPUT F_PROPERG COPY INPUT F_PROPERG
@ -132,6 +140,7 @@ END
NUMBER F_PROPERS 6 NUMBER F_PROPERS 6
BEGIN BEGIN
PROMPT 51 10 "" PROMPT 51 10 ""
HELP "Codice conto di riepilogo del Profitti e perdite"
COPY ALL F_PROPERC COPY ALL F_PROPERC
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -139,6 +148,7 @@ END
NUMBER F_BILAPG 3 NUMBER F_BILAPG 3
BEGIN BEGIN
PROMPT 3 11 "Bilancio di apertura " PROMPT 3 11 "Bilancio di apertura "
HELP "Codice conto di riepilogo del Bilancio di apertura"
COPY USE F_BILCHG COPY USE F_BILCHG
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
@ -153,6 +163,7 @@ END
NUMBER F_BILAPC 3 NUMBER F_BILAPC 3
BEGIN BEGIN
PROMPT 44 11 "" PROMPT 44 11 ""
HELP "Codice conto di riepilogo del Bilancio di apertura"
COPY USE F_BILCHG COPY USE F_BILCHG
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
@ -163,6 +174,7 @@ END
NUMBER F_BILAPS 6 NUMBER F_BILAPS 6
BEGIN BEGIN
PROMPT 51 11 "" PROMPT 51 11 ""
HELP "Codice conto di riepilogo del Bilancio di apertura"
COPY ALL F_BILAPC COPY ALL F_BILAPC
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -170,6 +182,7 @@ END
NUMBER F_UTILPG 3 NUMBER F_UTILPG 3
BEGIN BEGIN
PROMPT 3 12 "Utile d'esercizio c/to patrim. " PROMPT 3 12 "Utile d'esercizio c/to patrim. "
HELP "Codice conto patrimoniale in cui ripilogare l'utile d'esercizio"
USE LF_PCON KEY 1 SELECT (SOTTOCONTO!="") && ((INDBIL="1")||(INDBIL="2")||(INDBIL="5")) USE LF_PCON KEY 1 SELECT (SOTTOCONTO!="") && ((INDBIL="1")||(INDBIL="2")||(INDBIL="5"))
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
@ -184,6 +197,7 @@ END
NUMBER F_UTILPC 3 NUMBER F_UTILPC 3
BEGIN BEGIN
PROMPT 44 12 "" PROMPT 44 12 ""
HELP "Codice conto patrimoniale in cui ripilogare l'utile d'esercizio"
COPY USE F_UTILPG COPY USE F_UTILPG
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
@ -194,6 +208,7 @@ END
NUMBER F_UTILPS 6 NUMBER F_UTILPS 6
BEGIN BEGIN
PROMPT 51 12 "" PROMPT 51 12 ""
HELP "Codice conto patrimoniale in cui ripilogare l'utile d'esercizio"
COPY ALL F_UTILPC COPY ALL F_UTILPC
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -201,6 +216,7 @@ END
NUMBER F_PERDPG 3 NUMBER F_PERDPG 3
BEGIN BEGIN
PROMPT 3 13 "Perdita d'esercizio c/to patr. " PROMPT 3 13 "Perdita d'esercizio c/to patr. "
HELP "Codice conto patrimoniale in cui ripilogare la perdita d'esercizio"
USE LF_PCON KEY 1 SELECT (SOTTOCONTO!="") && ((INDBIL="1")||(INDBIL="2")||(INDBIL="5")) USE LF_PCON KEY 1 SELECT (SOTTOCONTO!="") && ((INDBIL="1")||(INDBIL="2")||(INDBIL="5"))
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
@ -215,6 +231,7 @@ END
NUMBER F_PERDPC 3 NUMBER F_PERDPC 3
BEGIN BEGIN
PROMPT 44 13 "" PROMPT 44 13 ""
HELP "Codice conto patrimoniale in cui ripilogare la perdita d'esercizio"
COPY USE F_PERDPG COPY USE F_PERDPG
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
@ -225,6 +242,7 @@ END
NUMBER F_PERDPS 6 NUMBER F_PERDPS 6
BEGIN BEGIN
PROMPT 51 13 "" PROMPT 51 13 ""
HELP "Codice conto patrimoniale in cui ripilogare la perdita d'esercizio"
COPY ALL F_PERDPC COPY ALL F_PERDPC
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -232,6 +250,7 @@ END
NUMBER F_UTILEG 3 NUMBER F_UTILEG 3
BEGIN BEGIN
PROMPT 3 14 "Utile d'esercizio c/to econom. " PROMPT 3 14 "Utile d'esercizio c/to econom. "
HELP "Codice conto economico in cui ripilogare l'utile d'esercizio"
USE LF_PCON KEY 1 SELECT (SOTTOCONTO!="") && ((INDBIL="3")||(INDBIL="4")) USE LF_PCON KEY 1 SELECT (SOTTOCONTO!="") && ((INDBIL="3")||(INDBIL="4"))
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
@ -246,6 +265,7 @@ END
NUMBER F_UTILEC 3 NUMBER F_UTILEC 3
BEGIN BEGIN
PROMPT 44 14 "" PROMPT 44 14 ""
HELP "Codice conto economico in cui ripilogare l'utile d'esercizio"
COPY USE F_UTILEG COPY USE F_UTILEG
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
@ -256,6 +276,7 @@ END
NUMBER F_UTILES 6 NUMBER F_UTILES 6
BEGIN BEGIN
PROMPT 51 14 "" PROMPT 51 14 ""
HELP "Codice conto economico in cui ripilogare l'utile d'esercizio"
COPY ALL F_UTILEC COPY ALL F_UTILEC
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -263,6 +284,7 @@ END
NUMBER F_PERDEG 3 NUMBER F_PERDEG 3
BEGIN BEGIN
PROMPT 3 15 "Perdita d'esercizio c/to econ. " PROMPT 3 15 "Perdita d'esercizio c/to econ. "
HELP "Codice conto economico in cui ripilogare la perdita d'esercizio"
USE LF_PCON KEY 1 SELECT (SOTTOCONTO!="") && ( (INDBIL="3")||(INDBIL="4") ) USE LF_PCON KEY 1 SELECT (SOTTOCONTO!="") && ( (INDBIL="3")||(INDBIL="4") )
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
@ -278,6 +300,7 @@ END
NUMBER F_PERDEC 3 NUMBER F_PERDEC 3
BEGIN BEGIN
PROMPT 44 15 "" PROMPT 44 15 ""
HELP "Codice conto economico in cui ripilogare la perdita d'esercizio"
COPY USE F_PERDEG COPY USE F_PERDEG
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
COPY DISPLAY F_BILCHG COPY DISPLAY F_BILCHG
@ -288,6 +311,7 @@ END
NUMBER F_PERDES 6 NUMBER F_PERDES 6
BEGIN BEGIN
PROMPT 51 15 "" PROMPT 51 15 ""
HELP "Codice conto economico in cui ripilogare la perdita d'esercizio"
COPY ALL F_PERDEC COPY ALL F_PERDEC
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -305,10 +329,3 @@ END
ENDPAGE ENDPAGE
ENDMASK ENDMASK

View File

@ -10,6 +10,7 @@ END
NUMBER FLD_CODABI 5 NUMBER FLD_CODABI 5
BEGIN BEGIN
PROMPT 3 2 "Banca di appoggio per deleghe IVA ABI " PROMPT 3 2 "Banca di appoggio per deleghe IVA ABI "
HELP "Codice ABI banca di appoggio per deleghe IVA"
USE %BAN USE %BAN
INPUT CODTAB[1,5] FLD_CODABI INPUT CODTAB[1,5] FLD_CODABI
DISPLAY "ABI@5" CODTAB[1,5] DISPLAY "ABI@5" CODTAB[1,5]
@ -26,6 +27,7 @@ END
NUMBER FLD_CODCAB 5 NUMBER FLD_CODCAB 5
BEGIN BEGIN
PROMPT 60 2 "CAB " PROMPT 60 2 "CAB "
HELP "Codice CAB banca di appoggio per deleghe IVA"
COPY ALL FLD_CODABI COPY ALL FLD_CODABI
INPUT CODTAB[6,10] FLD_CODCAB INPUT CODTAB[6,10] FLD_CODCAB
CHECKTYPE NORMAL CHECKTYPE NORMAL
@ -42,6 +44,7 @@ END
BOOLEAN CHK_SIND11 BOOLEAN CHK_SIND11
BEGIN BEGIN
PROMPT 3 4 "Somma imposte non detraibili ad acq/import. in modello IVA 11" PROMPT 3 4 "Somma imposte non detraibili ad acq/import. in modello IVA 11"
HELP "Indicare se includere l'IVA non detraibile nell'importo dell'operazioni IVA art.19 IVA 11"
FIELD Sind11 FIELD Sind11
END END
@ -58,6 +61,7 @@ END
NUMBER FLD_INTR0 5 2 NUMBER FLD_INTR0 5 2
BEGIN BEGIN
PROMPT 3 8 "I " PROMPT 3 8 "I "
HELP "Indicare il tasso del primo trimestre da applicare per gli interessi su versamenti IVA"
FLAGS "R" FLAGS "R"
FIELD InTr(0) FIELD InTr(0)
END END
@ -65,6 +69,7 @@ END
NUMBER FLD_INTR1 5 2 NUMBER FLD_INTR1 5 2
BEGIN BEGIN
PROMPT 20 8 "II " PROMPT 20 8 "II "
HELP "Indicare tasso del secondo trimestre da applicare per gli interessi su versamenti IVA"
FLAGS "R" FLAGS "R"
FIELD InTr(1) FIELD InTr(1)
END END
@ -72,6 +77,7 @@ END
NUMBER FLD_INTR2 5 2 NUMBER FLD_INTR2 5 2
BEGIN BEGIN
PROMPT 40 8 "III " PROMPT 40 8 "III "
HELP "Indicare tasso del terzo trimestre da applicare per gli interessi su versamenti IVA"
FLAGS "R" FLAGS "R"
FIELD InTr(2) FIELD InTr(2)
END END
@ -79,6 +85,7 @@ END
NUMBER FLD_INTR3 5 2 NUMBER FLD_INTR3 5 2
BEGIN BEGIN
PROMPT 60 8 "IV " PROMPT 60 8 "IV "
HELP "Indicare tasso del quarto trimestre da applicare per gli interessi su versamenti IVA"
FLAGS "R" FLAGS "R"
FIELD InTr(3) FIELD InTr(3)
END END
@ -86,6 +93,7 @@ END
NUMBER FLD_CODAGV 5 NUMBER FLD_CODAGV 5
BEGIN BEGIN
PROMPT 3 9 "Codice IVA per ricavi misti agenzie di viaggio " 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 USE %IVA
INPUT CODTAB FLD_CODAGV INPUT CODTAB FLD_CODAGV
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
@ -102,13 +110,15 @@ END
BOOLEAN CHK_STIREG BOOLEAN CHK_STIREG
BEGIN BEGIN
PROMPT 3 12 "Stampare l'intestazione sui registri bollati" PROMPT 3 12 "Stampare l'intestazione sui registri bollati"
HELP "Indicare se stampare l'intestazione della ditta sui registri"
FIELD StiReg FIELD StiReg
END END
BOOLEAN CHK_NODTRG BOOLEAN CHK_NODTRG
BEGIN BEGIN
PROMPT 3 13 "Non stampare la data di operazione sui registri IVA" PROMPT 3 13 "Non stampare la data di operazione sui registri IVA"
HELP "Indicare se non stampoare la data dell'operazione sui registri IVA"
FIELD NoDtRg FIELD NoDtRg
END END
@ -157,8 +167,6 @@ BEGIN
FIELD Cg02SN FIELD Cg02SN
END END
BUTTON DLG_OK 10 2 BUTTON DLG_OK 10 2
BEGIN BEGIN
PROMPT -12 -1 "" PROMPT -12 -1 ""
@ -172,6 +180,3 @@ END
ENDPAGE ENDPAGE
ENDMASK ENDMASK

View File

@ -23,12 +23,14 @@ PAGE "Impostazione parametri ditta" -1 -1 77 8
NUMBER FLD_ANLIIV 4 NUMBER FLD_ANLIIV 4
BEGIN BEGIN
PROMPT 2 1 "@bANNO LIQUIDAZIONE IVA " PROMPT 2 1 "@bANNO LIQUIDAZIONE IVA "
HELP "Indicare l'anno dell'esercizio IVA corrente"
FIELD AnLiIv FIELD AnLiIv
END END
BOOLEAN CHK_ANCFCM BOOLEAN CHK_ANCFCM
BEGIN BEGIN
PROMPT 4 4 "Anagrafica clienti / anagrafica fornitori" PROMPT 4 4 "Anagrafica clienti / anagrafica fornitori"
HELP "Indicare se gestire un'unica anagrafica clienti/fornitori"
FLAGS "D" FLAGS "D"
FIELD AnCfCm FIELD AnCfCm
END END
@ -36,6 +38,7 @@ END
BOOLEAN CHK_PCTCCM BOOLEAN CHK_PCTCCM
BEGIN BEGIN
PROMPT 4 5 "Piano conti / tabella causali" PROMPT 4 5 "Piano conti / tabella causali"
HELP "Indicare se gestire un'unico archivio piano dei conti/causali"
FLAGS "D" FLAGS "D"
FIELD PcTcCm FIELD PcTcCm
END END
@ -49,6 +52,7 @@ END
RADIOBUTTON LST_RIFPAR 20 RADIOBUTTON LST_RIFPAR 20
BEGIN BEGIN
PROMPT 55 3 "Riferimenti partite " PROMPT 55 3 "Riferimenti partite "
HELP "Indicaer il criterio dei riferimenti delle partite"
ITEM " |N. protocollo" ITEM " |N. protocollo"
ITEM "X|N. documento" ITEM "X|N. documento"
HELP "" HELP ""
@ -63,61 +67,63 @@ END
BOOLEAN CHK_GSLBCN BOOLEAN CHK_GSLBCN
BEGIN BEGIN
PROMPT 4 8 "Gestione libro cronologico " PROMPT 4 8 "Gestione libro cronologico "
HELP "" HELP "Indicare se attivare il libro cronologico della gestione per i professionisti"
FIELD GsLbCn FIELD GsLbCn
END END
BOOLEAN CHK_STTFFR BOOLEAN CHK_STTFFR
BEGIN BEGIN
PROMPT 4 9 "Stampa totali fatture a fine registro " PROMPT 4 9 "Stampa totali fatture a fine registro "
HELP "" HELP "Indicare se attivare il computo dei totali fatture a fine registro"
FIELD StTfFr FIELD StTfFr
END END
BOOLEAN CHK_STLGIU BOOLEAN CHK_STLGIU
BEGIN BEGIN
PROMPT 4 10 "Stampa libro giornale e libro IVA unico " PROMPT 4 10 "Stampa libro giornale e libro IVA unico "
HELP "" HELP "Indicare se utilizzare un unico registro per libro giornale e libro IVA"
FIELD StLgiU FIELD StLgiU
END END
BOOLEAN CHK_GESSAL BOOLEAN CHK_GESSAL
BEGIN BEGIN
PROMPT 4 11 "Gestione saldaconto " PROMPT 4 11 "Gestione saldaconto "
HELP "" HELP "Indicare se attivare la gestione del saldaconto clienti/fornitori"
FIELD GesSal FIELD GesSal
END END
BOOLEAN CHK_NRCLIDX BOOLEAN CHK_NRCLIDX
BEGIN BEGIN
PROMPT 4 12 "N. Rif. allineato a destra per clienti" PROMPT 4 12 "N. Rif. allineato a destra per clienti"
HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto"
FIELD NrCliDx FIELD NrCliDx
END END
BOOLEAN CHK_NRFORDX BOOLEAN CHK_NRFORDX
BEGIN BEGIN
PROMPT 4 13 "N. Rif. allineato a destra per fornitori" PROMPT 4 13 "N. Rif. allineato a destra per fornitori"
HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto"
FIELD NrForDx FIELD NrForDx
END END
BOOLEAN CHK_GESVAL BOOLEAN CHK_GESVAL
BEGIN BEGIN
PROMPT 4 14 "Gestione Valuta" PROMPT 4 14 "Gestione Valuta"
HELP "" HELP "Indicare se gestire i movimenti prima nota in valuta"
FIELD GesVal FIELD GesVal
END END
BOOLEAN CHK_GELIDI BOOLEAN CHK_GELIDI
BEGIN BEGIN
PROMPT 4 15 "Gestione liquidazione differita" PROMPT 4 15 "Gestione liquidazione differita"
HELP "" HELP "Indicare se effettuare la liq. diff. ex DL 151 del 13-5-91 convertito da L. 202"
FIELD GeLiDi FIELD GeLiDi
END END
BOOLEAN CHK_GESVEN BOOLEAN CHK_GESVEN
BEGIN BEGIN
PROMPT 4 16 "Gestione vendite" PROMPT 4 16 "Gestione vendite"
HELP "" HELP "Indicare se e' attivata anche la gestione delle vendite"
FIELD GesVen FIELD GesVen
END END
@ -134,9 +140,9 @@ END
STRING FLD_CODLIC 3 STRING FLD_CODLIC 3
BEGIN BEGIN
PROMPT 1 2 "Codice libro incassi/pagamenti " PROMPT 1 2 "Codice libro incassi/pagamenti "
HELP "" HELP "Indicare il codice del libro degli incassi/pagamenti"
USE %REG SELECT I0=4 USE %REG SELECT I0=4
INPUT CODTAB[1,4] FLD_ANLIIV SELECT INPUT CODTAB[1,4] FLD_ANLIIV SELECT
INPUT CODTAB[5,7] FLD_CODLIC INPUT CODTAB[5,7] FLD_CODLIC
DISPLAY "Anno" CODTAB[1,4] DISPLAY "Anno" CODTAB[1,4]
DISPLAY "Codice Registro" CODTAB[5,7] DISPLAY "Codice Registro" CODTAB[5,7]
@ -148,8 +154,8 @@ END
STRING FLD_CODLIN 1 STRING FLD_CODLIN 1
BEGIN BEGIN
PROMPT 1 3 "Codice lingua " PROMPT 1 3 "Codice lingua "
HELP "" HELP "Indicare la lingua utilizzata"
USE %LNG USE %LNG
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
@ -162,6 +168,7 @@ END
STRING FLD_COCACH 3 STRING FLD_COCACH 3
BEGIN BEGIN
PROMPT 1 4 "Codice causale chiusura " PROMPT 1 4 "Codice causale chiusura "
HELP "Codice della causale di chiusura che generera' il movimento"
USE LF_CAUSALI SELECT MOVAP="C" USE LF_CAUSALI SELECT MOVAP="C"
INPUT CODCAUS FLD_COCACH INPUT CODCAUS FLD_COCACH
DISPLAY "Codice" CODCAUS DISPLAY "Codice" CODCAUS
@ -177,6 +184,7 @@ END
STRING FLD_DCOCACH 50 35 STRING FLD_DCOCACH 50 35
BEGIN BEGIN
PROMPT 40 4 "" PROMPT 40 4 ""
HELP "Codice della causale di chiusura che generera' il movimento"
USE LF_CAUSALI KEY 2 SELECT MOVAP="C" USE LF_CAUSALI KEY 2 SELECT MOVAP="C"
INPUT DESCR FLD_DCOCACH INPUT DESCR FLD_DCOCACH
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
@ -189,6 +197,7 @@ END
STRING FLD_COCAAP 3 STRING FLD_COCAAP 3
BEGIN BEGIN
PROMPT 1 5 "Codice causale apertura " PROMPT 1 5 "Codice causale apertura "
HELP "Codice della causale di apertura che generera' il movimento"
FLAGS "U" FLAGS "U"
USE LF_CAUSALI SELECT MOVAP="A" USE LF_CAUSALI SELECT MOVAP="A"
INPUT CODCAUS FLD_COCAAP INPUT CODCAUS FLD_COCAAP
@ -203,6 +212,7 @@ END
STRING FLD_DCOCAAP 50 35 STRING FLD_DCOCAAP 50 35
BEGIN BEGIN
PROMPT 40 5 "" PROMPT 40 5 ""
HELP "Codice della causale di apertura che generera' il movimento"
USE LF_CAUSALI KEY 2 SELECT MOVAP="A" USE LF_CAUSALI KEY 2 SELECT MOVAP="A"
INPUT DESCR FLD_DCOCAAP INPUT DESCR FLD_DCOCAAP
COPY DISPLAY FLD_DCOCACH COPY DISPLAY FLD_DCOCACH
@ -224,7 +234,7 @@ END
NUMBER FLD_CSBICHG 3 NUMBER FLD_CSBICHG 3
BEGIN BEGIN
PROMPT 2 10 "Bilancio di chiusura " PROMPT 2 10 "Bilancio di chiusura "
HELP "" HELP "Codice del conto di riepilogo del bilancio di chiusura"
USE LF_PCON SELECT SOTTOCONTO!="" USE LF_PCON SELECT SOTTOCONTO!=""
INPUT GRUPPO FLD_CSBICHG INPUT GRUPPO FLD_CSBICHG
INPUT CONTO FLD_CSBICHC INPUT CONTO FLD_CSBICHC
@ -244,6 +254,7 @@ END
NUMBER FLD_CSBICHC 3 NUMBER FLD_CSBICHC 3
BEGIN BEGIN
PROMPT 33 10 "" PROMPT 33 10 ""
HELP "Codice del conto di riepilogo del bilancio di chiusura"
COPY ALL FLD_CSBICHG COPY ALL FLD_CSBICHG
FIELD CsBiChC FIELD CsBiChC
ADD RUN cg0 -0 ADD RUN cg0 -0
@ -252,6 +263,7 @@ END
NUMBER FLD_CSBICHS 6 NUMBER FLD_CSBICHS 6
BEGIN BEGIN
PROMPT 40 10 "" PROMPT 40 10 ""
HELP "Codice del conto di riepilogo del bilancio di chiusura"
COPY USE FLD_CSBICHG COPY USE FLD_CSBICHG
COPY INPUT FLD_CSBICHG COPY INPUT FLD_CSBICHG
COPY DISPLAY FLD_CSBICHG COPY DISPLAY FLD_CSBICHG
@ -267,7 +279,7 @@ END
STRING FLD_DCSBICH 50 25 STRING FLD_DCSBICH 50 25
BEGIN BEGIN
PROMPT 50 10 "" PROMPT 50 10 ""
HELP "" HELP "Codice del conto di riepilogo del bilancio di chiusura"
USE LF_PCON KEY 2 SELECT SOTTOCONTO!="" USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
INPUT DESCR FLD_DCSBICH INPUT DESCR FLD_DCSBICH
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
@ -282,7 +294,7 @@ END
STRING FLD_CSPRPEG 3 STRING FLD_CSPRPEG 3
BEGIN BEGIN
PROMPT 2 11 "Profitti e perdite " PROMPT 2 11 "Profitti e perdite "
HELP "" HELP "Codice del conto di riepilogo del profitti e perdite"
COPY USE FLD_CSBICHG COPY USE FLD_CSBICHG
COPY DISPLAY FLD_CSBICHG COPY DISPLAY FLD_CSBICHG
OUTPUT FLD_CSPRPEG GRUPPO OUTPUT FLD_CSPRPEG GRUPPO
@ -298,7 +310,8 @@ END
NUMBER FLD_CSPRPEC 3 NUMBER FLD_CSPRPEC 3
BEGIN BEGIN
PROMPT 33 11 "" PROMPT 33 11 ""
HELP "Codice del conto di riepilogo del profitti e perdite"
COPY ALL FLD_CSPRPEG COPY ALL FLD_CSPRPEG
FIELD CsPrPeC FIELD CsPrPeC
ADD RUN cg0 -0 ADD RUN cg0 -0
@ -307,6 +320,7 @@ END
NUMBER FLD_CSPRPES 6 NUMBER FLD_CSPRPES 6
BEGIN BEGIN
PROMPT 40 11 "" PROMPT 40 11 ""
HELP "Codice del conto di riepilogo del profitti e perdite"
COPY USE FLD_CSPRPEG COPY USE FLD_CSPRPEG
COPY INPUT FLD_CSPRPEG COPY INPUT FLD_CSPRPEG
COPY DISPLAY FLD_CSPRPEG COPY DISPLAY FLD_CSPRPEG
@ -322,7 +336,7 @@ END
STRING FLD_DCSPRPE 50 25 STRING FLD_DCSPRPE 50 25
BEGIN BEGIN
PROMPT 50 11 "" PROMPT 50 11 ""
HELP "" HELP "Codice del conto di riepilogo del profitti e perdite"
COPY USE FLD_DCSBICH COPY USE FLD_DCSBICH
INPUT DESCR FLD_DCSPRPE INPUT DESCR FLD_DCSPRPE
COPY DISPLAY FLD_DCSBICH COPY DISPLAY FLD_DCSBICH
@ -335,6 +349,7 @@ END
NUMBER FLD_CSBIAPG 3 NUMBER FLD_CSBIAPG 3
BEGIN BEGIN
PROMPT 2 12 "Bilancio di apertura " PROMPT 2 12 "Bilancio di apertura "
HELP "Codice del conto di riepilogo del bilancio di apertura"
COPY USE FLD_CSBICHG COPY USE FLD_CSBICHG
COPY DISPLAY FLD_CSBICHG COPY DISPLAY FLD_CSBICHG
OUTPUT FLD_CSBIAPG GRUPPO OUTPUT FLD_CSBIAPG GRUPPO
@ -352,6 +367,7 @@ END
NUMBER FLD_CSBIAPC 3 NUMBER FLD_CSBIAPC 3
BEGIN BEGIN
PROMPT 33 12 "" PROMPT 33 12 ""
HELP "Codice del conto di riepilogo del bilancio di apertura"
COPY ALL FLD_CSBIAPG COPY ALL FLD_CSBIAPG
FIELD CsBiApC FIELD CsBiApC
ADD RUN cg0 -0 ADD RUN cg0 -0
@ -360,6 +376,7 @@ END
NUMBER FLD_CSBIAPS 6 NUMBER FLD_CSBIAPS 6
BEGIN BEGIN
PROMPT 40 12 "" PROMPT 40 12 ""
HELP "Codice del conto di riepilogo del bilancio di apertura"
COPY USE FLD_CSBIAPG COPY USE FLD_CSBIAPG
COPY INPUT FLD_CSBIAPG COPY INPUT FLD_CSBIAPG
COPY DISPLAY FLD_CSBIAPG COPY DISPLAY FLD_CSBIAPG
@ -375,7 +392,7 @@ END
STRING FLD_DCSBIAP 50 25 STRING FLD_DCSBIAP 50 25
BEGIN BEGIN
PROMPT 50 12 "" PROMPT 50 12 ""
HELP "" HELP "Codice del conto di riepilogo del bilancio di apertura"
COPY USE FLD_DCSBICH COPY USE FLD_DCSBICH
INPUT DESCR FLD_DCSBIAP INPUT DESCR FLD_DCSBIAP
COPY DISPLAY FLD_DCSBICH COPY DISPLAY FLD_DCSBICH
@ -388,7 +405,7 @@ END
NUMBER FLD_CSUECPG 3 NUMBER FLD_CSUECPG 3
BEGIN BEGIN
PROMPT 2 13 "Utile esercizio patrim. " PROMPT 2 13 "Utile esercizio patrim. "
HELP "" HELP "Codice del conto patrimoniale dell'utile d'esercizio"
COPY USE FLD_CSBICHG COPY USE FLD_CSBICHG
COPY DISPLAY FLD_CSBICHG COPY DISPLAY FLD_CSBICHG
OUTPUT FLD_CSUECPG GRUPPO OUTPUT FLD_CSUECPG GRUPPO
@ -404,6 +421,7 @@ END
NUMBER FLD_CSUECPC 3 NUMBER FLD_CSUECPC 3
BEGIN BEGIN
PROMPT 33 13 "" PROMPT 33 13 ""
HELP "Codice del conto patrimoniale dell'utile d'esercizio"
COPY ALL FLD_CSUECPG COPY ALL FLD_CSUECPG
CHECKTYPE NORMAL CHECKTYPE NORMAL
FIELD CsUeCpC FIELD CsUeCpC
@ -412,6 +430,7 @@ END
NUMBER FLD_CSUECPS 6 NUMBER FLD_CSUECPS 6
BEGIN BEGIN
PROMPT 40 13 "" PROMPT 40 13 ""
HELP "Codice del conto patrimoniale dell'utile d'esercizio"
COPY USE FLD_CSUECPG COPY USE FLD_CSUECPG
COPY INPUT FLD_CSUECPG COPY INPUT FLD_CSUECPG
COPY DISPLAY FLD_CSUECPG COPY DISPLAY FLD_CSUECPG
@ -426,7 +445,7 @@ END
STRING FLD_DCSUECP 50 25 STRING FLD_DCSUECP 50 25
BEGIN BEGIN
PROMPT 50 13 "" PROMPT 50 13 ""
HELP "" HELP "Codice del conto patrimoniale dell'utile d'esercizio"
COPY USE FLD_DCSBICH COPY USE FLD_DCSBICH
INPUT DESCR FLD_DCSUECP INPUT DESCR FLD_DCSUECP
COPY DISPLAY FLD_DCSBICH COPY DISPLAY FLD_DCSBICH
@ -438,7 +457,7 @@ END
NUMBER FLD_CSPECPG 3 NUMBER FLD_CSPECPG 3
BEGIN BEGIN
PROMPT 2 14 "Perdita eserc. patrim. " PROMPT 2 14 "Perdita eserc. patrim. "
HELP "" HELP "Codice del conto patrimoniale della perdita d'esercizio"
COPY USE FLD_CSBICHG COPY USE FLD_CSBICHG
COPY DISPLAY FLD_CSBICHG COPY DISPLAY FLD_CSBICHG
OUTPUT FLD_CSPECPG GRUPPO OUTPUT FLD_CSPECPG GRUPPO
@ -455,6 +474,7 @@ END
NUMBER FLD_CSPECPC 3 NUMBER FLD_CSPECPC 3
BEGIN BEGIN
PROMPT 33 14 "" PROMPT 33 14 ""
HELP "Codice del conto patrimoniale della perdita d'esercizio"
COPY ALL FLD_CSPECPG COPY ALL FLD_CSPECPG
FIELD CsPeCpC FIELD CsPeCpC
ADD RUN cg0 -0 ADD RUN cg0 -0
@ -463,6 +483,7 @@ END
NUMBER FLD_CSPECPS 6 NUMBER FLD_CSPECPS 6
BEGIN BEGIN
PROMPT 40 14 "" PROMPT 40 14 ""
HELP "Codice del conto patrimoniale della perdita d'esercizio"
COPY USE FLD_CSPECPG COPY USE FLD_CSPECPG
COPY INPUT FLD_CSPECPG COPY INPUT FLD_CSPECPG
COPY DISPLAY FLD_CSPECPG COPY DISPLAY FLD_CSPECPG
@ -478,7 +499,7 @@ END
STRING FLD_DCSPECP 50 25 STRING FLD_DCSPECP 50 25
BEGIN BEGIN
PROMPT 50 14 "" PROMPT 50 14 ""
HELP "" HELP "Codice del conto patrimoniale della perdita d'esercizio"
COPY USE FLD_DCSBICH COPY USE FLD_DCSBICH
INPUT DESCR FLD_DCSPECP INPUT DESCR FLD_DCSPECP
COPY DISPLAY FLD_DCSBICH COPY DISPLAY FLD_DCSBICH
@ -490,7 +511,7 @@ END
NUMBER FLD_CSUECEG 3 NUMBER FLD_CSUECEG 3
BEGIN BEGIN
PROMPT 2 15 "Utile esercizio econ. " PROMPT 2 15 "Utile esercizio econ. "
HELP "" HELP "Codice del conto economico dell'utile d'esercizio"
COPY USE FLD_CSBICHG COPY USE FLD_CSBICHG
COPY DISPLAY FLD_CSBICHG COPY DISPLAY FLD_CSBICHG
OUTPUT FLD_CSUECEG GRUPPO OUTPUT FLD_CSUECEG GRUPPO
@ -506,6 +527,7 @@ END
NUMBER FLD_CSUECEC 3 NUMBER FLD_CSUECEC 3
BEGIN BEGIN
PROMPT 33 15 "" PROMPT 33 15 ""
HELP "Codice del conto economico dell'utile d'esercizio"
COPY ALL FLD_CSUECEG COPY ALL FLD_CSUECEG
FIELD CsUeCeC FIELD CsUeCeC
ADD RUN cg0 -0 ADD RUN cg0 -0
@ -513,6 +535,7 @@ END
NUMBER FLD_CSUECES 6 NUMBER FLD_CSUECES 6
BEGIN BEGIN
PROMPT 40 15 "" PROMPT 40 15 ""
HELP "Codice del conto economico dell'utile d'esercizio"
COPY USE FLD_CSUECEG COPY USE FLD_CSUECEG
COPY INPUT FLD_CSUECEG COPY INPUT FLD_CSUECEG
COPY DISPLAY FLD_CSUECEG COPY DISPLAY FLD_CSUECEG
@ -528,7 +551,7 @@ END
STRING FLD_DCSUECE 50 25 STRING FLD_DCSUECE 50 25
BEGIN BEGIN
PROMPT 50 15 "" PROMPT 50 15 ""
HELP "" HELP "Codice del conto economico dell'utile d'esercizio"
COPY USE FLD_DCSBICH COPY USE FLD_DCSBICH
INPUT DESCR FLD_DCSUECE INPUT DESCR FLD_DCSUECE
COPY DISPLAY FLD_DCSBICH COPY DISPLAY FLD_DCSBICH
@ -540,7 +563,7 @@ END
NUMBER FLD_CSPECEG 3 NUMBER FLD_CSPECEG 3
BEGIN BEGIN
PROMPT 2 16 "Perdita eserc. econ. " PROMPT 2 16 "Perdita eserc. econ. "
HELP "" HELP "Codice del conto economico della perdita d'esercizio"
COPY USE FLD_CSBICHG COPY USE FLD_CSBICHG
COPY DISPLAY FLD_CSBICHG COPY DISPLAY FLD_CSBICHG
OUTPUT FLD_CSPECEG GRUPPO OUTPUT FLD_CSPECEG GRUPPO
@ -556,6 +579,7 @@ END
NUMBER FLD_CSPECEC 3 NUMBER FLD_CSPECEC 3
BEGIN BEGIN
PROMPT 33 16 "" PROMPT 33 16 ""
HELP "Codice del conto economico della perdita d'esercizio"
COPY ALL FLD_CSPECEG COPY ALL FLD_CSPECEG
FIELD CsPeCeC FIELD CsPeCeC
ADD RUN cg0 -0 ADD RUN cg0 -0
@ -563,6 +587,7 @@ END
NUMBER FLD_CSPECES 6 NUMBER FLD_CSPECES 6
BEGIN BEGIN
PROMPT 40 16 "" PROMPT 40 16 ""
HELP "Codice del conto economico della perdita d'esercizio"
COPY USE FLD_CSPECEG COPY USE FLD_CSPECEG
COPY INPUT FLD_CSPECEG COPY INPUT FLD_CSPECEG
COPY DISPLAY FLD_CSPECEG COPY DISPLAY FLD_CSPECEG
@ -577,7 +602,7 @@ END
STRING FLD_DCSPECE 50 25 STRING FLD_DCSPECE 50 25
BEGIN BEGIN
PROMPT 50 16 "" PROMPT 50 16 ""
HELP "" HELP "Codice del conto economico della perdita d'esercizio"
USE LF_PCON KEY 2 SELECT SOTTOCONTO!="" USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
INPUT DESCR FLD_DCSPECE INPUT DESCR FLD_DCSPECE
COPY DISPLAY FLD_DCSBICH COPY DISPLAY FLD_DCSBICH
@ -601,22 +626,23 @@ END
RADIOBUTTON LST_RRFRAM 16 RADIOBUTTON LST_RRFRAM 16
BEGIN BEGIN
PROMPT 3 2 "" PROMPT 3 2 ""
HELP "Frequenza del calcolo dei ratei e risconti"
ITEM "A|Freq. Annuale" ITEM "A|Freq. Annuale"
ITEM "M|Freq. Mensile" ITEM "M|Freq. Mensile"
HELP ""
FIELD RrFrAm FIELD RrFrAm
END END
BOOLEAN CHK_RRMECO BOOLEAN CHK_RRMECO
BEGIN BEGIN
PROMPT 26 3 "Mese Commerciale" PROMPT 26 3 "Mese Commerciale"
HELP "" HELP "Indicare se viene utilizzato nel calcolo il mese commerciale"
FIELD RrMeCo FIELD RrMeCo
END END
STRING FLD_RRCCRA 3 STRING FLD_RRCCRA 3
BEGIN BEGIN
PROMPT 3 6 "Causale ratei " PROMPT 3 6 "Causale ratei "
HELP "Codice causale dei ratei per movimento di contabilita'"
FLAGS "U" FLAGS "U"
USE LF_CAUSALI USE LF_CAUSALI
INPUT CODCAUS FLD_RRCCRA INPUT CODCAUS FLD_RRCCRA
@ -631,6 +657,7 @@ END
STRING FLD_DRRCCRA 50 48 STRING FLD_DRRCCRA 50 48
BEGIN BEGIN
PROMPT 26 6 "" PROMPT 26 6 ""
HELP "Descrizione causale dei ratei per movimento di contabilita'"
USE LF_CAUSALI KEY 2 USE LF_CAUSALI KEY 2
INPUT DESCR FLD_DRRCCRA INPUT DESCR FLD_DRRCCRA
COPY DISPLAY FLD_DCOCACH COPY DISPLAY FLD_DCOCACH
@ -642,6 +669,7 @@ END
STRING FLD_RRCCRI 3 STRING FLD_RRCCRI 3
BEGIN BEGIN
PROMPT 3 8 "Causale risconti " PROMPT 3 8 "Causale risconti "
HELP "Codice causale dei risconti per movimento di contabilita'"
FLAGS "U" FLAGS "U"
COPY USE FLD_RRCCRA COPY USE FLD_RRCCRA
INPUT CODCAUS FLD_RRCCRI INPUT CODCAUS FLD_RRCCRI
@ -656,6 +684,7 @@ END
STRING FLD_DRRCCRI 50 48 STRING FLD_DRRCCRI 50 48
BEGIN BEGIN
PROMPT 26 8 "" PROMPT 26 8 ""
HELP "Descrizione causale dei risconti per movimento di contabilita'"
USE LF_CAUSALI KEY 2 USE LF_CAUSALI KEY 2
INPUT DESCR FLD_DRRCCRI INPUT DESCR FLD_DRRCCRI
COPY DISPLAY FLD_DCOCACH COPY DISPLAY FLD_DCOCACH

View File

@ -11,6 +11,7 @@ PAGE "Visualizzazione saldi" -1 -1 78 18
NUMBER F_ANNO 4 NUMBER F_ANNO 4
BEGIN BEGIN
PROMPT 4 1 "Anno esercizio " PROMPT 4 1 "Anno esercizio "
HELP "Anno d'esercizio a cui si riferiscono i saldi"
KEY 1 KEY 1
USE ESC USE ESC
CHECKTYPE NORMAL CHECKTYPE NORMAL
@ -30,6 +31,7 @@ END
LIST F_TIPOCF 9 LIST F_TIPOCF 9
BEGIN BEGIN
PROMPT 4 3 "Tipo " PROMPT 4 3 "Tipo "
HELP "Tipo del conto da visualizzare"
FLAGS "U" FLAGS "U"
ITEM " |Conto" MESSAGE HIDE,2@|HIDE,3@|SHOW,1@ ITEM " |Conto" MESSAGE HIDE,2@|HIDE,3@|SHOW,1@
ITEM "C|Cliente" MESSAGE HIDE,1@|HIDE,3@|SHOW,2@ ITEM "C|Cliente" MESSAGE HIDE,1@|HIDE,3@|SHOW,2@
@ -40,6 +42,7 @@ END
NUMBER F_GRUPPO 3 NUMBER F_GRUPPO 3
BEGIN BEGIN
PROMPT 26 3 "Gruppo " PROMPT 26 3 "Gruppo "
HELP "Codice del conto da visualizzare"
USE LF_PCON KEY 1 SELECT CONTO="" USE LF_PCON KEY 1 SELECT CONTO=""
FIELD LF_PCON->GRUPPO FIELD LF_PCON->GRUPPO
KEY 1 KEY 1
@ -54,6 +57,7 @@ END
NUMBER F_CONTO 3 NUMBER F_CONTO 3
BEGIN BEGIN
PROMPT 40 3 "Conto " PROMPT 40 3 "Conto "
HELP "Codice del conto da visualizzare"
USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="") USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="")
FIELD LF_PCON->CONTO FIELD LF_PCON->CONTO
KEY 1 KEY 1
@ -77,6 +81,7 @@ END
NUMBER F_CONTO_CLIENTE 3 NUMBER F_CONTO_CLIENTE 3
BEGIN BEGIN
PROMPT 40 3 "Conto " PROMPT 40 3 "Conto "
HELP "Codice del conto da visualizzare"
USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="C") USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="C")
FIELD LF_PCON->CONTO FIELD LF_PCON->CONTO
KEY 1 KEY 1
@ -100,6 +105,7 @@ END
NUMBER F_CONTO_FORN 3 NUMBER F_CONTO_FORN 3
BEGIN BEGIN
PROMPT 40 3 "Conto " PROMPT 40 3 "Conto "
HELP "Codice del conto da visualizzare"
USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="F") USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="F")
FIELD LF_PCON->CONTO FIELD LF_PCON->CONTO
KEY 1 KEY 1
@ -123,6 +129,7 @@ END
NUMBER F_SOTTOCONTO 6 NUMBER F_SOTTOCONTO 6
BEGIN BEGIN
PROMPT 54 3 "Sottoconto " PROMPT 54 3 "Sottoconto "
HELP "Codice del conto da visualizzare"
USE LF_PCON SELECT SOTTOCONTO!="" USE LF_PCON SELECT SOTTOCONTO!=""
FIELD LF_PCON->SOTTOCONTO FIELD LF_PCON->SOTTOCONTO
KEY 1 KEY 1
@ -152,6 +159,7 @@ END
NUMBER F_SOTTOC_CLIENTE 6 NUMBER F_SOTTOC_CLIENTE 6
BEGIN BEGIN
PROMPT 54 3 "Cliente " PROMPT 54 3 "Cliente "
HELP "Codice del conto da visualizzare"
USE LF_CLIFO USE LF_CLIFO
//FIELD LF_CLIFO->CODCF //FIELD LF_CLIFO->CODCF
INPUT TIPOCF "C" INPUT TIPOCF "C"
@ -177,6 +185,7 @@ END
NUMBER F_SOTTOC_FORN 6 NUMBER F_SOTTOC_FORN 6
BEGIN BEGIN
PROMPT 54 3 "Fornitore " PROMPT 54 3 "Fornitore "
HELP "Codice del conto da visualizzare"
USE LF_CLIFO USE LF_CLIFO
INPUT TIPOCF "F" INPUT TIPOCF "F"
INPUT CODCF F_SOTTOC_FORN INPUT CODCF F_SOTTOC_FORN
@ -201,6 +210,7 @@ END
STRING F_DESCR_CONTO 50 STRING F_DESCR_CONTO 50
BEGIN BEGIN
PROMPT 4 4 "Descrizione " PROMPT 4 4 "Descrizione "
HELP "Descrizione del conto da visualizzare"
USE LF_PCON KEY 2 USE LF_PCON KEY 2
INPUT DESCR F_DESCR_CONTO INPUT DESCR F_DESCR_CONTO
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
@ -216,6 +226,7 @@ END
STRING F_DESCR_CLIENTE 50 STRING F_DESCR_CLIENTE 50
BEGIN BEGIN
PROMPT 4 4 "Cliente " PROMPT 4 4 "Cliente "
HELP "Ragione sociale del cliente da visualizzare"
USE LF_CLIFO KEY 2 USE LF_CLIFO KEY 2
INPUT TIPOCF "C" INPUT TIPOCF "C"
INPUT RAGSOC F_DESCR_CLIENTE INPUT RAGSOC F_DESCR_CLIENTE
@ -232,6 +243,7 @@ END
STRING F_DESCR_FORN 50 STRING F_DESCR_FORN 50
BEGIN BEGIN
PROMPT 4 4 "Fornitore " PROMPT 4 4 "Fornitore "
HELP "Ragione sociale del fornitore da visualizzare"
USE LF_CLIFO KEY 2 USE LF_CLIFO KEY 2
INPUT TIPOCF "F" INPUT TIPOCF "F"
INPUT RAGSOC F_DESCR_FORN INPUT RAGSOC F_DESCR_FORN
@ -276,12 +288,14 @@ PAGE "" -1 -1 70 16
NUMBER 101 4 NUMBER 101 4
BEGIN BEGIN
PROMPT 1 1 "Anno esercizio " PROMPT 1 1 "Anno esercizio "
HELP "Anno d'esercizio a cui si riferisce il saldo"
FLAGS "R" FLAGS "R"
END END
NUMBER 102 15 NUMBER 102 15
BEGIN BEGIN
PROMPT 1 3 "Saldo Iniziale " PROMPT 1 3 "Saldo Iniziale "
HELP "Importo del saldo iniziale"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -289,11 +303,13 @@ END
STRING 103 1 STRING 103 1
BEGIN BEGIN
PROMPT 44 3 "" PROMPT 44 3 ""
HELP "Sezione del saldo iniziale"
END END
NUMBER 104 15 NUMBER 104 15
BEGIN BEGIN
PROMPT 1 4 "Progr.Attuali: Dare " PROMPT 1 4 "Progr.Attuali: Dare "
HELP "Progressivo dare attuale del conto da visualizzare"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -301,6 +317,7 @@ END
NUMBER 105 15 NUMBER 105 15
BEGIN BEGIN
PROMPT 45 4 "Avere " PROMPT 45 4 "Avere "
HELP "Progressivo avere attuale del conto da visualizzare"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -308,6 +325,7 @@ END
NUMBER 106 15 NUMBER 106 15
BEGIN BEGIN
PROMPT 22 5 "Saldo " PROMPT 22 5 "Saldo "
HELP "Saldo attuale del conto"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -315,11 +333,13 @@ END
STRING 107 1 STRING 107 1
BEGIN BEGIN
PROMPT 44 5 "" PROMPT 44 5 ""
HELP "Sezione del saldo attuale del conto"
END END
NUMBER 108 15 NUMBER 108 15
BEGIN BEGIN
PROMPT 1 6 "Progr.Mov.Eliminati: Dare " PROMPT 1 6 "Progr.Mov.Eliminati: Dare "
HELP "Progressivi dare attuali dei moviementi eliminati"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -327,6 +347,7 @@ END
NUMBER 109 15 NUMBER 109 15
BEGIN BEGIN
PROMPT 45 6 "Avere " PROMPT 45 6 "Avere "
HELP "Progressivi avere attuali dei moviementi eliminati"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -334,6 +355,7 @@ END
NUMBER 110 15 NUMBER 110 15
BEGIN BEGIN
PROMPT 1 7 "Saldo complessivo " PROMPT 1 7 "Saldo complessivo "
HELP "Saldo complessivo attuale del conto"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -341,23 +363,27 @@ END
STRING 111 1 STRING 111 1
BEGIN BEGIN
PROMPT 44 7 "" PROMPT 44 7 ""
HELP "Sezione del saldo attuale complessivo del conto"
END END
DATE 112 DATE 112
BEGIN BEGIN
PROMPT 1 8 "Ultima data operazione " PROMPT 1 8 "Ultima data operazione "
HELP "Ultima data di registrazione che ha movimentato il conto"
FLAGS "R" FLAGS "R"
END END
NUMBER 113 7 NUMBER 113 7
BEGIN BEGIN
PROMPT 1 9 "Ultimo numero operazione " PROMPT 1 9 "Ultimo numero operazione "
HELP "Ultimo numero di registrazione che ha movimentato il conto"
FLAGS "R" FLAGS "R"
END END
NUMBER 114 15 NUMBER 114 15
BEGIN BEGIN
PROMPT 1 10 "Progr.Mov.Provvisori: Dare " PROMPT 1 10 "Progr.Mov.Provvisori: Dare "
HELP "Progressivi dare attuali dei moviementi provvisori"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -365,6 +391,7 @@ END
NUMBER 115 15 NUMBER 115 15
BEGIN BEGIN
PROMPT 45 10 "Avere " PROMPT 45 10 "Avere "
HELP "Progressivi avere attuali dei moviementi provvisori del conto"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -372,6 +399,7 @@ END
NUMBER 116 15 NUMBER 116 15
BEGIN BEGIN
PROMPT 1 11 "Saldo " PROMPT 1 11 "Saldo "
HELP "Saldo dei progressivi dei movimenti provvisori del conto"
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
END END
@ -379,6 +407,7 @@ END
STRING 117 1 STRING 117 1
BEGIN BEGIN
PROMPT 44 11 "" PROMPT 44 11 ""
HELP "Sezione del saldo progressivi dei moviemnti provvisori del conto"
END END
BUTTON DLG_OK 9 2 BUTTON DLG_OK 9 2

View File

@ -1,176 +1,185 @@
#include "cg5300a.h" #include "cg5300a.h"
TOOLBAR "" 0 20 0 2 TOOLBAR "" 0 20 0 2
#include <toolbar.h> #include <toolbar.h>
ENDPAGE ENDPAGE
PAGE "Parametri liquidazione" -1 -1 78 15 PAGE "Parametri liquidazione" -1 -1 78 15
GROUPBOX DLG_NULL 71 3 GROUPBOX DLG_NULL 71 3
BEGIN BEGIN
PROMPT 4 0 "Ditta" PROMPT 4 0 "Ditta"
FLAGS "R" FLAGS "R"
END END
NUMBER F_CODDITTA 5 NUMBER F_CODDITTA 5
BEGIN BEGIN
PROMPT 6 1 "Codice " PROMPT 6 1 "Codice "
FLAGS "DFGR" FLAGS "DFGR"
USE LF_NDITTE USE LF_NDITTE
INPUT CODDITTA F_CODDITTA INPUT CODDITTA F_CODDITTA
DISPLAY "Codice" CODDITTA DISPLAY "Codice" CODDITTA
DISPLAY "Ragione Sociale@50" RAGSOC DISPLAY "Ragione Sociale@50" RAGSOC
OUTPUT F_CODDITTA CODDITTA OUTPUT F_CODDITTA CODDITTA
OUTPUT F_RAGSOC RAGSOC OUTPUT F_RAGSOC RAGSOC
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
STRING F_RAGSOC 50 STRING F_RAGSOC 50
BEGIN BEGIN
PROMPT 20 1 "" PROMPT 20 1 ""
FLAGS "D" FLAGS "D"
END END
NUMBER F_YEAR 4 NUMBER F_YEAR 4
BEGIN BEGIN
PROMPT 6 3 "Anno " PROMPT 6 3 "Anno "
FIELD LIA->CODTAB HELP "Anno d'esercizio ??????"
USE LIA FIELD LIA->CODTAB
INPUT CODTAB F_YEAR USE LIA
DISPLAY "Anno@40" CODTAB INPUT CODTAB F_YEAR
DISPLAY "@2" S0 DISPLAY "Anno@40" CODTAB
OUTPUT F_YEAR CODTAB DISPLAY "@2" S0
KEY 1 OUTPUT F_YEAR CODTAB
FLAGS "RZ" KEY 1
CHECKTYPE REQUIRED FLAGS "RZ"
ADD NONE CHECKTYPE REQUIRED
END ADD NONE
END
GROUPBOX DLG_NULL 71 5
BEGIN GROUPBOX DLG_NULL 71 5
PROMPT 4 4 "Parametri ditta" BEGIN
END PROMPT 4 4 "Parametri ditta"
END
LIST F_FREQ_VERS 14
BEGIN LIST F_FREQ_VERS 14
PROMPT 6 5 "Frequenza versamenti " BEGIN
ITEM "M|Mensile" PROMPT 6 5 "Frequenza versamenti "
ITEM "T|Trimestrale" HELP "Indicare la frequenza dei versamenti delle liquidazioni IVA"
FIELD LIA->S7 ITEM "M|Mensile"
END ITEM "T|Trimestrale"
FIELD LIA->S7
NUMBER F_CRED_PREC 15 0 END
BEGIN
PROMPT 6 6 "Credito precedente " NUMBER F_CRED_PREC 15 0
FIELD LIA->R0 BEGIN
PICTURE "." PROMPT 6 6 "Credito precedente "
FLAGS "R" HELP "Eventuale credito di imposta dell'anno precedente"
END FIELD LIA->R0
PICTURE "."
NUMBER F_CRED_COST 15 0 FLAGS "R"
BEGIN END
PROMPT 6 7 "Credito di costo "
FIELD LIA->R5 NUMBER F_CRED_COST 15 0
PICTURE "." BEGIN
FLAGS "R" PROMPT 6 7 "Credito di costo "
END HELP "Eventuale crediti—o di costo dell'anno precedente"
FIELD LIA->R5
SPREADSHEET F_SHEET_PLA 78 6 PICTURE "."
BEGIN FLAGS "R"
PROMPT 1 10 "Parametri attivita'" END
ITEM "Attivita'@5"
ITEM "Tipo@1" SPREADSHEET F_SHEET_PLA 78 6
ITEM "% Pro-rata@6" BEGIN
ITEM "Plafond art.8@15" PROMPT 1 10 "Parametri attivita'"
ITEM "Plafond art.8b@15" ITEM "Attivita'@5"
ITEM "Plafond art.9@15" ITEM "Tipo@1"
END ITEM "% Pro-rata@6"
ITEM "Plafond art.8@15"
ENDPAGE ITEM "Plafond art.8b@15"
ENDMASK ITEM "Plafond art.9@15"
END
PAGE "" -1 -1 65 16
ENDPAGE
NUMBER F_CODATT 5 ENDMASK
BEGIN
PROMPT 4 1 "Codice Attivita' " PAGE "" -1 -1 65 16
FLAGS "DZG"
USE %AIS NUMBER F_CODATT 5
INPUT CODTAB F_CODATT BEGIN
DISPLAY "Codice" CODTAB PROMPT 4 1 "Codice Attivita' "
DISPLAY "Descrizione@50" S0 FLAGS "DZG"
OUTPUT F_CODATT CODTAB USE %AIS
OUTPUT F_DESATT S0 INPUT CODTAB F_CODATT
CHECKTYPE NORMAL DISPLAY "Codice" CODTAB
END DISPLAY "Descrizione@50" S0
OUTPUT F_CODATT CODTAB
STRING F_DESATT 50 30 OUTPUT F_DESATT S0
BEGIN CHECKTYPE NORMAL
PROMPT 31 1 "" END
FLAGS "D"
END STRING F_DESATT 50 30
BEGIN
LIST F_TIPOATT 26 PROMPT 31 1 ""
BEGIN FLAGS "D"
PROMPT 4 3 "Tipo " END
FLAGS "U"
ITEM " |Altre" LIST F_TIPOATT 26
ITEM "M|Mista" BEGIN
ITEM "E|Mista evidenziata" PROMPT 4 3 "Tipo "
ITEM "S|Servizio o mista generica" HELP "Tipo di attivita' a della ditta"
END FLAGS "U"
ITEM " |Altre"
NUMBER F_PRORATA 6 2 ITEM "M|Mista"
BEGIN ITEM "E|Mista evidenziata"
PROMPT 4 5 "% Pro-Rata " ITEM "S|Servizio o mista generica"
PICTURE ".2" END
NUM_EXPR {(#F_PRORATA>=0.0)&&(#F_PRORATA<=100.0)}
WARNING "La percentuale deve essere compresa tra 0 e 100" NUMBER F_PRORATA 6 2
FLAGS "R" BEGIN
GROUP 1 PROMPT 4 5 "% Pro-Rata "
END HELP "Percentuale di pro-rata ???????"
PICTURE ".2"
NUMBER F_P8 15 NUM_EXPR {(#F_PRORATA>=0.0)&&(#F_PRORATA<=100.0)}
BEGIN WARNING "La percentuale deve essere compresa tra 0 e 100"
PROMPT 4 7 "Plafond art. 8 " FLAGS "R"
PICTURE "." GROUP 1
FLAGS "R" END
GROUP 1
END NUMBER F_P8 15
BEGIN
NUMBER F_P8B 15 PROMPT 4 7 "Plafond art. 8 "
BEGIN HELP "?????????????"
PROMPT 4 9 "Plafond art. 8b " PICTURE "."
PICTURE "." FLAGS "R"
FLAGS "R" GROUP 1
GROUP 1 END
END
NUMBER F_P8B 15
NUMBER F_P9 15 BEGIN
BEGIN PROMPT 4 9 "Plafond art. 8b "
PROMPT 4 11 "Plafond art. 9 " HELP "????????????"
PICTURE "." PICTURE "."
FLAGS "R" FLAGS "R"
GROUP 1 GROUP 1
END END
NUMBER F_P9 15
BUTTON DLG_OK 9 2 BEGIN
BEGIN PROMPT 4 11 "Plafond art. 9 "
PROMPT -13 -1 "" HELP "?????????????"
END PICTURE "."
FLAGS "R"
BUTTON DLG_CANCEL 9 2 GROUP 1
BEGIN END
PROMPT -23 -1 ""
END
BUTTON DLG_OK 9 2
BUTTON DLG_NULL 9 2 BEGIN
BEGIN PROMPT -13 -1 ""
PROMPT -33 -1 "Azzera" END
MESSAGE RESET,1@
END BUTTON DLG_NULL 9 2
BEGIN
ENDPAGE PROMPT -23 -1 "Azzera"
ENDMASK MESSAGE RESET,1@
END
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -33 -1 ""
END
ENDPAGE
ENDMASK