Corretti form del 770

git-svn-id: svn://10.65.10.50/trunk@3298 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1996-07-30 15:36:51 +00:00
parent aa71082da5
commit 83438e7b0a
4 changed files with 2152 additions and 2023 deletions

File diff suppressed because it is too large Load Diff

View File

@ -1,458 +1,461 @@
USE 56 USE 56
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
JOIN %CAF ALIAS 104 INTO CODTAB=CODCAAF JOIN %CAF ALIAS 104 INTO CODTAB=CODCAAF
JOIN 9 INTO CODDITTA=CODDITTA JOIN 9 INTO CODDITTA=CODDITTA
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR
JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC
JOIN 13 TO 106@ ALIAS 213 INTO COM==COMRF(COMRES) JOIN 13 TO 106@ ALIAS 213 INTO COM==COMRF(COMRES)
END END
DESCRIPTION DESCRIPTION
BEGIN BEGIN
56->* "Quadro A1 770" 56->* "Quadro A1 770"
45->* "Anagrafica dei dipendenti" 45->* "Anagrafica dei dipendenti"
104@->* "Tabella CAAF" 104@->* "Tabella CAAF"
9->* "Ditte" 9->* "Ditte"
106@->* "Anagrafica persone fisiche e giuridiche (ditta)" 106@->* "Anagrafica persone fisiche e giuridiche (ditta)"
108@->* "Anagrafica persone fisiche (ditta)" 108@->* "Anagrafica persone fisiche (ditta)"
113@->* "Comuni DITTA (nascita)" 113@->* "Comuni DITTA (nascita)"
213@->* "Comuni DITTA (residenza)" 213@->* "Comuni DITTA (residenza)"
END END
GENERAL GENERAL
BEGIN BEGIN
OFFSET 0 0 OFFSET 0 0
FONT "Courier New" FONT "Courier New"
SIZE 11 SIZE 11
CARATTERE "X" CARATTERE "X"
INIZIO_POS 3 2 INIZIO_POS 3 2
FINE_POS 131 FINE_POS 131
GRID "+++++++++-|" GRID "+++++++++-|"
END END
SECTION HEADER FIRST 28 SECTION HEADER FIRST 28
LISTA 1 LISTA 1
BEGIN BEGIN
KEY "Tipo anagrafica" KEY "Tipo anagrafica"
FLAGS "H" FLAGS "H"
FIELD 106@->TIPOA FIELD 106@->TIPOA
ITEM "F|Fisica" MESSAGE SHOW,1@|HIDE,2@ ITEM "F|Fisica" MESSAGE SHOW,1@|HIDE,2@
ITEM "G|Giuridica" MESSAGE SHOW,2@|HIDE,1@ ITEM "G|Giuridica" MESSAGE SHOW,2@|HIDE,1@
END END
STRINGA 2 STRINGA 2
BEGIN BEGIN
KEY "CODICE FISCALE" KEY "CODICE FISCALE"
PROMPT 3 13 "" PROMPT 3 13 ""
FIELD 106@->COFI FIELD 106@->COFI
END END
STRINGA 3 STRINGA 3
BEGIN BEGIN
KEY "RAGIONE SOCIALE" KEY "RAGIONE SOCIALE"
PROMPT 40 13 "" PROMPT 40 13 ""
GROUP 2 GROUP 2
FIELD 106@->RAGSOC FIELD 106@->RAGSOC
END END
STRINGA 4 STRINGA 4
BEGIN BEGIN
KEY "COGNOME" KEY "COGNOME"
PROMPT 40 13 "" PROMPT 40 13 ""
GROUP 1 GROUP 1
FIELD 106@->RAGSOC[1,30] FIELD 106@->RAGSOC[1,30]
END END
STRINGA 5 STRINGA 5
BEGIN BEGIN
KEY "NOME" KEY "NOME"
PROMPT 17 15 "" PROMPT 17 15 ""
GROUP 1 GROUP 1
FIELD 106@->RAGSOC[31,50] FIELD 106@->RAGSOC[31,50]
END END
STRINGA 6 STRINGA 6
BEGIN BEGIN
KEY "SESSO" KEY "SESSO"
PROMPT 58 15 "" PROMPT 58 15 ""
GROUP 1 GROUP 1
FIELD 108@->SESSO FIELD 108@->SESSO
END END
STRINGA 7 STRINGA 7
BEGIN BEGIN
KEY "DATA DI NASCITA" KEY "DATA DI NASCITA"
PROMPT 67 15 "" PROMPT 67 15 ""
GROUP 1 GROUP 1
FIELD 108@->DATANASC FIELD 108@->DATANASC
END END
STRINGA 8 STRINGA 8
BEGIN BEGIN
KEY "COMUNE DI NASCITA" KEY "COMUNE DI NASCITA"
PROMPT 84 15 "" PROMPT 84 15 ""
GROUP 1 GROUP 1
FIELD 113@->DENCOM FIELD 113@->DENCOM
END END
STRINGA 9 STRINGA 9
BEGIN BEGIN
KEY "PROV. DI NASCITA" KEY "PROV. DI NASCITA"
PROMPT 126 15 "" PROMPT 126 15 ""
GROUP 1 GROUP 1
FIELD 113@->PROVCOM FIELD 113@->PROVCOM
END END
STRINGA 10 STRINGA 10
BEGIN BEGIN
KEY "COMUNE DI RES.FISCALE" KEY "COMUNE DI RES.FISCALE"
PROMPT 17 17 "" PROMPT 17 17 ""
FIELD 213@->DENCOM FIELD 213@->DENCOM
END END
STRINGA 11 STRINGA 11
BEGIN BEGIN
KEY "PROV DI RES.FISCALE" KEY "PROV DI RES.FISCALE"
PROMPT 59 17 "" PROMPT 59 17 ""
FIELD 213@->PROVCOM FIELD 213@->PROVCOM
END END
STRINGA 12 STRINGA 12
BEGIN BEGIN
KEY "VIA di RES." KEY "VIA di RES."
PROMPT 66 17 "" PROMPT 66 17 ""
FIELD 106@->INDRF FIELD 106@->INDRF
END FIELD 106@->INDRES
END
STRINGA 15
BEGIN STRINGA 15
KEY "NUM. CIVICO di RES." BEGIN
PROMPT 104 17 "" KEY "NUM. CIVICO di RES."
FIELD 106@->CIVRF PROMPT 104 17 ""
END FIELD 106@->CIVRF
FIELD 106@->CIVRES
STRINGA 16 END
BEGIN
KEY "CAP" STRINGA 16
PROMPT 125 17 "" BEGIN
FIELD 106@->CAPRF KEY "CAP"
END PROMPT 125 17 ""
FIELD 106@->CAPRF
STRINGA 13 FIELD 106@->CAPRES
BEGIN END
KEY "CODICE FISCALE DEL SOGGETTO DICHIARANTE"
PROMPT 87 20 "" STRINGA 13
END BEGIN
KEY "CODICE FISCALE DEL SOGGETTO DICHIARANTE"
NUMERO 14 PROMPT 87 20 ""
BEGIN END
KEY "NUM. FOGLIO"
PROMPT 125 23 "" NUMERO 14
END BEGIN
KEY "NUM. FOGLIO"
END PROMPT 125 23 ""
END
SECTION BODY ODD 10
END
STRINGA 1
BEGIN SECTION BODY ODD 10
KEY "COD.FIS"
PROMPT 11 1 "" STRINGA 1
FIELD 45->CODFI BEGIN
END KEY "COD.FIS"
PROMPT 11 1 ""
STRINGA 2 FIELD 45->CODFI
BEGIN END
KEY "COGNOME"
PROMPT 43 1 "" STRINGA 2
FIELD 45->COGNOME BEGIN
END KEY "COGNOME"
PROMPT 43 1 ""
STRINGA 3 FIELD 45->COGNOME
BEGIN END
KEY "NOME"
PROMPT 80 1 "" STRINGA 3
FIELD 45->NOME BEGIN
END KEY "NOME"
PROMPT 80 1 ""
DATA 4 FIELD 45->NOME
BEGIN END
KEY "DATA NASCITA"
PROMPT 114 1 "" DATA 4
FIELD 45->DATANA BEGIN
FORMAT "1444-" KEY "DATA NASCITA"
END PROMPT 114 1 ""
FIELD 45->DATANA
STRINGA 5 FORMAT "1444-"
BEGIN END
KEY "SESSO"
PROMPT 128 1 "" STRINGA 5
FIELD 45->SESSO BEGIN
END KEY "SESSO"
PROMPT 128 1 ""
STRINGA 6 FIELD 45->SESSO
BEGIN END
KEY "COMUNE DI NASCITA"
PROMPT 11 3 "" STRINGA 6
FIELD 45->COMUNENA BEGIN
END KEY "COMUNE DI NASCITA"
PROMPT 11 3 ""
STRINGA 7 FIELD 45->COMUNENA
BEGIN END
KEY "PROV DI NASCITA"
PROMPT 48 3 "" STRINGA 7
FIELD 45->PROVNA BEGIN
END KEY "PROV DI NASCITA"
PROMPT 48 3 ""
NUMERO 8 FIELD 45->PROVNA
BEGIN END
KEY "MESE DI RIFERIMENTO"
PROMPT 11 5 "" NUMERO 8
FIELD 56->MESERIF BEGIN
END KEY "MESE DI RIFERIMENTO"
PROMPT 11 5 ""
NUMERO 9 FIELD 56->MESERIF
BEGIN END
KEY "IMPOSTA RIMBORSATA"
PROMPT 25 5 "" NUMERO 9
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->IMPRIMB9 KEY "IMPOSTA RIMBORSATA"
MESSAGE ADD,FL->9 PROMPT 25 5 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->IMPRIMB9
NUMERO 10 MESSAGE ADD,FL->9
BEGIN END
KEY "IMPOSTA VERSATA"
PROMPT 44 5 "" NUMERO 10
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->IMPVERS10 KEY "IMPOSTA VERSATA"
MESSAGE ADD,FL->10 PROMPT 44 5 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->IMPVERS10
NUMERO 11 MESSAGE ADD,FL->10
BEGIN END
KEY "INTERESSI"
PROMPT 63 5 "" NUMERO 11
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->INTER11 KEY "INTERESSI"
MESSAGE ADD,FL->11 PROMPT 63 5 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->INTER11
NUMERO 12 MESSAGE ADD,FL->11
BEGIN END
KEY "IMPOSTA VERSATA"
PROMPT 81 5 "" NUMERO 12
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->IMPVERS12 KEY "IMPOSTA VERSATA"
MESSAGE ADD,FL->12 PROMPT 81 5 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->IMPVERS12
NUMERO 13 MESSAGE ADD,FL->12
BEGIN END
KEY "INTERESSI"
PROMPT 100 5 "" NUMERO 13
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->INTER13 KEY "INTERESSI"
MESSAGE ADD,FL->13 PROMPT 100 5 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->INTER13
NUMERO 14 MESSAGE ADD,FL->13
BEGIN END
KEY "SOPRATTASSA SU IRPEF"
PROMPT 116 5 "" NUMERO 14
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->STASSA14 KEY "SOPRATTASSA SU IRPEF"
MESSAGE ADD,FL->14 PROMPT 116 5 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->STASSA14
NUMERO 15 MESSAGE ADD,FL->14
BEGIN END
KEY "CONTRIBUTO A RIMBORSO"
PROMPT 11 7 "" NUMERO 15
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->CONTRIMB15 KEY "CONTRIBUTO A RIMBORSO"
MESSAGE ADD,FL->15 PROMPT 11 7 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->CONTRIMB15
NUMERO 16 MESSAGE ADD,FL->15
BEGIN END
KEY "CONTRIBUTO VERSATO"
PROMPT 30 7 "" NUMERO 16
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->CONTVERS16 KEY "CONTRIBUTO VERSATO"
MESSAGE ADD,FL->16 PROMPT 30 7 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->CONTVERS16
NUMERO 17 MESSAGE ADD,FL->16
BEGIN END
KEY "INTERESSI"
PROMPT 49 7 "" NUMERO 17
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->INTER17 KEY "INTERESSI"
MESSAGE ADD,FL->17 PROMPT 49 7 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->INTER17
NUMERO 18 MESSAGE ADD,FL->17
BEGIN END
KEY "CONTRIBUTO VERSATO"
PROMPT 68 7 "" NUMERO 18
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->CONTVER18 KEY "CONTRIBUTO VERSATO"
MESSAGE ADD,FL->18 PROMPT 68 7 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->CONTVER18
NUMERO 19 MESSAGE ADD,FL->18
BEGIN END
KEY "INTERESSI"
PROMPT 86 7 "" NUMERO 19
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->INTER19 KEY "INTERESSI"
MESSAGE ADD,FL->19 PROMPT 86 7 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->INTER19
NUMERO 20 MESSAGE ADD,FL->19
BEGIN END
KEY "SOPRATTASSA SU IRPEF"
PROMPT 102 7 "" NUMERO 20
PICTURE "###.###.###.###^^^" BEGIN
FIELD 56->STASSA20 KEY "SOPRATTASSA SU IRPEF"
MESSAGE ADD,FL->20 PROMPT 102 7 ""
END PICTURE "###.###.###.###^^^"
FIELD 56->STASSA20
STRINGA 21 MESSAGE ADD,FL->20
BEGIN END
KEY "CONGUAGLI NON EFFETTUATI"
PROMPT 122 7 "" STRINGA 21
FIELD 56->CONNEFF21 BEGIN
END KEY "CONGUAGLI NON EFFETTUATI"
PROMPT 122 7 ""
STRINGA 22 FIELD 56->CONNEFF21
BEGIN END
KEY "TIPO CONGUAGLIO"
PROMPT 129 7 "" STRINGA 22
FIELD 56->TIPOCONG22 BEGIN
END KEY "TIPO CONGUAGLIO"
PROMPT 129 7 ""
STRINGA 23 FIELD 56->TIPOCONG22
BEGIN END
KEY "CODICE FISCALE CAAF"
PROMPT 11 9 "" STRINGA 23
FIELD 104@->S1 BEGIN
END KEY "CODICE FISCALE CAAF"
PROMPT 11 9 ""
STRINGA 24 FIELD 104@->S1
BEGIN END
KEY "DENOMINAZIONE CAAF"
PROMPT 43 9 "" STRINGA 24
FIELD 104@->S0 BEGIN
END KEY "DENOMINAZIONE CAAF"
PROMPT 43 9 ""
NUMERO 25 FIELD 104@->S0
BEGIN END
KEY "NUMERO ISCRIZIONE ALBO"
PROMPT 101 9 "" NUMERO 25
FIELD 104@->I1 BEGIN
END KEY "NUMERO ISCRIZIONE ALBO"
PROMPT 101 9 ""
DATA 26 FIELD 104@->I1
BEGIN END
KEY "DATA RICEZIONE MOD.730-5"
PROMPT 115 9 "" DATA 26
FORMAT "1444-" BEGIN
PICTURE "## ^ ##^^^^^" KEY "DATA RICEZIONE MOD.730-5"
FIELD 56->DATARIC26 PROMPT 115 9 ""
END FORMAT "1444-"
PICTURE "## ^ ##^^^^^"
END FIELD 56->DATARIC26
END
SECTION FOOTER LAST 4
END
NUMERO 9
BEGIN SECTION FOOTER LAST 4
KEY "IMPOSTA RIMBORSATA"
PROMPT 25 1 "" NUMERO 9
PICTURE "###.###.###.###^^^" BEGIN
END KEY "IMPOSTA RIMBORSATA"
PROMPT 25 1 ""
NUMERO 10 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "IMPOSTA VERSATA"
PROMPT 44 1 "" NUMERO 10
PICTURE "###.###.###.###^^^" BEGIN
END KEY "IMPOSTA VERSATA"
PROMPT 44 1 ""
NUMERO 11 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "INTERESSI"
PROMPT 63 1 "" NUMERO 11
PICTURE "###.###.###.###^^^" BEGIN
END KEY "INTERESSI"
PROMPT 63 1 ""
NUMERO 12 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "IMPOSTA VERSATA"
PROMPT 81 1 "" NUMERO 12
PICTURE "###.###.###.###^^^" BEGIN
END KEY "IMPOSTA VERSATA"
PROMPT 81 1 ""
NUMERO 13 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "INTERESSI"
PROMPT 100 1 "" NUMERO 13
PICTURE "###.###.###.###^^^" BEGIN
END KEY "INTERESSI"
PROMPT 100 1 ""
NUMERO 14 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "SOPRATTASSA SU IRPEF"
PROMPT 116 1 "" NUMERO 14
PICTURE "###.###.###.###^^^" BEGIN
END KEY "SOPRATTASSA SU IRPEF"
PROMPT 116 1 ""
NUMERO 15 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "CONTRIBUTO A RIMBORSO"
PROMPT 11 3 "" NUMERO 15
PICTURE "###.###.###.###^^^" BEGIN
END KEY "CONTRIBUTO A RIMBORSO"
PROMPT 11 3 ""
NUMERO 16 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "CONTRIBUTO VERSATO"
PROMPT 30 3 "" NUMERO 16
PICTURE "###.###.###.###^^^" BEGIN
END KEY "CONTRIBUTO VERSATO"
PROMPT 30 3 ""
NUMERO 17 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "INTERESSI"
PROMPT 49 3 "" NUMERO 17
PICTURE "###.###.###.###^^^" BEGIN
END KEY "INTERESSI"
PROMPT 49 3 ""
NUMERO 18 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "CONTRIBUTO VERSATO"
PROMPT 68 3 "" NUMERO 18
PICTURE "###.###.###.###^^^" BEGIN
END KEY "CONTRIBUTO VERSATO"
PROMPT 68 3 ""
NUMERO 19 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "INTERESSI"
PROMPT 86 3 "" NUMERO 19
PICTURE "###.###.###.###^^^" BEGIN
END KEY "INTERESSI"
PROMPT 86 3 ""
NUMERO 20 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "SOPRATTASSA SU IRPEF"
PROMPT 102 3 "" NUMERO 20
PICTURE "###.###.###.###^^^" BEGIN
END KEY "SOPRATTASSA SU IRPEF"
PROMPT 102 3 ""
END PICTURE "###.###.###.###^^^"
END
END
END
END

