bolivacf: modificate alcune posizioni di stampa, aggiunti gli asterischi

prima e dopo la stampa degli importi (sia in cifre che in lettere,
  vedi modifica 95/42), corretti i troncamenti di ragione sociale.
  Aggiunta stampa della data e luogo di costituzione nel caso di
  persona giuridica.
disivacf: aggiunto il campo per il codice tributo. Corrette alcune
  posizioni di stampa
disgen,
disirg: completata la stampa per il codice contribuente e coniuge. In
  disgen aggiunta la stampa del codice centro di servizio (modificato
  anche ba2400.cpp)
deliircf,
disiircf: aggiunta la stampa dei 3 codici tributo imposte sostitutive.
 In tutti i profili conto fiscale + disgen e' stata aggiunta la stampa
 del luogo e la data di costituzione in caso di persona giuridica


git-svn-id: svn://10.65.10.50/trunk@1976 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1995-10-18 11:46:35 +00:00
parent f6a1dbffe5
commit 8c1d56f1a4
8 changed files with 370 additions and 141 deletions

View File

@ -2,9 +2,11 @@ USE %DEL
JOIN 9 INTO CODDITTA=CODTAB[1,5]
JOIN 6 TO 9 INTO TIPOA=TIPOA CODANAGR=CODANAGR
JOIN 8 TO 9 INTO CODANAGR=CODANAGR
JOIN 7 TO 9 INTO CODANAGR=CODANAGR
JOIN 13 TO 8 ALIAS 113 INTO COM=COMNASC
JOIN 13 TO 6 ALIAS 213 INTO COM=COMRF(COMRES)
JOIN %UCC TO 213@ ALIAS 14 INTO CODTAB==UFFCONC
JOIN 13 TO 7 ALIAS 413 INTO COM=COMCOST
END
DESCRIPTION
@ -63,42 +65,50 @@ BEGIN
KEY "TOTALE (in alto)"
PROMPT 34 2 ""
GROUP 10
PICTURE "###.###.###^^^"
PICTURE "(*)###.###.###^^^"
END
NUMERO 6
NUMERO 6 44 1
BEGIN
KEY "TOTALE (in lettere)"
PROMPT 5 3 ""
GROUP 10
PICTURE "LETTERE"
PICTURE "(*,*)LETTERE"
END
STRINGA 7
BEGIN
KEY "sul C/C n."
PROMPT 8 4 ""
PROMPT 9 4 ""
FIELD 14@->S5
END
STRINGA 8
BEGIN
KEY "Concessione di"
PROMPT 11 5 ""
PROMPT 13 5 ""
FIELD 14@->S0
END
LISTA 34
BEGIN
KEY "Tipo anagrafica"
FIELD 6->TIPOA
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
END
STRINGA 9
BEGIN
KEY "Eseguito da"
KEY "Eseguito da (PG)"
PROMPT 9 6 ""
GROUP 2
FIELD 6->RAGSOC[1,22]
FIELD 6->RAGSOC[1,38]
END
STRINGA 10
BEGIN
KEY "Eseguito da (PRIMA PARTE)"
KEY "Eseguito da (PF PRIMA PARTE)"
GROUP 1
MESSAGE COPY,527
FIELD 6->RAGSOC[1,22]
@ -106,7 +116,7 @@ END
STRINGA 11
BEGIN
KEY "Eseguito da (SECONDA PARTE)"
KEY "Eseguito da (PF SECONDA PARTE)"
GROUP 1
MESSAGE APPEND,527
FIELD 6->RAGSOC[31,50]
@ -114,7 +124,7 @@ END
STRINGA 527
BEGIN
KEY "Eseguito da (COMPLETO)"
KEY "Eseguito da (PF COMPLETO)"
PROMPT 9 6 ""
GROUP 1
END
@ -166,14 +176,14 @@ END
STRINGA 19
BEGIN
KEY "DOMICILIO FISCALE: Provincia"
PROMPT 43 20 ""
PROMPT 44 20 ""
FIELD 213@->PROVCOM
END
STRINGA 20
BEGIN
KEY "DOMICILIO FISCALE: VIA"
PROMPT 4 22 ""
PROMPT 5 22 ""
FIELD 6->INDRF
FIELD 6->INDRES
END
@ -194,7 +204,7 @@ END
NUMERO 15
BEGIN
KEY "IMPORTO TRIBUTO"
PROMPT 58 13 ""
PROMPT 57 13 ""
PICTURE "###.###.###^^^"
FIELD R0
END
@ -210,7 +220,7 @@ END
NUMERO 17
BEGIN
KEY "TOTALE (in basso)"
PROMPT 90 13 ""
PROMPT 88 13 ""
GROUP 10
PICTURE "###.###.###^^^"
END
@ -218,17 +228,17 @@ END
NUMERO 18
BEGIN
KEY "TOTALE (in alto)"
PROMPT 90 2 ""
PROMPT 89 2 ""
GROUP 10
PICTURE "###.###.###^^^"
PICTURE "(*)###.###.###^^^"
END
NUMERO 19
NUMERO 19 44 1
BEGIN
KEY "TOTALE (in lettere)"
PROMPT 62 3 ""
PROMPT 60 3 ""
GROUP 10
PICTURE "LETTERE"
PICTURE "(*,*)LETTERE"
END
STRINGA 20
@ -247,15 +257,15 @@ END
STRINGA 22
BEGIN
KEY "Eseguito da"
PROMPT 66 6 ""
KEY "Eseguito da (PG)"
PROMPT 64 6 ""
GROUP 2
FIELD 6->RAGSOC[1,22]
FIELD 6->RAGSOC[1,38]
END
STRINGA 31
BEGIN
KEY "Eseguito da (PRIMA PARTE)"
KEY "Eseguito da (PF PRIMA PARTE)"
GROUP 1
MESSAGE COPY,528
FIELD 6->RAGSOC[1,22]
@ -263,7 +273,7 @@ END
STRINGA 32
BEGIN
KEY "Eseguito da (SECONDA PARTE)"
KEY "Eseguito da (PF SECONDA PARTE)"
GROUP 1
MESSAGE APPEND,528
FIELD 6->RAGSOC[31,50]
@ -271,8 +281,8 @@ END
STRINGA 528
BEGIN
KEY "Eseguito da (COMPLETO)"
PROMPT 66 6 ""
KEY "Eseguito da (PF COMPLETO)"
PROMPT 64 6 ""
GROUP 1
END
@ -302,6 +312,7 @@ STRINGA 26
BEGIN
KEY "PERIODO DI RIFERIMENTO"
PROMPT 92 11 ""
PICTURE "^^@@"
FIELD CODTAB[6,9]
END
@ -323,7 +334,7 @@ END
STRINGA 40
BEGIN
KEY "DOMICILIO FISCALE: Provincia"
PROMPT 100 20 ""
PROMPT 99 20 ""
FIELD 213@->PROVCOM
END
@ -338,7 +349,7 @@ END
STRINGA 42
BEGIN
KEY "DOMICILIO FISCALE: NUMERO CIVICO"
PROMPT 101 22 ""
PROMPT 99 22 ""
FIELD 6->CIVRF
FIELD 6->CIVRES
END
@ -348,20 +359,20 @@ BEGIN
KEY "Terza sezione"
END
NUMERO 28
NUMERO 28 58 1
BEGIN
KEY "TOTALE (in lettere)"
PROMPT 120 3 ""
PROMPT 117 3 ""
GROUP 10
PICTURE "LETTERE"
PICTURE "(*,*)LETTERE"
END
NUMERO 29
BEGIN
KEY "TOTALE (in alto)"
PROMPT 184 3 ""
PROMPT 181 3 ""
GROUP 10
PICTURE "# # # # # # # #^^^"
PICTURE "(* )# # # # # # # #^^^"
END
STRINGA 30
@ -378,32 +389,34 @@ BEGIN
FIELD 14@->S0
END
STRINGA 53
BEGIN
KEY "Eseguito da (PG)"
PROMPT 127 6 ""
GROUP 2
FIELD 6->RAGSOC
END
STRINGA 32
BEGIN
KEY "Eseguito da (1)"
KEY "Eseguito da (PF Prima parte)"
PROMPT 127 6 ""
GROUP 1
FIELD 6->RAGSOC[1,30]
END
STRINGA 33
BEGIN
KEY "Eseguito da (2)"
KEY "Eseguito da (PF Seconda parte)"
PROMPT 180 6 ""
GROUP 1
FIELD 6->RAGSOC[31,50]
END
LISTA 34
BEGIN
KEY "Tipo anagrafica"
FIELD 6->TIPOA
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
END
DATA 35
BEGIN
KEY "DATA DI NASCITA"
PROMPT 112 8 ""
PROMPT 111 8 ""
GROUP 1
FLAGS "D"
PICTURE "# #^ # #^ ^ # # #"
@ -411,6 +424,17 @@ BEGIN
FORMAT "1444-"
END
DATA 50
BEGIN
KEY "DATA DI COSTITUZIONE (PG)"
PROMPT 112 8 ""
GROUP 2
FLAGS "D"
PICTURE "# #^ # #^ ^ # # #"
FIELD 7->DATACOST
FORMAT "1444-"
END
STRINGA 36
BEGIN
KEY "COMUNE (o Stato estero) DI NASCITA"
@ -420,20 +444,39 @@ BEGIN
FIELD 113@->DENCOM
END
STRINGA 51
BEGIN
KEY "COMUNE (o Stato estero) DI COSTITUZIONE (PG)"
PROMPT 148 8 ""
GROUP 2
FLAGS "D"
FIELD 413@->DENCOM
END
STRINGA 37
BEGIN
KEY "PROV. DI NASCITA (sigla)"
PROMPT 208 8 ""
PROMPT 205 8 ""
GROUP 1
FLAGS "D"
PICTURE "# #"
FIELD 113@->PROVCOM
END
STRINGA 52
BEGIN
KEY "PROV. DI COSTITUZIONE (sigla)"
PROMPT 205 8 ""
GROUP 2
FLAGS "D"
PICTURE "# #"
FIELD 413@->PROVCOM
END
STRINGA 38
BEGIN
KEY "SESSO (M o F)"
PROMPT 217 8 ""
PROMPT 214 8 ""
GROUP 1
FLAGS "D"
FIELD 8->SESSO
@ -457,7 +500,7 @@ END
STRINGA 41
BEGIN
KEY "DOMICILIO FISCALE: NUMERO CIVICO"
PROMPT 219 10 ""
PROMPT 213 10 ""
FIELD 6->CIVRF
FIELD 6->CIVRES
END
@ -465,7 +508,7 @@ END
STRINGA 42
BEGIN
KEY "CODICE TRIBUTO"
PROMPT 114 13 ""
PROMPT 112 13 ""
PICTURE "# # # #"
FIELD S6
END
@ -473,16 +516,16 @@ END
STRINGA 43
BEGIN
KEY "PERIODO DI RIFERIMENTO"
PROMPT 137 13 ""
PICTURE "^ ^ ^ ^ ^ #"
PROMPT 140 13 ""
PICTURE "^^# @"
FIELD CODTAB[6,9]
END
NUMERO 44
BEGIN
KEY "Codice Concessione"
PROMPT 156 13 ""
PICTURE "# # #"
PROMPT 154 13 ""
PICTURE "@ @ @"
FIELD 6->UFFCONC
FIELD 14@->CODTAB
END
@ -490,7 +533,7 @@ END
STRINGA 45
BEGIN
KEY "Codice fiscale"
PROMPT 166 13 ""
PROMPT 164 13 ""
GROUP 1
PICTURE "# # # # # # # # # # # # # # # #"
FIELD 6->COFI
@ -499,7 +542,7 @@ END
STRINGA 62
BEGIN
KEY "Codice fiscale (Persone GIURIDICHE)"
PROMPT 166 13 ""
PROMPT 164 13 ""
GROUP 2
FLAGS "D"
PICTURE "# # # # # # # # # # #"
@ -509,7 +552,7 @@ END
STRINGA 46
BEGIN
KEY "Partita IVA"
PROMPT 184 15 ""
PROMPT 181 15 ""
PICTURE "# # # # # # # # # # #"
FIELD 6->PAIV
END
@ -517,16 +560,16 @@ END
NUMERO 47
BEGIN
KEY "IMPORTO TRIBUTO"
PROMPT 184 17 ""
PICTURE "# # # # # # # #^^^"
PROMPT 181 17 ""
PICTURE "(* )# # # # # # # #^^^"
FIELD R0
END
NUMERO 48
BEGIN
KEY "INTERESSI"
PROMPT 184 19 ""
PICTURE "# # # # # # # #^^^"
PROMPT 181 19 ""
PICTURE "(* )# # # # # # # #^^^"
FIELD R1
END

