206 lines
4.3 KiB
Plaintext
Executable File
206 lines
4.3 KiB
Plaintext
Executable File
#include "cg5000a.h"
|
|
|
|
/* toolbar */
|
|
TOOLBAR "" 0 20 0 2
|
|
|
|
BUTTON DLG_OK 10 2
|
|
BEGIN
|
|
PROMPT -12 -1 ""
|
|
END
|
|
|
|
BUTTON DLG_QUIT 10 2
|
|
BEGIN
|
|
PROMPT -22 -1 ""
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
PAGE "Parametri contabilita' studio" -1 -1 76 17
|
|
|
|
GROUPBOX DLG_NULL 74 12
|
|
BEGIN
|
|
PROMPT 1 1 "Parametri IVA"
|
|
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"
|
|
WARNIG "Codice ABI errato"
|
|
USE %BAN
|
|
INPUT CODTAB[1,5] FLD_CODABI
|
|
INPUT CODTAB[6,10] FLD_CODCAB
|
|
DISPLAY "ABI@5" CODTAB[1,5]
|
|
DISPLAY "CAB@5" CODTAB[6,10]
|
|
DISPLAY "Denominazione@50" S0
|
|
OUTPUT FLD_CODABI CODTAB[1,5]
|
|
OUTPUT FLD_CODCAB CODTAB[6,10]
|
|
OUTPUT FLD_RAGSOCB S0
|
|
FIELD CodABI
|
|
CHECKTYPE NORMAL
|
|
FLAGS "Z"
|
|
END
|
|
|
|
NUMBER FLD_CODCAB 5
|
|
BEGIN
|
|
PROMPT 60 2 "CAB "
|
|
HELP "Codice CAB banca di appoggio per deleghe IVA"
|
|
WARNIG "Codice CAB errato"
|
|
COPY ALL FLD_CODABI
|
|
CHECKTYPE NORMAL
|
|
FIELD CodCAB
|
|
FLAGS "Z"
|
|
VALIDATE REQIF_FUNC 1 FLD_CODABI
|
|
END
|
|
|
|
STRING FLD_RAGSOCB 50
|
|
BEGIN
|
|
PROMPT 3 3 "Denominazione "
|
|
FLAGS "D"
|
|
END
|
|
|
|
BOOLEAN CHK_SIND11
|
|
BEGIN
|
|
PROMPT 3 5 "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
|
|
|
|
BOOLEAN CHK_RICACQ
|
|
BEGIN
|
|
PROMPT 3 6 "Ricalcolo imposte acquisti per rivendita "
|
|
HELP "Indicare se attivare il calcolo IVA acquisti per rivendita nel calcolo ventilazione"
|
|
FIELD RicAcq
|
|
END
|
|
|
|
TEXT DLG_NULL
|
|
BEGIN
|
|
PROMPT -11 7 "Interessi liquidazioni trimestrali"
|
|
END
|
|
|
|
NUMBER FLD_INTR0 5 2
|
|
BEGIN
|
|
PROMPT 3 8 "I "
|
|
HELP "Tasso del primo trimestre da applicare per gli interessi su versamenti IVA"
|
|
FLAGS "R"
|
|
FIELD InTr(0)
|
|
END
|
|
|
|
NUMBER FLD_INTR1 5 2
|
|
BEGIN
|
|
PROMPT 20 8 "II "
|
|
HELP "Tasso del secondo trimestre da applicare per gli interessi su versamenti IVA"
|
|
FLAGS "R"
|
|
FIELD InTr(1)
|
|
END
|
|
|
|
NUMBER FLD_INTR2 5 2
|
|
BEGIN
|
|
PROMPT 40 8 "III "
|
|
HELP "Tasso del terzo trimestre da applicare per gli interessi su versamenti IVA"
|
|
FLAGS "R"
|
|
FIELD InTr(2)
|
|
END
|
|
|
|
NUMBER FLD_INTR3 5 2
|
|
BEGIN
|
|
PROMPT 60 8 "IV "
|
|
HELP "Tasso del quarto trimestre da applicare per gli interessi su versamenti IVA"
|
|
FLAGS "R"
|
|
FIELD InTr(3)
|
|
END
|
|
|
|
STRING FLD_CODAGV 4
|
|
BEGIN
|
|
PROMPT 3 10 "Codice IVA per ricavi misti agenzie di viaggio "
|
|
HELP "Codice IVA per scorporo operazioni con l'esetero per agenzie di viaggio"
|
|
WARNIG "Codice IVA errato"
|
|
USE %IVA
|
|
FLAGS "U"
|
|
INPUT CODTAB FLD_CODAGV
|
|
DISPLAY "Codice" CODTAB
|
|
DISPLAY "Descrizione@50" S0
|
|
DISPLAY "Tipo" S1
|
|
DISPLAY "%@5" R0
|
|
DISPLAY "Vent." S6
|
|
DISPLAY "Sospeso" B2
|
|
OUTPUT FLD_CODAGV CODTAB
|
|
OUTPUT FLD_DESAGV S0
|
|
CHECKTYPE NORMAL
|
|
FIELD CodAgv
|
|
VALIDATE ZEROFILL_FUNC 2
|
|
END
|
|
|
|
STRING FLD_DESAGV 50
|
|
BEGIN
|
|
PROMPT 3 11 "Descrizione "
|
|
USE %IVA KEY 2
|
|
INPUT S0 FLD_DESAGV
|
|
DISPLAY "Descrizione@50" S0
|
|
DISPLAY "Codice" CODTAB
|
|
DISPLAY "Tipo" S1
|
|
DISPLAY "%@5" R0
|
|
DISPLAY "Vent." S6
|
|
DISPLAY "Sospeso" B2
|
|
COPY OUTPUT FLD_CODAGV
|
|
CHECKTYPE NORMAL
|
|
END
|
|
|
|
GROUPBOX DLG_NULL 74 4
|
|
BEGIN
|
|
PROMPT 1 13 "Stampa registri"
|
|
END
|
|
|
|
BOOLEAN CHK_STIREG
|
|
BEGIN
|
|
PROMPT 3 14 "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 15 "Non stampare la data di operazione sui registri IVA"
|
|
HELP "Indicare se non stampoare la data dell'operazione sui registri IVA"
|
|
FIELD NoDtRg
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
PAGE "Parametri contabilita' studio" -1 -1 76 17
|
|
|
|
GROUPBOX DLG_NULL 74 4
|
|
BEGIN
|
|
PROMPT 1 1 "Prima nota"
|
|
END
|
|
|
|
BOOLEAN CHK_POCUDR
|
|
BEGIN
|
|
PROMPT 3 2 "Posizionare cursore sulla data di operazione in immissione"
|
|
HELP "Determina il posizionamento automatico del cursore sulla data di operazione invece che sulla causale"
|
|
FIELD PoCuDr
|
|
END
|
|
|
|
BOOLEAN CHK_21SAVENEW
|
|
BEGIN
|
|
PROMPT 3 3 "Rimanere in modifica dopo la registrazione di un documento"
|
|
HELP "Dopo aver effettuato una registrazione rimane in modifica dello stesso documento invece di passare all'inserimento di uno nuovo"
|
|
FIELD Cg21SN
|
|
END
|
|
|
|
GROUPBOX DLG_NULL 74 3
|
|
BEGIN
|
|
PROMPT 1 5 "Anagrafica Clienti/Fornitori"
|
|
END
|
|
|
|
BOOLEAN CHK_02SAVENEW
|
|
BEGIN
|
|
PROMPT 3 6 "Rimanere in modifica dopo la registrazione di un cliente/fornitore"
|
|
HELP "Dopo aver effettuato una registrazione rimane in modifica della stessa anagrafica invece di passare all'inserimento di una nuova"
|
|
FIELD Cg02SN
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
ENDMASK
|