View File

@ -1,447 +1,450 @@
USE 57 USE 57
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
JOIN %CAF ALIAS 104 INTO CODTAB=CODCAAF JOIN %CAF ALIAS 104 INTO CODTAB=CODCAAF
JOIN 9 INTO CODDITTA=CODDITTA JOIN 9 INTO CODDITTA=CODDITTA
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR
JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC
JOIN 13 TO 106@ ALIAS 213 INTO COM==COMRF(COMRES) JOIN 13 TO 106@ ALIAS 213 INTO COM==COMRF(COMRES)
END END
DESCRIPTION DESCRIPTION
BEGIN BEGIN
57->* "Quadro A2 770" 57->* "Quadro A2 770"
45->* "Anagrafica dei dipendenti" 45->* "Anagrafica dei dipendenti"
104@->* "Tabella CAAF" 104@->* "Tabella CAAF"
9->* "Ditte" 9->* "Ditte"
106@->* "Anagrafica persone fisiche e giuridiche (ditta)" 106@->* "Anagrafica persone fisiche e giuridiche (ditta)"
108@->* "Anagrafica persone fisiche (ditta)" 108@->* "Anagrafica persone fisiche (ditta)"
113@->* "Comuni DITTA (nascita)" 113@->* "Comuni DITTA (nascita)"
213@->* "Comuni DITTA (residenza)" 213@->* "Comuni DITTA (residenza)"
END END
GENERAL GENERAL
BEGIN BEGIN
OFFSET 0 0 OFFSET 0 0
FONT "Courier New" FONT "Courier New"
SIZE 11 SIZE 11
CARATTERE "X" CARATTERE "X"
INIZIO_POS 3 2 INIZIO_POS 3 2
FINE_POS 131 FINE_POS 131
GRID "+++++++++-|" GRID "+++++++++-|"
END END
SECTION HEADER FIRST 28 SECTION HEADER FIRST 28
LISTA 1 LISTA 1
BEGIN BEGIN
KEY "Tipo anagrafica" KEY "Tipo anagrafica"
FLAGS "H" FLAGS "H"
FIELD 106@->TIPOA FIELD 106@->TIPOA
ITEM "F|Fisica" MESSAGE SHOW,1@|HIDE,2@ ITEM "F|Fisica" MESSAGE SHOW,1@|HIDE,2@
ITEM "G|Giuridica" MESSAGE SHOW,2@|HIDE,1@ ITEM "G|Giuridica" MESSAGE SHOW,2@|HIDE,1@
END END
STRINGA 2 STRINGA 2
BEGIN BEGIN
KEY "CODICE FISCALE" KEY "CODICE FISCALE"
PROMPT 3 13 "" PROMPT 3 13 ""
FIELD 106@->COFI FIELD 106@->COFI
END END
STRINGA 3 STRINGA 3
BEGIN BEGIN
KEY "RAGIONE SOCIALE" KEY "RAGIONE SOCIALE"
PROMPT 40 13 "" PROMPT 40 13 ""
GROUP 2 GROUP 2
FIELD 106@->RAGSOC FIELD 106@->RAGSOC
END END
STRINGA 4 STRINGA 4
BEGIN BEGIN
KEY "COGNOME" KEY "COGNOME"
PROMPT 40 13 "" PROMPT 40 13 ""
GROUP 1 GROUP 1
FIELD 106@->RAGSOC[1,30] FIELD 106@->RAGSOC[1,30]
END END
STRINGA 5 STRINGA 5
BEGIN BEGIN
KEY "NOME" KEY "NOME"
PROMPT 17 15 "" PROMPT 17 15 ""
GROUP 1 GROUP 1
FIELD 106@->RAGSOC[31,50] FIELD 106@->RAGSOC[31,50]
END END
STRINGA 6 STRINGA 6
BEGIN BEGIN
KEY "SESSO" KEY "SESSO"
PROMPT 59 15 "" PROMPT 59 15 ""
GROUP 1 GROUP 1
FIELD 108@->SESSO FIELD 108@->SESSO
END END
STRINGA 7 STRINGA 7
BEGIN BEGIN
KEY "DATA DI NASCITA" KEY "DATA DI NASCITA"
PROMPT 67 15 "" PROMPT 67 15 ""
GROUP 1 GROUP 1
FIELD 108@->DATANASC FIELD 108@->DATANASC
END END
STRINGA 8 STRINGA 8
BEGIN BEGIN
KEY "COMUNE DI NASCITA" KEY "COMUNE DI NASCITA"
PROMPT 84 15 "" PROMPT 84 15 ""
GROUP 1 GROUP 1
FIELD 113@->DENCOM FIELD 113@->DENCOM
END END
STRINGA 9 STRINGA 9
BEGIN BEGIN
KEY "PROV. DI NASCITA" KEY "PROV. DI NASCITA"
PROMPT 125 15 "" PROMPT 125 15 ""
GROUP 1 GROUP 1
FIELD 113@->PROVCOM FIELD 113@->PROVCOM
END END
STRINGA 10 STRINGA 10
BEGIN BEGIN
KEY "COMUNE DI RES.FISCALE" KEY "COMUNE DI RES.FISCALE"
PROMPT 17 17 "" PROMPT 17 17 ""
FIELD 213@->DENCOM FIELD 213@->DENCOM
END END
STRINGA 11 STRINGA 11
BEGIN BEGIN
KEY "PROV DI RES.FISCALE" KEY "PROV DI RES.FISCALE"
PROMPT 59 17 "" PROMPT 59 17 ""
FIELD 213@->PROVCOM FIELD 213@->PROVCOM
END END
STRINGA 12 STRINGA 12
BEGIN BEGIN
KEY "VIA di RES." KEY "VIA di RES."
PROMPT 66 17 "" PROMPT 66 17 ""
FIELD 106@->INDRF FIELD 106@->INDRF
END FIELD 106@->INDRES
END
STRINGA 15
BEGIN STRINGA 15
KEY "NUM. CIVICO di RES." BEGIN
PROMPT 104 17 "" KEY "NUM. CIVICO di RES."
FIELD 106@->CIVRF PROMPT 104 17 ""
END FIELD 106@->CIVRF
FIELD 106@->CIVRES
STRINGA 16 END
BEGIN
KEY "CAP" STRINGA 16
PROMPT 123 17 "" BEGIN
FIELD 106@->CAPRF KEY "CAP"
END PROMPT 123 17 ""
FIELD 106@->CAPRF
STRINGA 13 FIELD 106@->CAPRES
BEGIN END
KEY "CODICE FISCALE DEL SOGGETTO DICHIARANTE"
PROMPT 87 20 "" STRINGA 13
END BEGIN
KEY "CODICE FISCALE DEL SOGGETTO DICHIARANTE"
NUMERO 14 PROMPT 87 20 ""
BEGIN END
KEY "NUM. FOGLIO"
PROMPT 125 23 "" NUMERO 14
END BEGIN
KEY "NUM. FOGLIO"
END PROMPT 125 23 ""
END
SECTION BODY ODD 10
END
STRINGA 1
BEGIN SECTION BODY ODD 10
KEY "COD.FIS"
PROMPT 11 1 "" STRINGA 1
FIELD 45->CODFI BEGIN
END KEY "COD.FIS"
PROMPT 11 1 ""
STRINGA 2 FIELD 45->CODFI
BEGIN END
KEY "COGNOME"
PROMPT 43 1 "" STRINGA 2
FIELD 45->COGNOME BEGIN
END KEY "COGNOME"
PROMPT 43 1 ""
STRINGA 3 FIELD 45->COGNOME
BEGIN END
KEY "NOME"
PROMPT 80 1 "" STRINGA 3
FIELD 45->NOME BEGIN
END KEY "NOME"
PROMPT 80 1 ""
DATA 4 FIELD 45->NOME
BEGIN END
KEY "DATA NASCITA"
PROMPT 114 1 "" DATA 4
FIELD 45->DATANA BEGIN
FORMAT "1444-" KEY "DATA NASCITA"
END PROMPT 114 1 ""
FIELD 45->DATANA
STRINGA 5 FORMAT "1444-"
BEGIN END
KEY "SESSO"
PROMPT 128 1 "" STRINGA 5
FIELD 45->SESSO BEGIN
END KEY "SESSO"
PROMPT 128 1 ""
STRINGA 6 FIELD 45->SESSO
BEGIN END
KEY "COMUNE DI NASCITA"
PROMPT 11 3 "" STRINGA 6
FIELD 45->COMUNENA BEGIN
END KEY "COMUNE DI NASCITA"
PROMPT 11 3 ""
STRINGA 7 FIELD 45->COMUNENA
BEGIN END
KEY "PROV. DI NASCITA"
PROMPT 51 3 "" STRINGA 7
FIELD 45->PROVNA BEGIN
END KEY "PROV. DI NASCITA"
PROMPT 51 3 ""
STRINGA 8 FIELD 45->PROVNA
BEGIN END
KEY "CONGUAGLI NON EFFETTUATI"
PROMPT 16 5 "" STRINGA 8
FIELD 57->CONEFF BEGIN
END KEY "CONGUAGLI NON EFFETTUATI"
PROMPT 16 5 ""
STRINGA 9 FIELD 57->CONEFF
BEGIN END
KEY "RETTIFICA CONGUAGLIO"
PROMPT 31 5 "" STRINGA 9
FIELD 57->RETCON BEGIN
END KEY "RETTIFICA CONGUAGLIO"
PROMPT 31 5 ""
NUMERO 10 FIELD 57->RETCON
BEGIN END
KEY "IMPOSTA RIMBORSATA"
PROMPT 39 5 "" NUMERO 10
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->10 KEY "IMPOSTA RIMBORSATA"
FIELD 57->SIRPEFRIMB PROMPT 39 5 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->10
NUMERO 11 FIELD 57->SIRPEFRIMB
BEGIN END
KEY "IMPOSTA VERSATA"
PROMPT 54 5 "" NUMERO 11
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->11 KEY "IMPOSTA VERSATA"
FIELD 57->VIRPEF PROMPT 54 5 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->11
NUMERO 12 FIELD 57->VIRPEF
BEGIN END
KEY "INTERESSI"
PROMPT 70 5 "" NUMERO 12
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->12 KEY "INTERESSI"
FIELD 57->INTIRPEF PROMPT 70 5 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->12
NUMERO 13 FIELD 57->INTIRPEF
BEGIN END
KEY "IMPOSTA VERSATA"
PROMPT 85 5 "" NUMERO 13
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->13 KEY "IMPOSTA VERSATA"
FIELD 57->AIRPEFIV PROMPT 85 5 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->13
NUMERO 14 FIELD 57->AIRPEFIV
BEGIN END
KEY "INTERESSI"
PROMPT 100 5 "" NUMERO 14
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->14 KEY "INTERESSI"
FIELD 57->AIRPEFINT PROMPT 100 5 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->14
NUMERO 15 FIELD 57->AIRPEFINT
BEGIN END
KEY "SOPRATTASSA SU IRPEF"
PROMPT 115 5 "" NUMERO 15
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->15 KEY "SOPRATTASSA SU IRPEF"
FIELD 57->STASSA15 PROMPT 115 5 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->15
NUMERO 16 FIELD 57->STASSA15
BEGIN END
KEY "CONTRIBUTO A RIMBORSO"
PROMPT 8 7 "" NUMERO 16
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->16 KEY "CONTRIBUTO A RIMBORSO"
FIELD 57->CONTR16 PROMPT 8 7 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->16
NUMERO 17 FIELD 57->CONTR16
BEGIN END
KEY "CONTRIBUTO VERSATO"
PROMPT 23 7 "" NUMERO 17
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->17 KEY "CONTRIBUTO VERSATO"
FIELD 57->CONTRVER PROMPT 23 7 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->17
NUMERO 18 FIELD 57->CONTRVER
BEGIN END
KEY "INTERESSI"
PROMPT 39 7 "" NUMERO 18
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->18 KEY "INTERESSI"
FIELD 57->INTER18 PROMPT 39 7 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->18
NUMERO 19 FIELD 57->INTER18
BEGIN END
KEY "CONTRIBUTO VERSATO"
PROMPT 54 7 "" NUMERO 19
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->19 KEY "CONTRIBUTO VERSATO"
FIELD 57->CONTV19 PROMPT 54 7 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->19
NUMERO 20 FIELD 57->CONTV19
BEGIN END
KEY "INTERESSI"
PROMPT 70 7 "" NUMERO 20
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->20 KEY "INTERESSI"
FIELD 57->INTE20 PROMPT 70 7 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->20
NUMERO 21 FIELD 57->INTE20
BEGIN END
KEY "SOPRATTASSA SU CSSN"
PROMPT 85 7 "" NUMERO 21
PICTURE "###.###.###.###^^^" BEGIN
MESSAGE ADD,FL->21 KEY "SOPRATTASSA SU CSSN"
FIELD 57->SOPRAT21 PROMPT 85 7 ""
END PICTURE "###.###.###.###^^^"
MESSAGE ADD,FL->21
NUMERO 22 FIELD 57->SOPRAT21
BEGIN END
KEY "MOD. 730/95 NON LIQUIDABILE"
PROMPT 108 7 "" NUMERO 22
FIELD 57->M730NLIQ BEGIN
END KEY "MOD. 730/95 NON LIQUIDABILE"
PROMPT 108 7 ""
STRINGA 23 FIELD 57->M730NLIQ
BEGIN END
KEY "CODICE FISCALE CAAF"
PROMPT 11 9 "" STRINGA 23
FIELD 104@->S1 BEGIN
END KEY "CODICE FISCALE CAAF"
PROMPT 11 9 ""
STRINGA 24 FIELD 104@->S1
BEGIN END
KEY "DENOMINAZIONE CAAF"
PROMPT 44 9 "" STRINGA 24
FIELD 104@->S0 BEGIN
END KEY "DENOMINAZIONE CAAF"
PROMPT 44 9 ""
NUMERO 25 FIELD 104@->S0
BEGIN END
KEY "NUMERO ISCRIZIONE ALBO"
PROMPT 119 9 "" NUMERO 25
FIELD 104@->I1 BEGIN
END KEY "NUMERO ISCRIZIONE ALBO"
PROMPT 119 9 ""
END FIELD 104@->I1
END
SECTION FOOTER LAST 4
END
NUMERO 10
BEGIN SECTION FOOTER LAST 4
KEY "IMPOSTA RIMBORSATA"
PROMPT 39 1 "" NUMERO 10
PICTURE "###.###.###.###^^^" BEGIN
END KEY "IMPOSTA RIMBORSATA"
PROMPT 39 1 ""
NUMERO 11 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "IMPOSTA VERSATA"
PROMPT 54 1 "" NUMERO 11
PICTURE "###.###.###.###^^^" BEGIN
END KEY "IMPOSTA VERSATA"
PROMPT 54 1 ""
NUMERO 12 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "INTERESSI"
PROMPT 70 1 "" NUMERO 12
PICTURE "###.###.###.###^^^" BEGIN
END KEY "INTERESSI"
PROMPT 70 1 ""
NUMERO 13 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "IMPOSTA VERSATA"
PROMPT 85 1 "" NUMERO 13
PICTURE "###.###.###.###^^^" BEGIN
END KEY "IMPOSTA VERSATA"
PROMPT 85 1 ""
NUMERO 14 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "INTERESSI"
PROMPT 100 1 "" NUMERO 14
PICTURE "###.###.###.###^^^" BEGIN
END KEY "INTERESSI"
PROMPT 100 1 ""
NUMERO 15 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "SOPRATTASSA SU IRPEF"
PROMPT 115 1 "" NUMERO 15
PICTURE "###.###.###.###^^^" BEGIN
END KEY "SOPRATTASSA SU IRPEF"
PROMPT 115 1 ""
NUMERO 16 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "CONTRIBUTO A RIMBORSO"
PROMPT 8 3 "" NUMERO 16
PICTURE "###.###.###.###^^^" BEGIN
END KEY "CONTRIBUTO A RIMBORSO"
PROMPT 8 3 ""
NUMERO 17 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "CONTRIBUTO VERSATO"
PROMPT 23 3 "" NUMERO 17
PICTURE "###.###.###.###^^^" BEGIN
END KEY "CONTRIBUTO VERSATO"
PROMPT 23 3 ""
NUMERO 18 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "INTERESSI"
PROMPT 39 3 "" NUMERO 18
PICTURE "###.###.###.###^^^" BEGIN
END KEY "INTERESSI"
PROMPT 39 3 ""
NUMERO 19 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "CONTRIBUTO VERSATO"
PROMPT 54 3 "" NUMERO 19
PICTURE "###.###.###.###^^^" BEGIN
END KEY "CONTRIBUTO VERSATO"
PROMPT 54 3 ""
NUMERO 20 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "INTERESSI"
PROMPT 70 3 "" NUMERO 20
PICTURE "###.###.###.###^^^" BEGIN
END KEY "INTERESSI"
PROMPT 70 3 ""
NUMERO 21 PICTURE "###.###.###.###^^^"
BEGIN END
KEY "SOPRATTASSA SU CSSN"
PROMPT 85 3 "" NUMERO 21
PICTURE "###.###.###.###^^^" BEGIN
END KEY "SOPRATTASSA SU CSSN"
PROMPT 85 3 ""
END PICTURE "###.###.###.###^^^"
END
END