View File

@ -6,13 +6,10 @@ JOIN 13 TO 16@ ALIAS 213 INTO COM=COMRES
JOIN 6 ALIAS 26 INTO TIPOA=S1[1,1] CODANAGR=S1[2,6]
JOIN 8 TO 26@ ALIAS 28 INTO CODANAGR=CODANAGR
JOIN 13 TO 28@ ALIAS 313 INTO COM=COMNASC
JOIN 7 TO 16@ ALIAS 17 INTO CODANAGR=CODANAGR
JOIN %BAN ALIAS 14 INTO CODTAB=S7
JOIN %BAN ALIAS 24 INTO CODTAB=S7+S8
JOIN %UCS TO 213@ ALIAS 34 INTO CODTAB==UFFCSERV
JOIN %UID TO 213@ ALIAS 44 INTO CODTAB==UFFIIDD1
JOIN 13 TO 34@ ALIAS 413 INTO COM=S6
JOIN 13 TO 44@ ALIAS 513 INTO COM=S5
JOIN 13 TO 17@ ALIAS 413 INTO COM=COMCOST
END
DESCRIPTION
BEGIN
@ -61,10 +58,20 @@ BEGIN
KEY "DATI DICHIARANTE (ALIAS 16 e 18)"
END
LISTA
BEGIN
KEY "Societa'"
PROMPT 93 11 ""
FIELD 6->TIPOA
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
ITEM "G|X" MESSAGE ENABLE,2@|DISABLE,1@
END
STRINGA
BEGIN
KEY "COGNOME"
PROMPT 11 11 ""
GROUP 1
FIELD 16@->RAGSOC[1,30]
END
@ -72,31 +79,43 @@ STRINGA
BEGIN
KEY "NOME"
PROMPT 65 11 ""
GROUP 1
FIELD 16@->RAGSOC[31,0]
END
LISTA
STRINGA
BEGIN
KEY "Societa'"
PROMPT 93 11 ""
FIELD 6->TIPOA
ITEM "F|"
ITEM "G|X"
KEY "RAGIONE SOCIALE"
PROMPT 11 11 ""
GROUP 2
FIELD 16@->RAGSOC
END
DATA
BEGIN
KEY "DATA DI NASCITA"
PROMPT 99 11 ""
GROUP 1
PICTURE "##^ ##^ ^###"
FIELD 18@->DATANASC
FORMAT "1444-"
END
DATA
BEGIN
KEY "DATA DI COSTITUZIONE"
PROMPT 99 11 ""
GROUP 2
PICTURE "##^ ##^ ^###"
FIELD 17@->DATACOST
FORMAT "1444-"
END
STRINGA
BEGIN
KEY "SESSO (M o F)"
PROMPT 122 11 ""
GROUP 1
FIELD 18@->SESSO
END
@ -104,6 +123,7 @@ STRINGA
BEGIN
KEY "STATO CIVILE"
PROMPT 130 11 ""
GROUP 1
FIELD 18@->STATCIV
END
@ -111,16 +131,34 @@ STRINGA
BEGIN
KEY "COMUNE (o Stato estero) DI NASCITA"
PROMPT 11 13 ""
GROUP 1
FIELD 113@->DENCOM
END
STRINGA
BEGIN
KEY "COMUNE (o Stato estero) DI COSTITUZIONE"
PROMPT 11 13 ""
GROUP 2
FIELD 413@->DENCOM
END
STRINGA
BEGIN
KEY "PROV. DI NASCITA (sigla)"
PROMPT 74 13 ""
GROUP 1
FIELD 113@->PROVCOM
END
STRINGA
BEGIN
KEY "PROV. DI COSTITUZIONE (sigla)"
PROMPT 74 13 ""
GROUP 2
FIELD 413@->PROVCOM
END
STRINGA
BEGIN
KEY "CODICE FISCALE"

