campo-sirio/ba/batbiva.uml
guy f6ae549c3b Patch level : 10.0
Files correlati     : batbsta.msk batbiva.msk
Ricompilazione Demo : [ ]
Commento            :
Aggiunti alla tabella stata i codici ISTAT e UNICO
Tolta da tabella IVA la distinzione tra beni  e servizi


git-svn-id: svn://10.65.10.50/branches/R_10_00@22531 c028cbd2-c16b-5b4b-a496-9718f37d4682
2011-12-23 10:14:40 +00:00

273 lines
6.8 KiB
Plaintext
Executable File

#include "batbiva.h"
TOOLBAR "topbar" 0 0 0 2
#include <relapbar.h>
ENDPAGE
PAGE "Codici IVA" -1 -1 78 19
STRING FLD_TABIVA_CODTAB 4
BEGIN
PROMPT 2 1 "Codice "
FIELD CODTAB
KEY 1
USE %IVA
FLAGS "U"
INPUT CODTAB FLD_TABIVA_CODTAB
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
DISPLAY "Tipo" S1
DISPLAY "%@5" R0
DISPLAY "Vent." S6
DISPLAY "Sospeso" B2
OUTPUT FLD_TABIVA_CODTAB CODTAB
OUTPUT FLD_TABIVA_S0 S0
HELP "Inserire il codice IVA"
CHECKTYPE REQUIRED
VALIDATE ZEROFILL_FUNC 2
END
STRING FLD_TABIVA_S0 50
BEGIN
PROMPT 25 1 ""
FIELD S0
KEY 2
USE %IVA KEY 2
INPUT S0 FLD_TABIVA_S0
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
DISPLAY "Tipo" S1
DISPLAY "%@5" R0
DISPLAY "Vent." S6
DISPLAY "Sospeso" B2
COPY OUTPUT FLD_TABIVA_CODTAB
HELP "Inserire la descrizione del codice IVA"
CHECKTYPE REQUIRED
WARNING "Manca la descrizione"
END
LIST LST_TABIVA_S1 2 20
BEGIN
PROMPT 2 2 "Tipo "
FIELD S1
HELP "Indicare il tipo di codice IVA"
ITEM " |Regime IVA normale"
MESSAGE ENABLE,FLD_TABIVA_R0|CLEAR,FLD_TABIVA_I0
MESSAGE CLEAR,FLD_TABIVA_I3|CLEAR,FLD_TABIVA_I4
MESSAGE ENABLE,FLD_TABIVA_S6
ITEM "VE|Ricavi da ventilare"
MESSAGE CLEAR,FLD_TABIVA_R0|CLEAR,FLD_TABIVA_I0|CLEAR,FLD_TABIVA_I3
MESSAGE CLEAR,FLD_TABIVA_I4|CLEAR,FLD_TABIVA_S6
ITEM "ES|Operazioni esenti"
MESSAGE CLEAR,FLD_TABIVA_R0|CLEAR,FLD_TABIVA_I0
MESSAGE ENABLE,FLD_TABIVA_I3|ENABLE,FLD_TABIVA_I4
MESSAGE ENABLE,FLD_TABIVA_S6
ITEM "NI|Non imponibili"
MESSAGE CLEAR,FLD_TABIVA_R0|ENABLE,FLD_TABIVA_I0
MESSAGE ENABLE,FLD_TABIVA_I3|ENABLE,FLD_TABIVA_I4
MESSAGE ENABLE,FLD_TABIVA_S6
ITEM "NS|Non soggetti"
MESSAGE CLEAR,FLD_TABIVA_R0|CLEAR,FLD_TABIVA_I0
MESSAGE ENABLE,FLD_TABIVA_I3|ENABLE,FLD_TABIVA_I4
MESSAGE ENABLE,FLD_TABIVA_S6
END
STRING FLD_TABIVA_S6 4
BEGIN
PROMPT 39 2 "C.IVA a cui ventilare "
FLAGS "U"
FIELD S6
COPY USE FLD_TABIVA_CODTAB
INPUT CODTAB FLD_TABIVA_S6
COPY DISPLAY FLD_TABIVA_CODTAB
OUTPUT FLD_TABIVA_S6 CODTAB
CHECKTYPE NORMAL
VALIDATE ZEROFILL_FUNC 2
HELP "Inserire il codice iva a cui ventilare l'imposta"
ADD NONE
END
NUMBER FLD_TABIVA_R0 6 2
BEGIN
PROMPT 2 3 "Aliquota "
FIELD R0
HELP "Inserire la percentuale di imposta"
WARNING "Deve essere specificato almeno uno dei campi seguenti: aliquota, tipo, codice a cui ventilare"
VALIDATE ONEREQ_FUNC 3 FLD_TABIVA_R0 FLD_TABIVA_S6 LST_TABIVA_S1
END
NUMBER FLD_TABIVA_I0 2
BEGIN
PROMPT 39 3 "Perc.IVA teorica "
FIELD I0
HELP "Inserire la percentuale teorica dell'imposta"
END
GROUPBOX DLG_NULL 78 4
BEGIN
PROMPT 1 5 "@bComunicazione operazioni rilevanti ai fini dell'IVA"
END
LIST FLD_TABIVA_S7 1 35
BEGIN
PROMPT 2 6 "Cessioni "
FIELD S7
ITEM " |Non rilevante"
ITEM "1|1 - Imponibile"
ITEM "2|2 - Non imponibile"
ITEM "3|3 - Esente"
ITEM "4|4 - IVA non esposta in fattura"
ITEM "5|5 - Imponibile con IVA a Margine"
END
LIST FLD_TABIVA_S8 1 35
BEGIN
PROMPT 2 7 "Acquisti "
FIELD S8
ITEM " |Non rilevante"
ITEM "1|1 - Imponibile"
ITEM "2|2 - Non imponibile"
ITEM "3|3 - Esente"
ITEM "4|4 - IVA non esposta in fattura"
ITEM "5|5 - Imponibile con IVA a Margine"
END
/* Reso obsoleto da ultime specifiche Spesometro di Settembre 2011
RADIOBUTTON CHK_SERVIZI 20
BEGIN
PROMPT 59 6 "Cessione / Acquisto"
ITEM " |Beni"
ITEM "X|Servizi"
FLAGS "Z"
FIELD B5
END
*/
STRING FLD_TABIVA_I3 3
BEGIN
PROMPT 3 10 "Riga vendite IVA11 per op.esenti e non imp. "
FIELD S2
HELP "Indicare il codice riga per operazioni di vendita es. e non imp. del mod.101"
SHEET "Riga@4|Descrizione@70"
INPUT FLD_TABIVA_I3
OUTPUT FLD_TABIVA_I3
ITEM " |Nessuno"
ITEM "20|Operazioni non imponibili (comma 1, artt.8, 8bis e 9)"
ITEM "21|Operazioni non imponibili a seguito di dich. d'intento"
ITEM "22|Altre operazioni non imponibili"
ITEM "24|Operazioni non soggette (art. 74 comma 7)"
ITEM "25|Op. non sogg. effettuate nei confronti di terremotati"
ITEM "B1|Ammontare op. es. escluse da nr. 1 a 9 e 11 art. 10"
ITEM "B2|Ammontare op. es. di cui al nr. 11 art. 10"
ITEM "B3|Ammontare op. es. di cui ai nr. 1 a 9 art. 10"
ITEM "B4|Ammontare op. es. di cui all'art 10 nr. 27 quinquies"
ITEM "G7A|Cessioni intracomunitarie non imponibili"
ITEM "G7B|Prestazioni di servizi non soggette all'imposta"
END
STRING FLD_TABIVA_I4 3
BEGIN
PROMPT 3 11 "Riga acquisti IVA11 per op.esenti e non imp. "
FIELD S9
SHEET "Riga|Descrizione@60"
INPUT FLD_TABIVA_I4
OUTPUT FLD_TABIVA_I4
ITEM " |Nessuno"
ITEM "12|Acquisti non imponibili (comma 2, artt8, 8bis e 9)"
ITEM "13|Altri acquisti non imponibili"
ITEM "14|Acquisti esenti"
ITEM "15|Acquisti non soggetti (art. 74 comma 7)"
ITEM "16|Acquisti non soggetti all'imposta effettuati dai terremotati"
END
STRING FLD_TABIVA_S10 4
BEGIN
PROMPT 3 12 "Operazioni attive in comunicazione annuale dati IVA "
FIELD S10
FLAGS "U"
SHEET "Riga|Descrizione@60"
INPUT FLD_TABIVA_S10
ITEM "|Nessuna"
ITEM "CD11|Totale operazioni attive (al netto dell'IVA)"
ITEM "CD12|Operazioni non imponibili"
ITEM "CD13|Operazioni esenti"
ITEM "CD14|Cessioni intracomunitarie di beni"
OUTPUT FLD_TABIVA_S10
END
STRING FLD_TABIVA_S11 4
BEGIN
PROMPT 3 13 "Operazioni passive in comunicazione annuale dati IVA "
FIELD S11
FLAGS "U"
SHEET "Riga|Descrizione@60"
INPUT FLD_TABIVA_S11
ITEM "|Nessuna"
ITEM "CD21|Totale operazioni passive (al netto dell'IVA)"
ITEM "CD22|Operazioni non imponibili"
ITEM "CD23|Operazioni esenti"
ITEM "CD24|Acquisti intracomunitari di beni"
ITEM "CD31|Importazioni di oro industriale ed argento puro senza pagamento dell'IVA in dogana"
ITEM "CD33|Rottami e altri materiali di recupero"
OUTPUT FLD_TABIVA_S11
END
LIST LST_TABIVA_S3 1 31
BEGIN
PROMPT 3 14 "Gestione plafond "
FIELD S3
HELP "Indicare il tipo di gestione di plafond"
ITEM " |Regime normale"
ITEM "1|Oper. relative art.8"
ITEM "2|Oper. relative art.8bis"
ITEM "3|Oper. relative art.9"
END
LIST LST_TABIVA_S4 1 43
BEGIN
PROMPT 3 15 "Regime agricolo "
FIELD S4
HELP "Indicare il tipo di gestione per regime agricolo"
ITEM " |Regime normale"
ITEM "1|Vendite regime agricolo"
ITEM "2|Vendite accessorie/Acquisti non agricoli"
ITEM "3|Acquisti ad uso promiscuo"
END
LIST LST_TABIVA_S5 1 31
BEGIN
PROMPT 3 16 "Ag. viaggio/turismo "
FIELD S5
HELP "Indicare il tipo di gestione per agenzie viaggio/turismo"
ITEM " |Regime normale"
ITEM "1|Operazioni interno CEE"
ITEM "2|Operazioni fuori CEE"
ITEM "3|Vendite miste CEE"
ITEM "4|Acquisti misti parte CEE"
ITEM "5|Acquisti misti parte fuori CEE"
END
BOOLEAN CHK_TABIVA_B4
BEGIN
PROMPT 3 17 "Escluso dal calcolo rimborso per aliquota media"
FIELD B4
END
BOOLEAN CHK_TABIVA_S9
BEGIN
PROMPT 3 18 "Codice per calcolo rimborso infrannuale"
FIELD B3
END
BOOLEAN FLD_SOSPESO_B2
BEGIN
PROMPT 3 21 "Codice IVA sospeso"
FIELD B2
END
ENDPAGE
ENDMASK