View File

@ -1,6 +1,7 @@
USE 58 USE 58
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
JOIN 9 INTO CODDITTA=CODDITTA JOIN 9 INTO CODDITTA=CODDITTA
JOIN 102 INTO CODDITTA=CODDITTA
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR
JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC
@ -31,6 +32,14 @@ END
SECTION HEADER FIRST 28 SECTION HEADER FIRST 28
LISTA 100
BEGIN
KEY "Ditta trasformata"
FLAGS "H"
ITEM "1|Normale" MESSAGE ENABLE,10@|DISABLE,20@
ITEM "2|Trasformata" MESSAGE ENABLE,20@|DISABLE,10@
END
LISTA 1 LISTA 1
BEGIN BEGIN
KEY "Tipo anagrafica" KEY "Tipo anagrafica"
@ -45,6 +54,7 @@ BEGIN
KEY "CODICE FISCALE" KEY "CODICE FISCALE"
PROMPT 3 13 "" PROMPT 3 13 ""
FIELD 106@->COFI FIELD 106@->COFI
GROUP 10
END END
STRINGA 3 STRINGA 3
@ -53,6 +63,7 @@ BEGIN
PROMPT 40 13 "" PROMPT 40 13 ""
GROUP 2 GROUP 2
FIELD 106@->RAGSOC FIELD 106@->RAGSOC
GROUP 10
END END
STRINGA 4 STRINGA 4
@ -61,6 +72,7 @@ BEGIN
PROMPT 40 13 "" PROMPT 40 13 ""
GROUP 1 GROUP 1
FIELD 106@->RAGSOC[1,30] FIELD 106@->RAGSOC[1,30]
GROUP 10
END END
STRINGA 5 STRINGA 5
@ -69,6 +81,7 @@ BEGIN
PROMPT 17 15 "" PROMPT 17 15 ""
GROUP 1 GROUP 1
FIELD 106@->RAGSOC[31,50] FIELD 106@->RAGSOC[31,50]
GROUP 10
END END
STRINGA 6 STRINGA 6
@ -77,6 +90,7 @@ BEGIN
PROMPT 59 15 "" PROMPT 59 15 ""
GROUP 1 GROUP 1
FIELD 108@->SESSO FIELD 108@->SESSO
GROUP 10
END END
STRINGA 7 STRINGA 7
@ -85,6 +99,7 @@ BEGIN
PROMPT 67 15 "" PROMPT 67 15 ""
GROUP 1 GROUP 1
FIELD 108@->DATANASC FIELD 108@->DATANASC
GROUP 10
END END
STRINGA 8 STRINGA 8
@ -93,6 +108,7 @@ BEGIN
PROMPT 84 15 "" PROMPT 84 15 ""
GROUP 1 GROUP 1
FIELD 113@->DENCOM FIELD 113@->DENCOM
GROUP 10
END END
STRINGA 9 STRINGA 9
@ -101,6 +117,7 @@ BEGIN
PROMPT 126 15 "" PROMPT 126 15 ""
GROUP 1 GROUP 1
FIELD 113@->PROVCOM FIELD 113@->PROVCOM
GROUP 10
END END
STRINGA 10 STRINGA 10
@ -108,6 +125,7 @@ BEGIN
KEY "COMUNE DI RES.FISCALE" KEY "COMUNE DI RES.FISCALE"
PROMPT 17 17 "" PROMPT 17 17 ""
FIELD 213@->DENCOM FIELD 213@->DENCOM
GROUP 10
END END
STRINGA 11 STRINGA 11
@ -115,6 +133,7 @@ BEGIN
KEY "PROV DI RES.FISCALE" KEY "PROV DI RES.FISCALE"
PROMPT 59 17 "" PROMPT 59 17 ""
FIELD 213@->PROVCOM FIELD 213@->PROVCOM
GROUP 10
END END
STRINGA 12 STRINGA 12
@ -122,6 +141,8 @@ BEGIN
KEY "VIA di RES." KEY "VIA di RES."
PROMPT 67 17 "" PROMPT 67 17 ""
FIELD 106@->INDRF FIELD 106@->INDRF
FIELD 106@->INDRES
GROUP 10
END END
STRINGA 15 STRINGA 15
@ -129,6 +150,8 @@ BEGIN
KEY "NUM. CIVICO di RES." KEY "NUM. CIVICO di RES."
PROMPT 104 17 "" PROMPT 104 17 ""
FIELD 106@->CIVRF FIELD 106@->CIVRF
FIELD 106@->CIVRES
GROUP 10
END END
STRINGA 16 STRINGA 16
@ -136,6 +159,8 @@ BEGIN
KEY "CAP" KEY "CAP"
PROMPT 123 17 "" PROMPT 123 17 ""
FIELD 106@->CAPRF FIELD 106@->CAPRF
FIELD 106@->CAPRES
GROUP 10
END END
STRINGA 13 STRINGA 13
@ -150,6 +175,101 @@ BEGIN
PROMPT 125 25 "" PROMPT 125 25 ""
END END
STRINGA 102
BEGIN
KEY "CODICE FISCALE"
PROMPT 3 12 ""
FIELD 102->CODFISC
GROUP 20
END
STRINGA 103
BEGIN
KEY "RAGIONE SOCIALE"
PROMPT 39 12 ""
GROUP 2
FIELD 102->DENOMIN
GROUP 20
END
STRINGA 104
BEGIN
KEY "COGNOME"
PROMPT 39 12 ""
GROUP 1
FIELD 102->DENOMIN
GROUP 20
END
STRINGA 105
BEGIN
KEY "NOME"
PROMPT 17 14 ""
GROUP 1
FIELD 102->NOME
GROUP 20
END
STRINGA 106
BEGIN
KEY "SESSO"
PROMPT 58 14 ""
GROUP 1
FIELD 102->SESSO
GROUP 20
END
STRINGA 107
BEGIN
KEY "DATA DI NASCITA"
PROMPT 67 14 ""
GROUP 1
FIELD 102->DATANAS
GROUP 20
END
STRINGA 108
BEGIN
KEY "COMUNE DI NASCITA"
PROMPT 84 14 ""
GROUP 1
FIELD 102->COMNAS
GROUP 20
END
STRINGA 109
BEGIN
KEY "PROV. DI NASCITA"
PROMPT 125 14 ""
GROUP 1
FIELD 102->PROVNAS
GROUP 20
END
STRINGA 110
BEGIN
KEY "COMUNE DI RES.FISCALE"
PROMPT 17 16 ""
FIELD 102->COMDOM
GROUP 20
END
STRINGA 111
BEGIN
KEY "PROV DI RES.FISCALE"
PROMPT 59 16 ""
FIELD 102->PROVDOM
GROUP 20
END
STRINGA 112
BEGIN
KEY "VIA di RES."
PROMPT 66 16 ""
FIELD 102->INDDOM
GROUP 20
END
END END
SECTION BODY ODD 6 SECTION BODY ODD 6