View File

@ -66,10 +66,19 @@ BEGIN
FIELD 6->COFI
END
LISTA 8
BEGIN
KEY "Tipo anagrafica"
FIELD 6->TIPOA
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
END
STRINGA 6
BEGIN
KEY "COGNOME, DENOMINAZIONE O RAGIONE SOCIALE"
KEY "COGNOME"
PROMPT 11 19 ""
GROUP 1
FIELD 6->RAGSOC[1,30]
END
@ -77,15 +86,16 @@ STRINGA 7
BEGIN
KEY "NOME"
PROMPT 99 19 ""
GROUP 1
FIELD 6->RAGSOC[31,-1]
END
LISTA 8
STRINGA 93
BEGIN
KEY "Tipo anagrafica"
FIELD 6->TIPOA
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
KEY "DENOMINAZIONE O RAGIONE SOCIALE"
PROMPT 11 19 ""
GROUP 2
FIELD 6->RAGSOC
END
GRUPPO -1
@ -330,7 +340,7 @@ END
NUMERO 34
BEGIN
KEY "IRPEF 3353: TOTALE"
KEY "ILOR 3353: TOTALE"
PROMPT 122 33 ""
GROUP 6 12
MESSAGE ADD,9@
@ -532,7 +542,7 @@ END
NUMERO 55
BEGIN
KEY "IRPEF 3110: TOTALE"
KEY "ILOR 3110: TOTALE"
PROMPT 122 41 ""
GROUP 7 12
FLAGS "DH"
@ -704,6 +714,13 @@ BEGIN
PROMPT 0 0 ""
END
STRINGA 93
BEGIN
KEY "CODICE TRIBUTO 1"
PROMPT 27 53 ""
FIELD S3
END
NUMERO 73
BEGIN
KEY "TRIBUTO 1: PERIODO AA (1)"
@ -745,6 +762,13 @@ BEGIN
PICTURE "###.###.###^^^"
END
STRINGA 94
BEGIN
KEY "CODICE TRIBUTO 2"
PROMPT 27 55 ""
FIELD S4
END
NUMERO 78
BEGIN
KEY "TRIBUTO 2: PERIODO AA (1)"
@ -786,6 +810,13 @@ BEGIN
PICTURE "###.###.###^^^"
END
STRINGA 95
BEGIN
KEY "CODICE TRIBUTO 3"
PROMPT 27 57 ""
FIELD S5
END
NUMERO 83
BEGIN
KEY "TRIBUTO 3: PERIODO AA (1)"

