Corretti conflitti
git-svn-id: svn://10.65.10.50/trunk@621 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy
parent
6964384386
commit
c39c2e551c
@ -439,8 +439,9 @@ 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
|
||||
calcola_saldo(); // Verifica eventuali sbilanci contabili
|
||||
if (iva() != nessuna_iva)
|
||||
calcola_imp(); // Calcola totale imponibile ed imposte
|
||||
}
|
||||
|
||||
|
||||
|
||||
@ -21,20 +21,19 @@ NUMBER FLD_CG41_YEAR 4
|
||||
BEGIN
|
||||
PROMPT 3 6 "Anno da riordinare "
|
||||
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
|
||||
|
||||
|
||||
BUTTON DLG_CANCEL 9 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 "Annulla"
|
||||
END
|
||||
|
||||
BUTTON DLG_OK 9 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 "Conferma"
|
||||
PROMPT -12 -1 "Conferma"
|
||||
END
|
||||
|
||||
BUTTON DLG_CANCEL 9 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 "Annulla"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
|
||||
|
||||
@ -4,6 +4,7 @@ PAGE "Calcolo Liquidazioni" -1 -1 68 15
|
||||
RADIOBUTTON CG43_RDB_VERS 15
|
||||
BEGIN
|
||||
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 "2|Mensili" MESSAGE HIDE,CG43_LST_TRIM|SHOW,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
|
||||
PROMPT 24 2 "Da codice "
|
||||
FLAGS "UR"
|
||||
HELP "Immettere codice ditta di partenza per la selezione"
|
||||
HELP "Codice ditta di partenza per la selezione"
|
||||
USE LF_NDITTE KEY 1
|
||||
DISPLAY "Codice" CODDITTA
|
||||
DISPLAY "Ragione sociale@50" RAGSOC
|
||||
@ -31,7 +32,7 @@ NUMBER CG43_FLD_DTO 5
|
||||
BEGIN
|
||||
PROMPT 24 3 "A codice "
|
||||
FLAGS "UR"
|
||||
HELP "Immettere codice ditta di fine selezione"
|
||||
HELP "Codice ditta di fine selezione"
|
||||
COPY USE CG43_FLD_DFR
|
||||
DISPLAY "Codice" CODDITTA
|
||||
DISPLAY "Ragione sociale@50" RAGSOC
|
||||
@ -48,12 +49,14 @@ END
|
||||
BUTTON DLG_SELECT 10 2
|
||||
BEGIN
|
||||
PROMPT 48 2 "~Selezione"
|
||||
HELP "Selezione ditte di cui fare la liquidazione"
|
||||
MESSAGE EXIT, DLG_SELECT
|
||||
END
|
||||
|
||||
BUTTON CG43_BUT_ANN 10
|
||||
BEGIN
|
||||
PROMPT 48 4 "A~zzera"
|
||||
HELP "Azzerare la selezione delle ditte da fare la liquidazione"
|
||||
MESSAGE EXIT,CG43_BUT_ANN
|
||||
END
|
||||
|
||||
@ -68,7 +71,7 @@ END
|
||||
NUMBER CG43_FLD_ANNO 4
|
||||
BEGIN
|
||||
PROMPT 30 7 "Anno "
|
||||
HELP "Immettere l'anno di calcolo"
|
||||
HELP "Anno di cui effettuare il calcolo"
|
||||
FLAGS "A"
|
||||
END
|
||||
|
||||
@ -76,7 +79,7 @@ END
|
||||
LIST CG43_LST_MESE 10
|
||||
BEGIN
|
||||
PROMPT 4 7 "Periodo "
|
||||
HELP "Immettere il mese di calcolo liquidazione"
|
||||
HELP "Mese di cui effettuare il calcolo liquidazione"
|
||||
ITEM "13|Annuale"
|
||||
FLAGS "AM"
|
||||
END
|
||||
@ -84,7 +87,7 @@ END
|
||||
LIST CG43_LST_TRIM 12
|
||||
BEGIN
|
||||
PROMPT 4 7 "Periodo "
|
||||
HELP "Immettere il trimestre di calcolo liquidazione"
|
||||
HELP "Trimestre di cui effettuare il calcolo liquidazione"
|
||||
ITEM "3|1 Trimestre "
|
||||
ITEM "6|2 Trimestre "
|
||||
ITEM "9|3 Trimestre "
|
||||
@ -95,6 +98,7 @@ END
|
||||
LIST CG43_LST_CALC 13
|
||||
BEGIN
|
||||
PROMPT 4 8 "Ricalcola "
|
||||
HELP "Indicare se rifare il calcolo durante la stampa"
|
||||
// ITEM "1|Se necessario"
|
||||
ITEM "2|Mese corrente"
|
||||
ITEM "3|Tutti i mesi"
|
||||
@ -111,7 +115,7 @@ END
|
||||
BOOLEAN CG43_CHK_STAMPA
|
||||
BEGIN
|
||||
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 FALSE DISABLE,CG43_FLD_DATA
|
||||
END
|
||||
@ -120,7 +124,7 @@ END
|
||||
DATE CG43_FLD_DATA
|
||||
BEGIN
|
||||
PROMPT 16 11 "con data "
|
||||
HELP "Immettere la data di stampa"
|
||||
HELP "Data di stampa del prospetto delle liquidazioni"
|
||||
FLAGS "A"
|
||||
END
|
||||
|
||||
@ -128,7 +132,7 @@ END
|
||||
BOOLEAN CG43_CHK_FINAL
|
||||
BEGIN
|
||||
PROMPT 47 11 "Definitivo"
|
||||
HELP "Se selezionato, la liquidazione e' registrata come definitiva"
|
||||
HELP "Indicare se la liquidazione e' registrata come definitiva"
|
||||
END
|
||||
|
||||
|
||||
|
||||
@ -1,16 +1,18 @@
|
||||
#include "cg4300b.h"
|
||||
|
||||
PAGE "Estrazione deleghe" -1 -1 45 9
|
||||
PAGE "Estrazione deleghe" -1 -1 45 10
|
||||
|
||||
NUMBER FLD_CGB_YEAR 4
|
||||
BEGIN
|
||||
PROMPT 2 1 "Anno estrazione "
|
||||
PROMPT 2 1 "Anno estrazione "
|
||||
HELP "Anno d'esercizio da cui effettuare le estrazioni"
|
||||
FLAGS "A"
|
||||
END
|
||||
|
||||
LIST FLD_CGB_MONTH 10
|
||||
BEGIN
|
||||
PROMPT 2 2 "Mese estrazione "
|
||||
HELP "Mese da cui effettuare le estrazioni"
|
||||
FLAGS "AM"
|
||||
ITEM "13|Annuale"
|
||||
END
|
||||
@ -23,12 +25,14 @@ END
|
||||
BUTTON DLG_SELECT 10 2
|
||||
BEGIN
|
||||
PROMPT -12 5 "Scegli"
|
||||
HELP "Selezionare le ditte di cui estrarre le deleghe"
|
||||
MESSAGE EXIT,DLG_SELECT
|
||||
END
|
||||
|
||||
BUTTON BUT_CGB_ALL 10 2
|
||||
BEGIN
|
||||
PROMPT -22 5 "Tutte"
|
||||
HELP "Selezionare tutte le ditte di cui estrarre le deleghe"
|
||||
MESSAGE EXIT,BUT_CGB_ALL
|
||||
END
|
||||
|
||||
|
||||
@ -6,6 +6,7 @@ PAGE "Calcolo acconto" -1 -1 52 11
|
||||
RADIOBUTTON RDB_CGC_BASE 4 21
|
||||
BEGIN
|
||||
PROMPT 3 1 "Base di calcolo"
|
||||
HELP "Indicare l'anno di cui calcolare l'acconto"
|
||||
ITEM "1|Anno precedente"
|
||||
ITEM "2|Anno in corso"
|
||||
END
|
||||
@ -13,7 +14,7 @@ END
|
||||
BOOLEAN CHK_CGC_PRINT
|
||||
BEGIN
|
||||
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 FALSE DISABLE,CHK_CGC_BASE
|
||||
END
|
||||
@ -21,12 +22,13 @@ END
|
||||
BOOLEAN CHK_CGC_BASE
|
||||
BEGIN
|
||||
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
|
||||
|
||||
NUMBER FLD_CGC_YEAR 4
|
||||
BEGIN
|
||||
PROMPT 3 5 "Anno da elaborare "
|
||||
HELP "Anno di cui si vuole il calcolo acconto"
|
||||
FLAGS "A"
|
||||
END
|
||||
|
||||
@ -38,12 +40,14 @@ END
|
||||
BUTTON DLG_SELECT 10 2
|
||||
BEGIN
|
||||
PROMPT -12 7 "Scegli"
|
||||
HELP "Selezionare le ditte di cui fare il calcolo dell'acconto"
|
||||
MESSAGE EXIT,DLG_SELECT
|
||||
END
|
||||
|
||||
BUTTON BUT_CGC_ALL 10 2
|
||||
BEGIN
|
||||
PROMPT -22 7 "Tutte"
|
||||
HELP "Selezionare tutte le ditte di cui fare il calcolo dell'acconto"
|
||||
MESSAGE EXIT,BUT_CGC_ALL
|
||||
END
|
||||
|
||||
@ -59,5 +63,3 @@ END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
|
||||
|
||||
|
||||
@ -9,6 +9,7 @@ PAGE "Stampa registri IVA" -1 -1 56 16
|
||||
LISTBOX TIPO_STAMPA 1 48
|
||||
BEGIN
|
||||
PROMPT 2 1 "Tipo "
|
||||
HELP "Indicare il tipo di stampa da eseguire"
|
||||
ITEM "3|Stampa di prova"
|
||||
MESSAGE SHOW,3@|HIDE,1@|RESET,1@|HIDE,2@|RESET,2@|SHOW,CODICE_LIBRO
|
||||
ITEM "1|Libri bollati della ditta"
|
||||
@ -27,7 +28,7 @@ END
|
||||
NUMBER DA_CODICE 5
|
||||
BEGIN
|
||||
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
|
||||
CHECKTYPE NORMAL
|
||||
INPUT CODDITTA DA_CODICE
|
||||
@ -39,7 +40,7 @@ END
|
||||
NUMBER A_CODICE 5
|
||||
BEGIN
|
||||
PROMPT 21 4 "A codice "
|
||||
HELP "Immettere codice ditta di fine selezione"
|
||||
HELP "Codice ditta di fine selezione"
|
||||
COPY USE DA_CODICE
|
||||
CHECKTYPE NORMAL
|
||||
INPUT CODDITTA A_CODICE
|
||||
@ -56,17 +57,20 @@ END
|
||||
BUTTON DLG_SELECT 9 2
|
||||
BEGIN
|
||||
PROMPT 42 3 "~Selezione"
|
||||
HELP "Indicare le ditta da selezionare per la stampa"
|
||||
END
|
||||
|
||||
BUTTON F_ANNULLA 9
|
||||
BEGIN
|
||||
PROMPT 42 5 "A~zzera"
|
||||
HELP "Togliere la selezione alle ditte"
|
||||
MESSAGE RESET,DA_CODICE|RESET,A_CODICE
|
||||
END
|
||||
|
||||
DATE DATA_STAMPA
|
||||
BEGIN
|
||||
PROMPT 28 7 "Data stampa "
|
||||
HELP "Data in cui viene stampato il registro"
|
||||
FLAG "AH"
|
||||
GROUP 3
|
||||
END
|
||||
@ -74,6 +78,7 @@ END
|
||||
NUMBER ANNO 4
|
||||
BEGIN
|
||||
PROMPT 2 3 "Anno "
|
||||
HELP "Anno di cui si vuole stampare il registro"
|
||||
FLAGS "A"
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
@ -137,12 +142,14 @@ END
|
||||
DATE DA_DATA
|
||||
BEGIN
|
||||
PROMPT 5 9 "Dalla data "
|
||||
HELP "Data di partenza per la stampa del registro"
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
DATE A_DATA
|
||||
BEGIN
|
||||
PROMPT 30 9 "Alla data "
|
||||
HELP "Data di fine per la stampa del registro"
|
||||
VALIDATE DATE_CMP_FUNC >= DA_DATA
|
||||
WARNING "Inserire una data non inferiore alla data limite inferiore"
|
||||
GROUP 3
|
||||
@ -151,6 +158,7 @@ END
|
||||
LISTBOX FINO_A_MESE 10
|
||||
BEGIN
|
||||
PROMPT 5 9 "Fino al mese "
|
||||
HELP "Mese fino al quale eseguire la stampa"
|
||||
FLAGS "M"
|
||||
GROUP 1
|
||||
END
|
||||
@ -158,6 +166,7 @@ END
|
||||
LISTBOX MESE 10
|
||||
BEGIN
|
||||
PROMPT 5 9 "Mese "
|
||||
HELP "Mese di cui eseguire la stampa"
|
||||
FLAGS "M"
|
||||
GROUP 2
|
||||
END
|
||||
@ -165,7 +174,7 @@ END
|
||||
LISTBOX TIPO_RIEPILOGATIVO 11
|
||||
BEGIN
|
||||
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 "A|Annuale"
|
||||
GROUP 1
|
||||
@ -181,6 +190,7 @@ END
|
||||
NUMBER ULTIMA_PAGINA 4
|
||||
BEGIN
|
||||
PROMPT 2 12 "Ultimo numero di pagina stampata libro unico "
|
||||
HELP "Numero dell'ultima pagina del libro unico stampata"
|
||||
FLAGS "R"
|
||||
GROUP 2
|
||||
END
|
||||
@ -188,7 +198,7 @@ END
|
||||
STRING CODICE_LIBRO_IVA 3
|
||||
BEGIN
|
||||
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)
|
||||
INPUT CODTAB[1,4] ANNO
|
||||
INPUT CODTAB[5,7] CODICE_LIBRO_IVA
|
||||
@ -216,4 +226,3 @@ END
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
|
||||
@ -1,6 +1,6 @@
|
||||
#include "cg4500a.h"
|
||||
|
||||
PAGE "" -1 -1 74 14
|
||||
PAGE "Apertura esercizio contabile" -1 -1 74 14
|
||||
|
||||
NUMBER F_CODDITTA 5
|
||||
BEGIN
|
||||
@ -42,6 +42,7 @@ END
|
||||
NUMBER F_NUOVOANNO 4
|
||||
BEGIN
|
||||
PROMPT 1 7 "Nuovo anno esercizio "
|
||||
HELP "Anno di cui si vuole aprire un nuovo esercizio contabile"
|
||||
FLAGS "RZ"
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
@ -49,12 +50,14 @@ END
|
||||
DATE F_DATAINI
|
||||
BEGIN
|
||||
PROMPT 1 8 "Data inizio nuovo esercizio "
|
||||
HELP "Data di inizio del nuovo esercizio contabile"
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
DATE F_DATAFIN
|
||||
BEGIN
|
||||
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"
|
||||
CHECKTYPE REQUIRED
|
||||
VALIDATE DATE_CMP_FUNC >= F_DATAINI
|
||||
@ -73,10 +76,3 @@ END
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
@ -1,6 +1,6 @@
|
||||
#include "cg4500b.h"
|
||||
|
||||
PAGE "" -1 -1 73 10
|
||||
PAGE "Apertura nuovo esercizio IVA" -1 -1 73 10
|
||||
|
||||
NUMBER F_CODDITTA 5
|
||||
BEGIN
|
||||
@ -24,6 +24,7 @@ END
|
||||
NUMBER F_ANNOIVA 4
|
||||
BEGIN
|
||||
PROMPT 2 4 "Nuovo anno esercizio IVA "
|
||||
HELP "Anno di cui si vuole aprire un nuovo esercizio IVA"
|
||||
CHECKTYPE REQUIRED
|
||||
//FLAGS "A"
|
||||
END
|
||||
@ -31,6 +32,7 @@ END
|
||||
STRING F_FREQUENZA 1
|
||||
BEGIN
|
||||
PROMPT 2 5 "Frequenza versamenti (M/T) "
|
||||
HELP "Indicare la frequenza delle liquidazioni IVA per il nuovo esercizio"
|
||||
END
|
||||
|
||||
BUTTON DLG_OK 9 2
|
||||
|
||||
@ -25,6 +25,7 @@ END
|
||||
STRING F_CHIUSURA 3
|
||||
BEGIN
|
||||
PROMPT 2 4 "Codice causale chiusura "
|
||||
HELP "Codice causale che genera il movimento di chiusura"
|
||||
USE LF_CAUSALI KEY 1
|
||||
DISPLAY "Codice" CODCAUS
|
||||
DISPLAY "Descrizione @50" DESCR
|
||||
@ -36,6 +37,7 @@ END
|
||||
STRING F_APERTURA 3
|
||||
BEGIN
|
||||
PROMPT 2 5 "Codice causale apertura "
|
||||
HELP "Codice causale che genera il movimento di apertura"
|
||||
COPY USE F_CHIUSURA
|
||||
COPY DISPLAY F_CHIUSURA
|
||||
OUTPUT F_APERTURA CODCAUS
|
||||
@ -45,11 +47,13 @@ END
|
||||
DATE F_DATAC
|
||||
BEGIN
|
||||
PROMPT 36 4 "Data/Anno chiusura "
|
||||
HELP "Data in cui effettuare il movimento di chiusura"
|
||||
END
|
||||
|
||||
DATE F_DATAAP
|
||||
BEGIN
|
||||
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"
|
||||
VALIDATE DATE_CMP_FUNC >= F_DATAC
|
||||
END
|
||||
@ -75,6 +79,7 @@ END
|
||||
NUMBER F_BILCHG 3
|
||||
BEGIN
|
||||
PROMPT 3 9 "Bilancio di chiusura "
|
||||
HELP "Codice conto di riepilogo del bilancio di chiusura"
|
||||
USE LF_PCON KEY 1 SELECT SOTTOCONTO!=""
|
||||
CHECKTYPE REQUIRED
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
@ -92,6 +97,7 @@ END
|
||||
NUMBER F_BILCHC 3
|
||||
BEGIN
|
||||
PROMPT 44 9 ""
|
||||
HELP "Codice conto di riepilogo del bilancio di chiusura"
|
||||
COPY ALL F_BILCHG
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
@ -99,6 +105,7 @@ END
|
||||
NUMBER F_BILCHS 6
|
||||
BEGIN
|
||||
PROMPT 51 9 ""
|
||||
HELP "Codice conto di riepilogo del bilancio di chiusura"
|
||||
COPY ALL F_BILCHG
|
||||
CHECKTYPE REQUIRED
|
||||
|
||||
@ -107,6 +114,7 @@ END
|
||||
NUMBER F_PROPERG 3
|
||||
BEGIN
|
||||
PROMPT 3 10 "Profitti e perdite "
|
||||
HELP "Codice conto di riepilogo del Profitti e perdite"
|
||||
COPY USE F_BILCHG
|
||||
CHECKTYPE REQUIRED
|
||||
COPY DISPLAY F_BILCHG
|
||||
@ -121,9 +129,9 @@ END
|
||||
NUMBER F_PROPERC 3
|
||||
BEGIN
|
||||
PROMPT 44 10 ""
|
||||
HELP "Codice conto di riepilogo del Profitti e perdite"
|
||||
COPY USE F_BILCHG
|
||||
CHECKTYPE REQUIRED
|
||||
|
||||
COPY DISPLAY F_BILCHG
|
||||
COPY OUTPUT F_PROPERG
|
||||
COPY INPUT F_PROPERG
|
||||
@ -132,6 +140,7 @@ END
|
||||
NUMBER F_PROPERS 6
|
||||
BEGIN
|
||||
PROMPT 51 10 ""
|
||||
HELP "Codice conto di riepilogo del Profitti e perdite"
|
||||
COPY ALL F_PROPERC
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
@ -139,6 +148,7 @@ END
|
||||
NUMBER F_BILAPG 3
|
||||
BEGIN
|
||||
PROMPT 3 11 "Bilancio di apertura "
|
||||
HELP "Codice conto di riepilogo del Bilancio di apertura"
|
||||
COPY USE F_BILCHG
|
||||
CHECKTYPE REQUIRED
|
||||
COPY DISPLAY F_BILCHG
|
||||
@ -153,6 +163,7 @@ END
|
||||
NUMBER F_BILAPC 3
|
||||
BEGIN
|
||||
PROMPT 44 11 ""
|
||||
HELP "Codice conto di riepilogo del Bilancio di apertura"
|
||||
COPY USE F_BILCHG
|
||||
CHECKTYPE REQUIRED
|
||||
COPY DISPLAY F_BILCHG
|
||||
@ -163,6 +174,7 @@ END
|
||||
NUMBER F_BILAPS 6
|
||||
BEGIN
|
||||
PROMPT 51 11 ""
|
||||
HELP "Codice conto di riepilogo del Bilancio di apertura"
|
||||
COPY ALL F_BILAPC
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
@ -170,6 +182,7 @@ END
|
||||
NUMBER F_UTILPG 3
|
||||
BEGIN
|
||||
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"))
|
||||
CHECKTYPE REQUIRED
|
||||
COPY DISPLAY F_BILCHG
|
||||
@ -184,6 +197,7 @@ END
|
||||
NUMBER F_UTILPC 3
|
||||
BEGIN
|
||||
PROMPT 44 12 ""
|
||||
HELP "Codice conto patrimoniale in cui ripilogare l'utile d'esercizio"
|
||||
COPY USE F_UTILPG
|
||||
CHECKTYPE REQUIRED
|
||||
COPY DISPLAY F_BILCHG
|
||||
@ -194,6 +208,7 @@ END
|
||||
NUMBER F_UTILPS 6
|
||||
BEGIN
|
||||
PROMPT 51 12 ""
|
||||
HELP "Codice conto patrimoniale in cui ripilogare l'utile d'esercizio"
|
||||
COPY ALL F_UTILPC
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
@ -201,6 +216,7 @@ END
|
||||
NUMBER F_PERDPG 3
|
||||
BEGIN
|
||||
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"))
|
||||
CHECKTYPE REQUIRED
|
||||
COPY DISPLAY F_BILCHG
|
||||
@ -215,6 +231,7 @@ END
|
||||
NUMBER F_PERDPC 3
|
||||
BEGIN
|
||||
PROMPT 44 13 ""
|
||||
HELP "Codice conto patrimoniale in cui ripilogare la perdita d'esercizio"
|
||||
COPY USE F_PERDPG
|
||||
CHECKTYPE REQUIRED
|
||||
COPY DISPLAY F_BILCHG
|
||||
@ -225,6 +242,7 @@ END
|
||||
NUMBER F_PERDPS 6
|
||||
BEGIN
|
||||
PROMPT 51 13 ""
|
||||
HELP "Codice conto patrimoniale in cui ripilogare la perdita d'esercizio"
|
||||
COPY ALL F_PERDPC
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
@ -232,6 +250,7 @@ END
|
||||
NUMBER F_UTILEG 3
|
||||
BEGIN
|
||||
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"))
|
||||
CHECKTYPE REQUIRED
|
||||
COPY DISPLAY F_BILCHG
|
||||
@ -246,6 +265,7 @@ END
|
||||
NUMBER F_UTILEC 3
|
||||
BEGIN
|
||||
PROMPT 44 14 ""
|
||||
HELP "Codice conto economico in cui ripilogare l'utile d'esercizio"
|
||||
COPY USE F_UTILEG
|
||||
CHECKTYPE REQUIRED
|
||||
COPY DISPLAY F_BILCHG
|
||||
@ -256,6 +276,7 @@ END
|
||||
NUMBER F_UTILES 6
|
||||
BEGIN
|
||||
PROMPT 51 14 ""
|
||||
HELP "Codice conto economico in cui ripilogare l'utile d'esercizio"
|
||||
COPY ALL F_UTILEC
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
@ -263,6 +284,7 @@ END
|
||||
NUMBER F_PERDEG 3
|
||||
BEGIN
|
||||
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") )
|
||||
CHECKTYPE REQUIRED
|
||||
COPY DISPLAY F_BILCHG
|
||||
@ -278,6 +300,7 @@ END
|
||||
NUMBER F_PERDEC 3
|
||||
BEGIN
|
||||
PROMPT 44 15 ""
|
||||
HELP "Codice conto economico in cui ripilogare la perdita d'esercizio"
|
||||
COPY USE F_PERDEG
|
||||
CHECKTYPE REQUIRED
|
||||
COPY DISPLAY F_BILCHG
|
||||
@ -288,6 +311,7 @@ END
|
||||
NUMBER F_PERDES 6
|
||||
BEGIN
|
||||
PROMPT 51 15 ""
|
||||
HELP "Codice conto economico in cui ripilogare la perdita d'esercizio"
|
||||
COPY ALL F_PERDEC
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
@ -305,10 +329,3 @@ END
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
@ -10,6 +10,7 @@ END
|
||||
NUMBER FLD_CODABI 5
|
||||
BEGIN
|
||||
PROMPT 3 2 "Banca di appoggio per deleghe IVA ABI "
|
||||
HELP "Codice ABI banca di appoggio per deleghe IVA"
|
||||
USE %BAN
|
||||
INPUT CODTAB[1,5] FLD_CODABI
|
||||
DISPLAY "ABI@5" CODTAB[1,5]
|
||||
@ -26,6 +27,7 @@ END
|
||||
NUMBER FLD_CODCAB 5
|
||||
BEGIN
|
||||
PROMPT 60 2 "CAB "
|
||||
HELP "Codice CAB banca di appoggio per deleghe IVA"
|
||||
COPY ALL FLD_CODABI
|
||||
INPUT CODTAB[6,10] FLD_CODCAB
|
||||
CHECKTYPE NORMAL
|
||||
@ -42,6 +44,7 @@ END
|
||||
BOOLEAN CHK_SIND11
|
||||
BEGIN
|
||||
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
|
||||
END
|
||||
|
||||
@ -58,6 +61,7 @@ END
|
||||
NUMBER FLD_INTR0 5 2
|
||||
BEGIN
|
||||
PROMPT 3 8 "I "
|
||||
HELP "Indicare il tasso del primo trimestre da applicare per gli interessi su versamenti IVA"
|
||||
FLAGS "R"
|
||||
FIELD InTr(0)
|
||||
END
|
||||
@ -65,6 +69,7 @@ END
|
||||
NUMBER FLD_INTR1 5 2
|
||||
BEGIN
|
||||
PROMPT 20 8 "II "
|
||||
HELP "Indicare tasso del secondo trimestre da applicare per gli interessi su versamenti IVA"
|
||||
FLAGS "R"
|
||||
FIELD InTr(1)
|
||||
END
|
||||
@ -72,6 +77,7 @@ END
|
||||
NUMBER FLD_INTR2 5 2
|
||||
BEGIN
|
||||
PROMPT 40 8 "III "
|
||||
HELP "Indicare tasso del terzo trimestre da applicare per gli interessi su versamenti IVA"
|
||||
FLAGS "R"
|
||||
FIELD InTr(2)
|
||||
END
|
||||
@ -79,6 +85,7 @@ END
|
||||
NUMBER FLD_INTR3 5 2
|
||||
BEGIN
|
||||
PROMPT 60 8 "IV "
|
||||
HELP "Indicare tasso del quarto trimestre da applicare per gli interessi su versamenti IVA"
|
||||
FLAGS "R"
|
||||
FIELD InTr(3)
|
||||
END
|
||||
@ -86,6 +93,7 @@ END
|
||||
NUMBER FLD_CODAGV 5
|
||||
BEGIN
|
||||
PROMPT 3 9 "Codice IVA per ricavi misti agenzie di viaggio "
|
||||
HELP "Codice IVA per scorporo operazioni con l'esetero per agenzie di viaggio"
|
||||
USE %IVA
|
||||
INPUT CODTAB FLD_CODAGV
|
||||
DISPLAY "Codice" CODTAB
|
||||
@ -102,13 +110,15 @@ END
|
||||
|
||||
BOOLEAN CHK_STIREG
|
||||
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
|
||||
END
|
||||
|
||||
BOOLEAN CHK_NODTRG
|
||||
BEGIN
|
||||
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
|
||||
END
|
||||
|
||||
@ -157,8 +167,6 @@ BEGIN
|
||||
FIELD Cg02SN
|
||||
END
|
||||
|
||||
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
@ -172,6 +180,3 @@ END
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
|
||||
|
||||
|
||||
@ -23,12 +23,14 @@ PAGE "Impostazione parametri ditta" -1 -1 77 8
|
||||
NUMBER FLD_ANLIIV 4
|
||||
BEGIN
|
||||
PROMPT 2 1 "@bANNO LIQUIDAZIONE IVA "
|
||||
HELP "Indicare l'anno dell'esercizio IVA corrente"
|
||||
FIELD AnLiIv
|
||||
END
|
||||
|
||||
BOOLEAN CHK_ANCFCM
|
||||
BEGIN
|
||||
PROMPT 4 4 "Anagrafica clienti / anagrafica fornitori"
|
||||
HELP "Indicare se gestire un'unica anagrafica clienti/fornitori"
|
||||
FLAGS "D"
|
||||
FIELD AnCfCm
|
||||
END
|
||||
@ -36,6 +38,7 @@ END
|
||||
BOOLEAN CHK_PCTCCM
|
||||
BEGIN
|
||||
PROMPT 4 5 "Piano conti / tabella causali"
|
||||
HELP "Indicare se gestire un'unico archivio piano dei conti/causali"
|
||||
FLAGS "D"
|
||||
FIELD PcTcCm
|
||||
END
|
||||
@ -49,6 +52,7 @@ END
|
||||
RADIOBUTTON LST_RIFPAR 20
|
||||
BEGIN
|
||||
PROMPT 55 3 "Riferimenti partite "
|
||||
HELP "Indicaer il criterio dei riferimenti delle partite"
|
||||
ITEM " |N. protocollo"
|
||||
ITEM "X|N. documento"
|
||||
HELP ""
|
||||
@ -63,61 +67,63 @@ END
|
||||
BOOLEAN CHK_GSLBCN
|
||||
BEGIN
|
||||
PROMPT 4 8 "Gestione libro cronologico "
|
||||
HELP ""
|
||||
HELP "Indicare se attivare il libro cronologico della gestione per i professionisti"
|
||||
FIELD GsLbCn
|
||||
END
|
||||
|
||||
BOOLEAN CHK_STTFFR
|
||||
BEGIN
|
||||
PROMPT 4 9 "Stampa totali fatture a fine registro "
|
||||
HELP ""
|
||||
HELP "Indicare se attivare il computo dei totali fatture a fine registro"
|
||||
FIELD StTfFr
|
||||
END
|
||||
|
||||
BOOLEAN CHK_STLGIU
|
||||
BEGIN
|
||||
PROMPT 4 10 "Stampa libro giornale e libro IVA unico "
|
||||
HELP ""
|
||||
HELP "Indicare se utilizzare un unico registro per libro giornale e libro IVA"
|
||||
FIELD StLgiU
|
||||
END
|
||||
|
||||
BOOLEAN CHK_GESSAL
|
||||
BEGIN
|
||||
PROMPT 4 11 "Gestione saldaconto "
|
||||
HELP ""
|
||||
HELP "Indicare se attivare la gestione del saldaconto clienti/fornitori"
|
||||
FIELD GesSal
|
||||
END
|
||||
|
||||
BOOLEAN CHK_NRCLIDX
|
||||
BEGIN
|
||||
PROMPT 4 12 "N. Rif. allineato a destra per clienti"
|
||||
HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto"
|
||||
FIELD NrCliDx
|
||||
END
|
||||
|
||||
BOOLEAN CHK_NRFORDX
|
||||
BEGIN
|
||||
PROMPT 4 13 "N. Rif. allineato a destra per fornitori"
|
||||
HELP "Indicare se allineare a destra il num. di rif. delle partite nel saldaconto"
|
||||
FIELD NrForDx
|
||||
END
|
||||
|
||||
BOOLEAN CHK_GESVAL
|
||||
BEGIN
|
||||
PROMPT 4 14 "Gestione Valuta"
|
||||
HELP ""
|
||||
HELP "Indicare se gestire i movimenti prima nota in valuta"
|
||||
FIELD GesVal
|
||||
END
|
||||
|
||||
BOOLEAN CHK_GELIDI
|
||||
BEGIN
|
||||
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
|
||||
END
|
||||
|
||||
BOOLEAN CHK_GESVEN
|
||||
BEGIN
|
||||
PROMPT 4 16 "Gestione vendite"
|
||||
HELP ""
|
||||
HELP "Indicare se e' attivata anche la gestione delle vendite"
|
||||
FIELD GesVen
|
||||
END
|
||||
|
||||
@ -134,9 +140,9 @@ END
|
||||
STRING FLD_CODLIC 3
|
||||
BEGIN
|
||||
PROMPT 1 2 "Codice libro incassi/pagamenti "
|
||||
HELP ""
|
||||
HELP "Indicare il codice del libro degli incassi/pagamenti"
|
||||
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
|
||||
DISPLAY "Anno" CODTAB[1,4]
|
||||
DISPLAY "Codice Registro" CODTAB[5,7]
|
||||
@ -148,8 +154,8 @@ END
|
||||
|
||||
STRING FLD_CODLIN 1
|
||||
BEGIN
|
||||
PROMPT 1 3 "Codice lingua "
|
||||
HELP ""
|
||||
PROMPT 1 3 "Codice lingua "
|
||||
HELP "Indicare la lingua utilizzata"
|
||||
USE %LNG
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
@ -162,6 +168,7 @@ END
|
||||
STRING FLD_COCACH 3
|
||||
BEGIN
|
||||
PROMPT 1 4 "Codice causale chiusura "
|
||||
HELP "Codice della causale di chiusura che generera' il movimento"
|
||||
USE LF_CAUSALI SELECT MOVAP="C"
|
||||
INPUT CODCAUS FLD_COCACH
|
||||
DISPLAY "Codice" CODCAUS
|
||||
@ -177,6 +184,7 @@ END
|
||||
STRING FLD_DCOCACH 50 35
|
||||
BEGIN
|
||||
PROMPT 40 4 ""
|
||||
HELP "Codice della causale di chiusura che generera' il movimento"
|
||||
USE LF_CAUSALI KEY 2 SELECT MOVAP="C"
|
||||
INPUT DESCR FLD_DCOCACH
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
@ -189,6 +197,7 @@ END
|
||||
STRING FLD_COCAAP 3
|
||||
BEGIN
|
||||
PROMPT 1 5 "Codice causale apertura "
|
||||
HELP "Codice della causale di apertura che generera' il movimento"
|
||||
FLAGS "U"
|
||||
USE LF_CAUSALI SELECT MOVAP="A"
|
||||
INPUT CODCAUS FLD_COCAAP
|
||||
@ -203,6 +212,7 @@ END
|
||||
STRING FLD_DCOCAAP 50 35
|
||||
BEGIN
|
||||
PROMPT 40 5 ""
|
||||
HELP "Codice della causale di apertura che generera' il movimento"
|
||||
USE LF_CAUSALI KEY 2 SELECT MOVAP="A"
|
||||
INPUT DESCR FLD_DCOCAAP
|
||||
COPY DISPLAY FLD_DCOCACH
|
||||
@ -224,7 +234,7 @@ END
|
||||
NUMBER FLD_CSBICHG 3
|
||||
BEGIN
|
||||
PROMPT 2 10 "Bilancio di chiusura "
|
||||
HELP ""
|
||||
HELP "Codice del conto di riepilogo del bilancio di chiusura"
|
||||
USE LF_PCON SELECT SOTTOCONTO!=""
|
||||
INPUT GRUPPO FLD_CSBICHG
|
||||
INPUT CONTO FLD_CSBICHC
|
||||
@ -244,6 +254,7 @@ END
|
||||
NUMBER FLD_CSBICHC 3
|
||||
BEGIN
|
||||
PROMPT 33 10 ""
|
||||
HELP "Codice del conto di riepilogo del bilancio di chiusura"
|
||||
COPY ALL FLD_CSBICHG
|
||||
FIELD CsBiChC
|
||||
ADD RUN cg0 -0
|
||||
@ -252,6 +263,7 @@ END
|
||||
NUMBER FLD_CSBICHS 6
|
||||
BEGIN
|
||||
PROMPT 40 10 ""
|
||||
HELP "Codice del conto di riepilogo del bilancio di chiusura"
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY INPUT FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
@ -267,7 +279,7 @@ END
|
||||
STRING FLD_DCSBICH 50 25
|
||||
BEGIN
|
||||
PROMPT 50 10 ""
|
||||
HELP ""
|
||||
HELP "Codice del conto di riepilogo del bilancio di chiusura"
|
||||
USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
|
||||
INPUT DESCR FLD_DCSBICH
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
@ -282,7 +294,7 @@ END
|
||||
STRING FLD_CSPRPEG 3
|
||||
BEGIN
|
||||
PROMPT 2 11 "Profitti e perdite "
|
||||
HELP ""
|
||||
HELP "Codice del conto di riepilogo del profitti e perdite"
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSPRPEG GRUPPO
|
||||
@ -298,7 +310,8 @@ END
|
||||
|
||||
NUMBER FLD_CSPRPEC 3
|
||||
BEGIN
|
||||
PROMPT 33 11 ""
|
||||
PROMPT 33 11 ""
|
||||
HELP "Codice del conto di riepilogo del profitti e perdite"
|
||||
COPY ALL FLD_CSPRPEG
|
||||
FIELD CsPrPeC
|
||||
ADD RUN cg0 -0
|
||||
@ -307,6 +320,7 @@ END
|
||||
NUMBER FLD_CSPRPES 6
|
||||
BEGIN
|
||||
PROMPT 40 11 ""
|
||||
HELP "Codice del conto di riepilogo del profitti e perdite"
|
||||
COPY USE FLD_CSPRPEG
|
||||
COPY INPUT FLD_CSPRPEG
|
||||
COPY DISPLAY FLD_CSPRPEG
|
||||
@ -322,7 +336,7 @@ END
|
||||
STRING FLD_DCSPRPE 50 25
|
||||
BEGIN
|
||||
PROMPT 50 11 ""
|
||||
HELP ""
|
||||
HELP "Codice del conto di riepilogo del profitti e perdite"
|
||||
COPY USE FLD_DCSBICH
|
||||
INPUT DESCR FLD_DCSPRPE
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
@ -335,6 +349,7 @@ END
|
||||
NUMBER FLD_CSBIAPG 3
|
||||
BEGIN
|
||||
PROMPT 2 12 "Bilancio di apertura "
|
||||
HELP "Codice del conto di riepilogo del bilancio di apertura"
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSBIAPG GRUPPO
|
||||
@ -352,6 +367,7 @@ END
|
||||
NUMBER FLD_CSBIAPC 3
|
||||
BEGIN
|
||||
PROMPT 33 12 ""
|
||||
HELP "Codice del conto di riepilogo del bilancio di apertura"
|
||||
COPY ALL FLD_CSBIAPG
|
||||
FIELD CsBiApC
|
||||
ADD RUN cg0 -0
|
||||
@ -360,6 +376,7 @@ END
|
||||
NUMBER FLD_CSBIAPS 6
|
||||
BEGIN
|
||||
PROMPT 40 12 ""
|
||||
HELP "Codice del conto di riepilogo del bilancio di apertura"
|
||||
COPY USE FLD_CSBIAPG
|
||||
COPY INPUT FLD_CSBIAPG
|
||||
COPY DISPLAY FLD_CSBIAPG
|
||||
@ -375,7 +392,7 @@ END
|
||||
STRING FLD_DCSBIAP 50 25
|
||||
BEGIN
|
||||
PROMPT 50 12 ""
|
||||
HELP ""
|
||||
HELP "Codice del conto di riepilogo del bilancio di apertura"
|
||||
COPY USE FLD_DCSBICH
|
||||
INPUT DESCR FLD_DCSBIAP
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
@ -388,7 +405,7 @@ END
|
||||
NUMBER FLD_CSUECPG 3
|
||||
BEGIN
|
||||
PROMPT 2 13 "Utile esercizio patrim. "
|
||||
HELP ""
|
||||
HELP "Codice del conto patrimoniale dell'utile d'esercizio"
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSUECPG GRUPPO
|
||||
@ -404,6 +421,7 @@ END
|
||||
NUMBER FLD_CSUECPC 3
|
||||
BEGIN
|
||||
PROMPT 33 13 ""
|
||||
HELP "Codice del conto patrimoniale dell'utile d'esercizio"
|
||||
COPY ALL FLD_CSUECPG
|
||||
CHECKTYPE NORMAL
|
||||
FIELD CsUeCpC
|
||||
@ -412,6 +430,7 @@ END
|
||||
NUMBER FLD_CSUECPS 6
|
||||
BEGIN
|
||||
PROMPT 40 13 ""
|
||||
HELP "Codice del conto patrimoniale dell'utile d'esercizio"
|
||||
COPY USE FLD_CSUECPG
|
||||
COPY INPUT FLD_CSUECPG
|
||||
COPY DISPLAY FLD_CSUECPG
|
||||
@ -426,7 +445,7 @@ END
|
||||
STRING FLD_DCSUECP 50 25
|
||||
BEGIN
|
||||
PROMPT 50 13 ""
|
||||
HELP ""
|
||||
HELP "Codice del conto patrimoniale dell'utile d'esercizio"
|
||||
COPY USE FLD_DCSBICH
|
||||
INPUT DESCR FLD_DCSUECP
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
@ -438,7 +457,7 @@ END
|
||||
NUMBER FLD_CSPECPG 3
|
||||
BEGIN
|
||||
PROMPT 2 14 "Perdita eserc. patrim. "
|
||||
HELP ""
|
||||
HELP "Codice del conto patrimoniale della perdita d'esercizio"
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSPECPG GRUPPO
|
||||
@ -455,6 +474,7 @@ END
|
||||
NUMBER FLD_CSPECPC 3
|
||||
BEGIN
|
||||
PROMPT 33 14 ""
|
||||
HELP "Codice del conto patrimoniale della perdita d'esercizio"
|
||||
COPY ALL FLD_CSPECPG
|
||||
FIELD CsPeCpC
|
||||
ADD RUN cg0 -0
|
||||
@ -463,6 +483,7 @@ END
|
||||
NUMBER FLD_CSPECPS 6
|
||||
BEGIN
|
||||
PROMPT 40 14 ""
|
||||
HELP "Codice del conto patrimoniale della perdita d'esercizio"
|
||||
COPY USE FLD_CSPECPG
|
||||
COPY INPUT FLD_CSPECPG
|
||||
COPY DISPLAY FLD_CSPECPG
|
||||
@ -478,7 +499,7 @@ END
|
||||
STRING FLD_DCSPECP 50 25
|
||||
BEGIN
|
||||
PROMPT 50 14 ""
|
||||
HELP ""
|
||||
HELP "Codice del conto patrimoniale della perdita d'esercizio"
|
||||
COPY USE FLD_DCSBICH
|
||||
INPUT DESCR FLD_DCSPECP
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
@ -490,7 +511,7 @@ END
|
||||
NUMBER FLD_CSUECEG 3
|
||||
BEGIN
|
||||
PROMPT 2 15 "Utile esercizio econ. "
|
||||
HELP ""
|
||||
HELP "Codice del conto economico dell'utile d'esercizio"
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSUECEG GRUPPO
|
||||
@ -506,6 +527,7 @@ END
|
||||
NUMBER FLD_CSUECEC 3
|
||||
BEGIN
|
||||
PROMPT 33 15 ""
|
||||
HELP "Codice del conto economico dell'utile d'esercizio"
|
||||
COPY ALL FLD_CSUECEG
|
||||
FIELD CsUeCeC
|
||||
ADD RUN cg0 -0
|
||||
@ -513,6 +535,7 @@ END
|
||||
NUMBER FLD_CSUECES 6
|
||||
BEGIN
|
||||
PROMPT 40 15 ""
|
||||
HELP "Codice del conto economico dell'utile d'esercizio"
|
||||
COPY USE FLD_CSUECEG
|
||||
COPY INPUT FLD_CSUECEG
|
||||
COPY DISPLAY FLD_CSUECEG
|
||||
@ -528,7 +551,7 @@ END
|
||||
STRING FLD_DCSUECE 50 25
|
||||
BEGIN
|
||||
PROMPT 50 15 ""
|
||||
HELP ""
|
||||
HELP "Codice del conto economico dell'utile d'esercizio"
|
||||
COPY USE FLD_DCSBICH
|
||||
INPUT DESCR FLD_DCSUECE
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
@ -540,7 +563,7 @@ END
|
||||
NUMBER FLD_CSPECEG 3
|
||||
BEGIN
|
||||
PROMPT 2 16 "Perdita eserc. econ. "
|
||||
HELP ""
|
||||
HELP "Codice del conto economico della perdita d'esercizio"
|
||||
COPY USE FLD_CSBICHG
|
||||
COPY DISPLAY FLD_CSBICHG
|
||||
OUTPUT FLD_CSPECEG GRUPPO
|
||||
@ -556,6 +579,7 @@ END
|
||||
NUMBER FLD_CSPECEC 3
|
||||
BEGIN
|
||||
PROMPT 33 16 ""
|
||||
HELP "Codice del conto economico della perdita d'esercizio"
|
||||
COPY ALL FLD_CSPECEG
|
||||
FIELD CsPeCeC
|
||||
ADD RUN cg0 -0
|
||||
@ -563,6 +587,7 @@ END
|
||||
NUMBER FLD_CSPECES 6
|
||||
BEGIN
|
||||
PROMPT 40 16 ""
|
||||
HELP "Codice del conto economico della perdita d'esercizio"
|
||||
COPY USE FLD_CSPECEG
|
||||
COPY INPUT FLD_CSPECEG
|
||||
COPY DISPLAY FLD_CSPECEG
|
||||
@ -577,7 +602,7 @@ END
|
||||
STRING FLD_DCSPECE 50 25
|
||||
BEGIN
|
||||
PROMPT 50 16 ""
|
||||
HELP ""
|
||||
HELP "Codice del conto economico della perdita d'esercizio"
|
||||
USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
|
||||
INPUT DESCR FLD_DCSPECE
|
||||
COPY DISPLAY FLD_DCSBICH
|
||||
@ -601,22 +626,23 @@ END
|
||||
RADIOBUTTON LST_RRFRAM 16
|
||||
BEGIN
|
||||
PROMPT 3 2 ""
|
||||
HELP "Frequenza del calcolo dei ratei e risconti"
|
||||
ITEM "A|Freq. Annuale"
|
||||
ITEM "M|Freq. Mensile"
|
||||
HELP ""
|
||||
FIELD RrFrAm
|
||||
END
|
||||
|
||||
BOOLEAN CHK_RRMECO
|
||||
BEGIN
|
||||
PROMPT 26 3 "Mese Commerciale"
|
||||
HELP ""
|
||||
HELP "Indicare se viene utilizzato nel calcolo il mese commerciale"
|
||||
FIELD RrMeCo
|
||||
END
|
||||
|
||||
STRING FLD_RRCCRA 3
|
||||
BEGIN
|
||||
PROMPT 3 6 "Causale ratei "
|
||||
HELP "Codice causale dei ratei per movimento di contabilita'"
|
||||
FLAGS "U"
|
||||
USE LF_CAUSALI
|
||||
INPUT CODCAUS FLD_RRCCRA
|
||||
@ -631,6 +657,7 @@ END
|
||||
STRING FLD_DRRCCRA 50 48
|
||||
BEGIN
|
||||
PROMPT 26 6 ""
|
||||
HELP "Descrizione causale dei ratei per movimento di contabilita'"
|
||||
USE LF_CAUSALI KEY 2
|
||||
INPUT DESCR FLD_DRRCCRA
|
||||
COPY DISPLAY FLD_DCOCACH
|
||||
@ -642,6 +669,7 @@ END
|
||||
STRING FLD_RRCCRI 3
|
||||
BEGIN
|
||||
PROMPT 3 8 "Causale risconti "
|
||||
HELP "Codice causale dei risconti per movimento di contabilita'"
|
||||
FLAGS "U"
|
||||
COPY USE FLD_RRCCRA
|
||||
INPUT CODCAUS FLD_RRCCRI
|
||||
@ -656,6 +684,7 @@ END
|
||||
STRING FLD_DRRCCRI 50 48
|
||||
BEGIN
|
||||
PROMPT 26 8 ""
|
||||
HELP "Descrizione causale dei risconti per movimento di contabilita'"
|
||||
USE LF_CAUSALI KEY 2
|
||||
INPUT DESCR FLD_DRRCCRI
|
||||
COPY DISPLAY FLD_DCOCACH
|
||||
|
||||
@ -11,6 +11,7 @@ PAGE "Visualizzazione saldi" -1 -1 78 18
|
||||
NUMBER F_ANNO 4
|
||||
BEGIN
|
||||
PROMPT 4 1 "Anno esercizio "
|
||||
HELP "Anno d'esercizio a cui si riferiscono i saldi"
|
||||
KEY 1
|
||||
USE ESC
|
||||
CHECKTYPE NORMAL
|
||||
@ -30,6 +31,7 @@ END
|
||||
LIST F_TIPOCF 9
|
||||
BEGIN
|
||||
PROMPT 4 3 "Tipo "
|
||||
HELP "Tipo del conto da visualizzare"
|
||||
FLAGS "U"
|
||||
ITEM " |Conto" MESSAGE HIDE,2@|HIDE,3@|SHOW,1@
|
||||
ITEM "C|Cliente" MESSAGE HIDE,1@|HIDE,3@|SHOW,2@
|
||||
@ -40,6 +42,7 @@ END
|
||||
NUMBER F_GRUPPO 3
|
||||
BEGIN
|
||||
PROMPT 26 3 "Gruppo "
|
||||
HELP "Codice del conto da visualizzare"
|
||||
USE LF_PCON KEY 1 SELECT CONTO=""
|
||||
FIELD LF_PCON->GRUPPO
|
||||
KEY 1
|
||||
@ -54,6 +57,7 @@ END
|
||||
NUMBER F_CONTO 3
|
||||
BEGIN
|
||||
PROMPT 40 3 "Conto "
|
||||
HELP "Codice del conto da visualizzare"
|
||||
USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="")
|
||||
FIELD LF_PCON->CONTO
|
||||
KEY 1
|
||||
@ -77,6 +81,7 @@ END
|
||||
NUMBER F_CONTO_CLIENTE 3
|
||||
BEGIN
|
||||
PROMPT 40 3 "Conto "
|
||||
HELP "Codice del conto da visualizzare"
|
||||
USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="C")
|
||||
FIELD LF_PCON->CONTO
|
||||
KEY 1
|
||||
@ -100,6 +105,7 @@ END
|
||||
NUMBER F_CONTO_FORN 3
|
||||
BEGIN
|
||||
PROMPT 40 3 "Conto "
|
||||
HELP "Codice del conto da visualizzare"
|
||||
USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="") && (TMCF="F")
|
||||
FIELD LF_PCON->CONTO
|
||||
KEY 1
|
||||
@ -123,6 +129,7 @@ END
|
||||
NUMBER F_SOTTOCONTO 6
|
||||
BEGIN
|
||||
PROMPT 54 3 "Sottoconto "
|
||||
HELP "Codice del conto da visualizzare"
|
||||
USE LF_PCON SELECT SOTTOCONTO!=""
|
||||
FIELD LF_PCON->SOTTOCONTO
|
||||
KEY 1
|
||||
@ -152,6 +159,7 @@ END
|
||||
NUMBER F_SOTTOC_CLIENTE 6
|
||||
BEGIN
|
||||
PROMPT 54 3 "Cliente "
|
||||
HELP "Codice del conto da visualizzare"
|
||||
USE LF_CLIFO
|
||||
//FIELD LF_CLIFO->CODCF
|
||||
INPUT TIPOCF "C"
|
||||
@ -177,6 +185,7 @@ END
|
||||
NUMBER F_SOTTOC_FORN 6
|
||||
BEGIN
|
||||
PROMPT 54 3 "Fornitore "
|
||||
HELP "Codice del conto da visualizzare"
|
||||
USE LF_CLIFO
|
||||
INPUT TIPOCF "F"
|
||||
INPUT CODCF F_SOTTOC_FORN
|
||||
@ -201,6 +210,7 @@ END
|
||||
STRING F_DESCR_CONTO 50
|
||||
BEGIN
|
||||
PROMPT 4 4 "Descrizione "
|
||||
HELP "Descrizione del conto da visualizzare"
|
||||
USE LF_PCON KEY 2
|
||||
INPUT DESCR F_DESCR_CONTO
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
@ -216,6 +226,7 @@ END
|
||||
STRING F_DESCR_CLIENTE 50
|
||||
BEGIN
|
||||
PROMPT 4 4 "Cliente "
|
||||
HELP "Ragione sociale del cliente da visualizzare"
|
||||
USE LF_CLIFO KEY 2
|
||||
INPUT TIPOCF "C"
|
||||
INPUT RAGSOC F_DESCR_CLIENTE
|
||||
@ -232,6 +243,7 @@ END
|
||||
STRING F_DESCR_FORN 50
|
||||
BEGIN
|
||||
PROMPT 4 4 "Fornitore "
|
||||
HELP "Ragione sociale del fornitore da visualizzare"
|
||||
USE LF_CLIFO KEY 2
|
||||
INPUT TIPOCF "F"
|
||||
INPUT RAGSOC F_DESCR_FORN
|
||||
@ -276,12 +288,14 @@ PAGE "" -1 -1 70 16
|
||||
NUMBER 101 4
|
||||
BEGIN
|
||||
PROMPT 1 1 "Anno esercizio "
|
||||
HELP "Anno d'esercizio a cui si riferisce il saldo"
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
NUMBER 102 15
|
||||
BEGIN
|
||||
PROMPT 1 3 "Saldo Iniziale "
|
||||
HELP "Importo del saldo iniziale"
|
||||
FLAGS "R"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -289,11 +303,13 @@ END
|
||||
STRING 103 1
|
||||
BEGIN
|
||||
PROMPT 44 3 ""
|
||||
HELP "Sezione del saldo iniziale"
|
||||
END
|
||||
|
||||
NUMBER 104 15
|
||||
BEGIN
|
||||
PROMPT 1 4 "Progr.Attuali: Dare "
|
||||
HELP "Progressivo dare attuale del conto da visualizzare"
|
||||
FLAGS "R"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -301,6 +317,7 @@ END
|
||||
NUMBER 105 15
|
||||
BEGIN
|
||||
PROMPT 45 4 "Avere "
|
||||
HELP "Progressivo avere attuale del conto da visualizzare"
|
||||
FLAGS "R"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -308,6 +325,7 @@ END
|
||||
NUMBER 106 15
|
||||
BEGIN
|
||||
PROMPT 22 5 "Saldo "
|
||||
HELP "Saldo attuale del conto"
|
||||
FLAGS "R"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -315,11 +333,13 @@ END
|
||||
STRING 107 1
|
||||
BEGIN
|
||||
PROMPT 44 5 ""
|
||||
HELP "Sezione del saldo attuale del conto"
|
||||
END
|
||||
|
||||
NUMBER 108 15
|
||||
BEGIN
|
||||
PROMPT 1 6 "Progr.Mov.Eliminati: Dare "
|
||||
HELP "Progressivi dare attuali dei moviementi eliminati"
|
||||
FLAGS "R"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -327,6 +347,7 @@ END
|
||||
NUMBER 109 15
|
||||
BEGIN
|
||||
PROMPT 45 6 "Avere "
|
||||
HELP "Progressivi avere attuali dei moviementi eliminati"
|
||||
FLAGS "R"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -334,6 +355,7 @@ END
|
||||
NUMBER 110 15
|
||||
BEGIN
|
||||
PROMPT 1 7 "Saldo complessivo "
|
||||
HELP "Saldo complessivo attuale del conto"
|
||||
FLAGS "R"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -341,23 +363,27 @@ END
|
||||
STRING 111 1
|
||||
BEGIN
|
||||
PROMPT 44 7 ""
|
||||
HELP "Sezione del saldo attuale complessivo del conto"
|
||||
END
|
||||
|
||||
DATE 112
|
||||
BEGIN
|
||||
PROMPT 1 8 "Ultima data operazione "
|
||||
HELP "Ultima data di registrazione che ha movimentato il conto"
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
NUMBER 113 7
|
||||
BEGIN
|
||||
PROMPT 1 9 "Ultimo numero operazione "
|
||||
HELP "Ultimo numero di registrazione che ha movimentato il conto"
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
NUMBER 114 15
|
||||
BEGIN
|
||||
PROMPT 1 10 "Progr.Mov.Provvisori: Dare "
|
||||
HELP "Progressivi dare attuali dei moviementi provvisori"
|
||||
FLAGS "R"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -365,6 +391,7 @@ END
|
||||
NUMBER 115 15
|
||||
BEGIN
|
||||
PROMPT 45 10 "Avere "
|
||||
HELP "Progressivi avere attuali dei moviementi provvisori del conto"
|
||||
FLAGS "R"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -372,6 +399,7 @@ END
|
||||
NUMBER 116 15
|
||||
BEGIN
|
||||
PROMPT 1 11 "Saldo "
|
||||
HELP "Saldo dei progressivi dei movimenti provvisori del conto"
|
||||
FLAGS "R"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -379,6 +407,7 @@ END
|
||||
STRING 117 1
|
||||
BEGIN
|
||||
PROMPT 44 11 ""
|
||||
HELP "Sezione del saldo progressivi dei moviemnti provvisori del conto"
|
||||
END
|
||||
|
||||
BUTTON DLG_OK 9 2
|
||||
|
||||
361
cg/cg5300a.uml
361
cg/cg5300a.uml
@ -1,176 +1,185 @@
|
||||
#include "cg5300a.h"
|
||||
TOOLBAR "" 0 20 0 2
|
||||
|
||||
#include <toolbar.h>
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Parametri liquidazione" -1 -1 78 15
|
||||
|
||||
GROUPBOX DLG_NULL 71 3
|
||||
BEGIN
|
||||
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
|
||||
END
|
||||
|
||||
STRING F_RAGSOC 50
|
||||
BEGIN
|
||||
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
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 71 5
|
||||
BEGIN
|
||||
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
|
||||
END
|
||||
|
||||
NUMBER F_CRED_PREC 15 0
|
||||
BEGIN
|
||||
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"
|
||||
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"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
|
||||
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
|
||||
END
|
||||
|
||||
STRING F_DESATT 50 30
|
||||
BEGIN
|
||||
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"
|
||||
END
|
||||
|
||||
NUMBER F_PRORATA 6 2
|
||||
BEGIN
|
||||
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
|
||||
END
|
||||
|
||||
NUMBER F_P8B 15
|
||||
BEGIN
|
||||
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
|
||||
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 "cg5300a.h"
|
||||
TOOLBAR "" 0 20 0 2
|
||||
|
||||
#include <toolbar.h>
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Parametri liquidazione" -1 -1 78 15
|
||||
|
||||
GROUPBOX DLG_NULL 71 3
|
||||
BEGIN
|
||||
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
|
||||
END
|
||||
|
||||
STRING F_RAGSOC 50
|
||||
BEGIN
|
||||
PROMPT 20 1 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
NUMBER F_YEAR 4
|
||||
BEGIN
|
||||
PROMPT 6 3 "Anno "
|
||||
HELP "Anno d'esercizio ??????"
|
||||
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"
|
||||
END
|
||||
|
||||
LIST F_FREQ_VERS 14
|
||||
BEGIN
|
||||
PROMPT 6 5 "Frequenza versamenti "
|
||||
HELP "Indicare la frequenza dei versamenti delle liquidazioni IVA"
|
||||
ITEM "M|Mensile"
|
||||
ITEM "T|Trimestrale"
|
||||
FIELD LIA->S7
|
||||
END
|
||||
|
||||
NUMBER F_CRED_PREC 15 0
|
||||
BEGIN
|
||||
PROMPT 6 6 "Credito precedente "
|
||||
HELP "Eventuale credito di imposta dell'anno precedente"
|
||||
FIELD LIA->R0
|
||||
PICTURE "."
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
NUMBER F_CRED_COST 15 0
|
||||
BEGIN
|
||||
PROMPT 6 7 "Credito di costo "
|
||||
HELP "Eventuale crediti—o di costo dell'anno precedente"
|
||||
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"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
|
||||
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
|
||||
END
|
||||
|
||||
STRING F_DESATT 50 30
|
||||
BEGIN
|
||||
PROMPT 31 1 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
LIST F_TIPOATT 26
|
||||
BEGIN
|
||||
PROMPT 4 3 "Tipo "
|
||||
HELP "Tipo di attivita' a della ditta"
|
||||
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 "
|
||||
HELP "Percentuale di 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 "
|
||||
HELP "?????????????"
|
||||
PICTURE "."
|
||||
FLAGS "R"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
NUMBER F_P8B 15
|
||||
BEGIN
|
||||
PROMPT 4 9 "Plafond art. 8b "
|
||||
HELP "????????????"
|
||||
PICTURE "."
|
||||
FLAGS "R"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
NUMBER F_P9 15
|
||||
BEGIN
|
||||
PROMPT 4 11 "Plafond art. 9 "
|
||||
HELP "?????????????"
|
||||
PICTURE "."
|
||||
FLAGS "R"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
|
||||
BUTTON DLG_OK 9 2
|
||||
BEGIN
|
||||
PROMPT -13 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_NULL 9 2
|
||||
BEGIN
|
||||
PROMPT -23 -1 "Azzera"
|
||||
MESSAGE RESET,1@
|
||||
END
|
||||
|
||||
BUTTON DLG_CANCEL 9 2
|
||||
BEGIN
|
||||
PROMPT -33 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user