root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : 12.00 140

Browse Source 
Files correlati     : ve010.exe fp010.exe
Commento                :
Invio ritente e casse previdenziali
This commit is contained in:
Alessandro Bonazzi 2026-03-24 17:14:39 +01:00
parent 7b4cbdbeba
commit f5c520de78
1 changed files with 33 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

62
src/ve/vetbspp.uml
View File

@ -332,16 +332,20 @@ END
LIST SPP_TIPORIT 4 37 LIST SPP_TIPORIT 4 37
BEGIN BEGIN
PROMPT 2 19 "Tipo Ritenuta " PROMPT 2 20 "Tipo Ritenuta "
FIELD S13[1,4] FIELD S13[1,4]
ITEM "|" ITEM "|"
ITEM "RT01|RT01 - Ritenuta persone fisiche" ITEM "RT01|Ritenuta persone fisiche"
ITEM "RT02|RT02 - Ritenuta persone giuridiche" ITEM "RT02|Ritenuta persone giuridiche"
ITEM "RT03|contributo INPS"
ITEM "RT04|contributo ENASARCO"
ITEM "RT05|contributo ENPAM"
ITEM "RT06|altro contributo previdenziale"
END END
LISTBOX SPP_TIPOCAS 64 LISTBOX SPP_TIPOCAS 64
BEGIN BEGIN
PROMPT 2 19 "Tipo Cassa " PROMPT 2 20 "Tipo Cassa "
ITEM " | " ITEM " | "
ITEM "TC01|Cassa avvocati e procuratori legali" ITEM "TC01|Cassa avvocati e procuratori legali"
ITEM "TC02|Cassa dottori commercialisti" ITEM "TC02|Cassa dottori commercialisti"
@ -369,9 +373,9 @@ BEGIN
FLAGS "D" FLAGS "D"
END END
LIST SPP_TIPOSP 1 20 LIST SPP_TIPOSP 1 10
BEGIN BEGIN
PROMPT 2 20 "Tipologia di spesa/prestazione " PROMPT 2 21 "Tipo di spesa/prestazione "
FIELD S11[1,1] FIELD S11[1,1]
ITEM " |Altro" ITEM " |Altro"
ITEM "I|Incasso" ITEM "I|Incasso"
@ -379,9 +383,25 @@ BEGIN
ITEM "T|Trasporto" ITEM "T|Trasporto"
END END
BOOLEAN SPP_SOGGRIT
BEGIN
PROMPT 42 21 "Soggetto a ritenuta"
FLAGS "D"
FIELD B0
GROUP 4
END
BOOLEAN SPP_CALCRIT
BEGIN
PROMPT 64 21 "Soggetto al calcolo rit."
FLAGS "D"
FIELD B1
GROUP 4
END
STRING SPP_CODTRB 4 STRING SPP_CODTRB 4
BEGIN BEGIN
PROMPT 2 21 "Cod. tributo " PROMPT 2 22 "Cod. tributo "
FIELD S10 FIELD S10
FLAG "U" FLAG "U"
USE %TRB USE %TRB
@ -395,9 +415,9 @@ END
STRING SPP_CODTRB1 50 22 STRING SPP_CODTRB1 50 22
BEGIN BEGIN
PROMPT 25 21 "" PROMPT 25 22 ""
USE %TRB KEY 2 USE %TRB KEY 2
INPUT S0 SPP_CODTRB1 INPUT S0 SPP_CODTRB1
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
DISPLAY "Codice " CODTAB DISPLAY "Codice " CODTAB
OUTPUT SPP_CODTRB CODTAB OUTPUT SPP_CODTRB CODTAB
@ -407,7 +427,7 @@ END
NUMBER SPP_CODCAUS770 2 NUMBER SPP_CODCAUS770 2
BEGIN BEGIN
PROMPT 2 22 "Caus. 770 " PROMPT 2 23 "Caus. 770 "
USE %CA7 SELECT I0==#SPP_CODTRB USE %CA7 SELECT I0==#SPP_CODTRB
INPUT CODTAB SPP_CODCAUS770 INPUT CODTAB SPP_CODCAUS770
DISPLAY "Cod.caus." CODTAB DISPLAY "Cod.caus." CODTAB
@ -424,7 +444,7 @@ END
LISTBOX SPP_CODQUA 2 10 LISTBOX SPP_CODQUA 2 10
BEGIN BEGIN
PROMPT 20 22 "Quadro " PROMPT 20 23 "Quadro "
HELP "Inserire il codice quadro" HELP "Inserire il codice quadro"
ITEM "|" MESSAGE CLEAR,SPP_CAUSD ITEM "|" MESSAGE CLEAR,SPP_CAUSD
ITEM "LA|Quadro LA" MESSAGE ENABLE,SPP_CAUSD ITEM "LA|Quadro LA" MESSAGE ENABLE,SPP_CAUSD
@ -436,7 +456,7 @@ END
STRING SPP_CAUSD 2 STRING SPP_CAUSD 2
BEGIN BEGIN
PROMPT 50 22 "Causale LA " PROMPT 50 23 "Causale LA "
FLAGS "U" FLAGS "U"
SHEET "Codice|Descrizione@320" SHEET "Codice|Descrizione@320"
INPUT SPP_CAUSD INPUT SPP_CAUSD
@ -480,28 +500,12 @@ END
LISTBOX SPP_SEZIONE 6 LISTBOX SPP_SEZIONE 6
BEGIN BEGIN
PROMPT 70 22 "Sezione per cooperative " PROMPT 70 23 "Sezione per cooperative "
FIELD S11[5,5] FIELD S11[5,5]
ITEM "D|Dare" ITEM "D|Dare"
ITEM "A|Avere" ITEM "A|Avere"
END END
BOOLEAN SPP_SOGGRIT
BEGIN
PROMPT 40 23 "Soggetto a ritenuta"
FLAGS "D"
FIELD B0
GROUP 4
END
BOOLEAN SPP_CALCRIT
BEGIN
PROMPT 65 23 "Soggetto al calcolo rit."
FLAGS "D"
FIELD B1
GROUP 4
END
ENDPAGE ENDPAGE
PAGE "Analitica" 11 60 14 PAGE "Analitica" 11 60 14