View File

@ -37,8 +37,8 @@ END
GENERAL
BEGIN
OFFSET 0 0
FONT "Courier New"
SIZE 7
FONT "Roman 17cpi"
SIZE 12
END
SECTION BODY ODD 73

View File

@ -317,26 +317,73 @@ BEGIN
END
STRINGA 35
BEGIN
KEY "CODICE CONTRIBUENTE Dichiarante (Esattoria Prov.)"
PROMPT 6 53 ""
FIELD 16@->CODCONTR[1,2]
END
STRINGA 39
BEGIN
KEY "CODICE CONTRIBUENTE Dichiarante (Esattoria Com.)"
PROMPT 14 53 ""
FIELD 16@->CODCONTR[3,5]
END
STRINGA 40
BEGIN
KEY "CODICE CONTRIBUENTE Dichiarante"
PROMPT 4 53 "# # # # # # # # # # # # # # # # # # # #"
PICTURE "### ##"
FIELD 16@->CODCONTR
PROMPT 30 53 ""
FIELD 16@->CODCONTR[6,13]
END
STRINGA 41
BEGIN
KEY "CODICE CONTRIBUENTE Dichiarante (C.c.)"
PROMPT 50 53 ""
FIELD 16@->CODCONTR[14,15]
END
STRINGA 36
BEGIN
KEY "CODICE CONTRIBUENTE Coniuge (Esattoria Prov.)"
PROMPT 6 56 ""
FIELD 26@->CODCONTR[1,2]
END
STRINGA 42
BEGIN
KEY "CODICE CONTRIBUENTE Coniuge (Esattoria Com.)"
PROMPT 14 56 ""
FIELD 26@->CODCONTR[3,5]
END
STRINGA 43
BEGIN
KEY "CODICE CONTRIBUENTE Coniuge"
PROMPT 4 56 "# # # # # # # # # # # # # # # # # # # #"
PICTURE "### ##"
FIELD 26@->CODCONTR
PROMPT 30 56 ""
FIELD 26@->CODCONTR[6,13]
END
STRINGA 44
BEGIN
KEY "CODICE CONTRIBUENTE Coniuge (C.c.)"
PROMPT 50 56 ""
FIELD 26@->CODCONTR[14,15]
END
STRINGA 37
BEGIN
KEY "CENTRO SERVIZI: Provincia e Denominazione"
PROMPT 74 56 ""
MESSAGE _CENSERoUFFIMP,213@,16@
MESSAGE _CENSERoUFFIMP,213@,16@,501
END
STRINGA 501
BEGIN
KEY "CENTRO SERVIZI: Codice"
PROMPT 120 56 ""
PICTURE "# # #"
END
DATA 38

View File

@ -48,10 +48,19 @@ BEGIN
FIELD 6->COFI
END
LISTA 8
BEGIN
KEY "Tipo anagrafica"
FIELD 6->TIPOA
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
END
STRINGA 6
BEGIN
KEY "COGNOME, DENOMINAZIONE O RAGIONE SOCIALE"
KEY "COGNOME"
PROMPT 11 16 ""
GROUP 1
FIELD 6->RAGSOC[1,30]
END
@ -59,15 +68,16 @@ STRINGA 7
BEGIN
KEY "NOME"
PROMPT 98 16 ""
GROUP 1
FIELD 6->RAGSOC[31,-1]
END
LISTA 8
STRINGA 91
BEGIN
KEY "Tipo anagrafica"
FIELD 6->TIPOA
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
KEY "DENOMINAZIONE O RAGIONE SOCIALE"
PROMPT 11 16 ""
GROUP 2
FIELD 6->RAGSOC
END
GRUPPO -1
@ -311,7 +321,7 @@ END
NUMERO 34
BEGIN
KEY "IRPEF 3353: TOTALE"
KEY "ILOR 3353: TOTALE"
PROMPT 123 30 ""
GROUP 6 12
MESSAGE ADD,9@
@ -513,7 +523,7 @@ END
NUMERO 55
BEGIN
KEY "IRPEF 3110: TOTALE"
KEY "ILOR 3110: TOTALE"
PROMPT 123 38 ""
GROUP 7 12
FLAGS "DH"
@ -685,6 +695,13 @@ BEGIN
PROMPT 0 0 ""
END
STRINGA 91
BEGIN
KEY "CODICE TRIBUTO 1"
PROMPT 27 50 ""
FIELD S3
END
NUMERO 73
BEGIN
KEY "TRIBUTO 1: PERIODO AA (1)"
@ -701,7 +718,7 @@ END
NUMERO 75
BEGIN
KEY "TRIBUTO 1: "
KEY "TRIBUTO 1: IMPORTO "
PROMPT 68 50 ""
MESSAGE COPY,14@
PICTURE "###.###.###^^^"
@ -726,6 +743,13 @@ BEGIN
PICTURE "###.###.###^^^"
END
STRINGA 92
BEGIN
KEY "CODICE TRIBUTO 2"
PROMPT 27 52 ""
FIELD S4
END
NUMERO 78
BEGIN
KEY "TRIBUTO 2: PERIODO AA (1)"
@ -767,6 +791,13 @@ BEGIN
PICTURE "###.###.###^^^"
END
STRINGA 93
BEGIN
KEY "CODICE TRIBUTO 3"
PROMPT 27 54 ""
FIELD S5
END
NUMERO 83
BEGIN
KEY "TRIBUTO 3: PERIODO AA (1)"

View File

@ -267,11 +267,31 @@ BEGIN
END
STRINGA 31
BEGIN
KEY "CODICE CONTRIBUENTE (Esattoria Prov.)"
PROMPT 4 51 ""
FIELD 6->CODCONTR[1,2]
END
STRINGA 34
BEGIN
KEY "CODICE CONTRIBUENTE (Esattoria Com.)"
PROMPT 14 51 ""
FIELD 6->CODCONTR[3,5]
END
STRINGA 35
BEGIN
KEY "CODICE CONTRIBUENTE"
PROMPT 4 51 "# # # # # # # # # # # # # # # # # #"
PICTURE "# # # ##"
FIELD 6->CODCONTR
PROMPT 30 51 ""
FIELD 6->CODCONTR[6,13]
END
STRINGA 36
BEGIN
KEY "CODICE CONTRIBUENTE (C.c.)"
PROMPT 47 51 ""
FIELD 6->CODCONTR[14,15]
END
STRINGA 32

View File

@ -27,12 +27,12 @@ BEGIN
SIZE 7
END
SECTION BODY ODD 64
SECTION BODY ODD 71
STRINGA 1
BEGIN
KEY "CONCESSIONE DI"
PROMPT 64 5 ""
PROMPT 64 4 ""
FIELD 14@->S0
END
@ -44,27 +44,6 @@ BEGIN
FIELD 14@->CODTAB
END
STRINGA 3
BEGIN
KEY "CODICE FISCALE"
PROMPT 26 11 ""
FIELD 6->COFI
END
STRINGA 4
BEGIN
KEY "COGNOME, DENOMINAZIONE O RAGIONE SOCIALE"
PROMPT 4 15 ""
FIELD 6->RAGSOC[1,30]
END
STRINGA 5
BEGIN
KEY "NOME"
PROMPT 95 15 ""
FIELD 6->RAGSOC[31,-1]
END
LISTA 6
BEGIN
KEY "Tipo anagrafica"
@ -73,6 +52,38 @@ BEGIN
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
END
STRINGA 3
BEGIN
KEY "CODICE FISCALE"
PROMPT 26 11 ""
PICTURE "# # # # # # # # # # # # # # # #"
FIELD 6->COFI
END
STRINGA 4
BEGIN
KEY "COGNOME"
PROMPT 3 15 ""
GROUP 1
FIELD 6->RAGSOC[1,30]
END
STRINGA 5
BEGIN
KEY "NOME"
PROMPT 91 15 ""
GROUP 1
FIELD 6->RAGSOC[31,-1]
END
STRINGA 25
BEGIN
KEY "DENOMINAZIONE O RAGIONE SOCIALE"
PROMPT 3 15 ""
GROUP 2
FIELD 6->RAGSOC
END
GRUPPO 7
BEGIN
KEY "Persone fisiche"
@ -84,7 +95,7 @@ END
DATA 8
BEGIN
KEY "DATA DI NASCITA"
PROMPT 4 17 ""
PROMPT 3 17 ""
GROUP 1
FLAGS "DH"
PICTURE "# # ^ # # ^^ # # #"
@ -95,18 +106,18 @@ END
DATA
BEGIN
KEY "DATA DI COSTITUZIONE"
PROMPT 4 17 ""
PROMPT 3 17 ""
GROUP 2
FLAGS "DH"
PICTURE "# # ^ # # ^^ # # #"
FIELD 7->DATANASC
FIELD 7->DATACOST
FORMAT "1444-"
END
STRINGA 9
BEGIN
KEY "SESSO (M o F)"
PROMPT 34 17 ""
PROMPT 33 17 ""
GROUP 1
FLAGS "DH"
FIELD 8->SESSO
@ -115,7 +126,7 @@ END
STRINGA 10
BEGIN
KEY "COMUNE (o Stato estero) DI NASCITA"
PROMPT 42 17 ""
PROMPT 41 17 ""
GROUP 1
FLAGS "DH"
FIELD 113@->DENCOM
@ -124,7 +135,7 @@ END
STRINGA
BEGIN
KEY "COMUNE (o Stato estero) DI COSTITUZIONE"
PROMPT 42 17 ""
PROMPT 41 17 ""
GROUP 2
FLAGS "DH"
FIELD 413@->DENCOM
@ -151,7 +162,7 @@ END
STRINGA 12
BEGIN
KEY "DOMICILIO FISCALE: COMUNE"
PROMPT 14 19 ""
PROMPT 13 19 ""
FIELD 213@->DENCOM
END
@ -165,7 +176,7 @@ END
STRINGA 14
BEGIN
KEY "DOMICILIO FISCALE: VIA"
PROMPT 72 19 ""
PROMPT 70 19 ""
FIELD 6->INDRF
FIELD 6->INDRES
END
@ -181,10 +192,18 @@ END
STRINGA 16
BEGIN
KEY "PARTITA IVA"
PROMPT 25 47 ""
PROMPT 25 46 ""
PICTURE "# # # # # # # # # # #"
FIELD 6->PAIV
END
STRINGA 24
BEGIN
KEY "CODICE TRIBUTO"
PROMPT 10 51 ""
FIELD S6
END
NUMERO 17
BEGIN
KEY "ANNO"
@ -196,7 +215,7 @@ END
NUMERO 18
BEGIN
KEY "IMPORTO TRIBUTO"
PROMPT 50 51 ""
PROMPT 48 51 ""
MESSAGE COPY,10@
PICTURE "###.###.###^^^"
FIELD R0
@ -205,7 +224,7 @@ END
NUMERO 19
BEGIN
KEY "INTERESSI"
PROMPT 76 51 ""
PROMPT 74 51 ""
MESSAGE ADD,10@
PICTURE "###.###.###^^^"
FIELD R1
@ -214,7 +233,7 @@ END
NUMERO 20
BEGIN
KEY "TOTALE"
PROMPT 115 51 ""
PROMPT 111 51 ""
GROUP 10
PICTURE "###.###.###^^^"
END
@ -222,7 +241,7 @@ END
NUMERO 21
BEGIN
KEY "TOTALE (in lettere)"
PROMPT 9 55 ""
PROMPT 7 55 ""
GROUP 10
PICTURE "LETTERE"
END
@ -230,7 +249,7 @@ END
NUMERO 22
BEGIN
KEY "TOTALE (in cifre)"
PROMPT 115 55 ""
PROMPT 111 55 ""
GROUP 10
PICTURE "###.###.###^^^"
END
@ -238,7 +257,7 @@ END
DATA 23
BEGIN
KEY "DATA: giorno - mese - anno"
PROMPT 22 60 ""
PROMPT 21 59 ""
PICTURE "@@ ^ @@^ ^^@@"
FIELD D0
FORMAT "1444-"