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
parent
aa71082da5
commit
83438e7b0a
2239
m770/77qa.frm
2239
m770/77qa.frm
File diff suppressed because it is too large
Load Diff
919
m770/77qa1.frm
919
m770/77qa1.frm
@ -1,458 +1,461 @@
|
||||
USE 56
|
||||
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
|
||||
JOIN %CAF ALIAS 104 INTO CODTAB=CODCAAF
|
||||
JOIN 9 INTO CODDITTA=CODDITTA
|
||||
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||
JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR
|
||||
JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC
|
||||
JOIN 13 TO 106@ ALIAS 213 INTO COM==COMRF(COMRES)
|
||||
|
||||
END
|
||||
DESCRIPTION
|
||||
BEGIN
|
||||
56->* "Quadro A1 770"
|
||||
45->* "Anagrafica dei dipendenti"
|
||||
104@->* "Tabella CAAF"
|
||||
9->* "Ditte"
|
||||
106@->* "Anagrafica persone fisiche e giuridiche (ditta)"
|
||||
108@->* "Anagrafica persone fisiche (ditta)"
|
||||
113@->* "Comuni DITTA (nascita)"
|
||||
213@->* "Comuni DITTA (residenza)"
|
||||
END
|
||||
|
||||
GENERAL
|
||||
BEGIN
|
||||
OFFSET 0 0
|
||||
FONT "Courier New"
|
||||
SIZE 11
|
||||
CARATTERE "X"
|
||||
INIZIO_POS 3 2
|
||||
FINE_POS 131
|
||||
GRID "+++++++++-|"
|
||||
END
|
||||
|
||||
SECTION HEADER FIRST 28
|
||||
|
||||
LISTA 1
|
||||
BEGIN
|
||||
KEY "Tipo anagrafica"
|
||||
FLAGS "H"
|
||||
FIELD 106@->TIPOA
|
||||
ITEM "F|Fisica" MESSAGE SHOW,1@|HIDE,2@
|
||||
ITEM "G|Giuridica" MESSAGE SHOW,2@|HIDE,1@
|
||||
END
|
||||
|
||||
STRINGA 2
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE"
|
||||
PROMPT 3 13 ""
|
||||
FIELD 106@->COFI
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "RAGIONE SOCIALE"
|
||||
PROMPT 40 13 ""
|
||||
GROUP 2
|
||||
FIELD 106@->RAGSOC
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "COGNOME"
|
||||
PROMPT 40 13 ""
|
||||
GROUP 1
|
||||
FIELD 106@->RAGSOC[1,30]
|
||||
END
|
||||
|
||||
STRINGA 5
|
||||
BEGIN
|
||||
KEY "NOME"
|
||||
PROMPT 17 15 ""
|
||||
GROUP 1
|
||||
FIELD 106@->RAGSOC[31,50]
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
BEGIN
|
||||
KEY "SESSO"
|
||||
PROMPT 58 15 ""
|
||||
GROUP 1
|
||||
FIELD 108@->SESSO
|
||||
END
|
||||
|
||||
STRINGA 7
|
||||
BEGIN
|
||||
KEY "DATA DI NASCITA"
|
||||
PROMPT 67 15 ""
|
||||
GROUP 1
|
||||
FIELD 108@->DATANASC
|
||||
END
|
||||
|
||||
STRINGA 8
|
||||
BEGIN
|
||||
KEY "COMUNE DI NASCITA"
|
||||
PROMPT 84 15 ""
|
||||
GROUP 1
|
||||
FIELD 113@->DENCOM
|
||||
END
|
||||
|
||||
STRINGA 9
|
||||
BEGIN
|
||||
KEY "PROV. DI NASCITA"
|
||||
PROMPT 126 15 ""
|
||||
GROUP 1
|
||||
FIELD 113@->PROVCOM
|
||||
END
|
||||
|
||||
STRINGA 10
|
||||
BEGIN
|
||||
KEY "COMUNE DI RES.FISCALE"
|
||||
PROMPT 17 17 ""
|
||||
FIELD 213@->DENCOM
|
||||
END
|
||||
|
||||
STRINGA 11
|
||||
BEGIN
|
||||
KEY "PROV DI RES.FISCALE"
|
||||
PROMPT 59 17 ""
|
||||
FIELD 213@->PROVCOM
|
||||
END
|
||||
|
||||
STRINGA 12
|
||||
BEGIN
|
||||
KEY "VIA di RES."
|
||||
PROMPT 66 17 ""
|
||||
FIELD 106@->INDRF
|
||||
END
|
||||
|
||||
STRINGA 15
|
||||
BEGIN
|
||||
KEY "NUM. CIVICO di RES."
|
||||
PROMPT 104 17 ""
|
||||
FIELD 106@->CIVRF
|
||||
END
|
||||
|
||||
STRINGA 16
|
||||
BEGIN
|
||||
KEY "CAP"
|
||||
PROMPT 125 17 ""
|
||||
FIELD 106@->CAPRF
|
||||
END
|
||||
|
||||
STRINGA 13
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE DEL SOGGETTO DICHIARANTE"
|
||||
PROMPT 87 20 ""
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "NUM. FOGLIO"
|
||||
PROMPT 125 23 ""
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION BODY ODD 10
|
||||
|
||||
STRINGA 1
|
||||
BEGIN
|
||||
KEY "COD.FIS"
|
||||
PROMPT 11 1 ""
|
||||
FIELD 45->CODFI
|
||||
END
|
||||
|
||||
STRINGA 2
|
||||
BEGIN
|
||||
KEY "COGNOME"
|
||||
PROMPT 43 1 ""
|
||||
FIELD 45->COGNOME
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "NOME"
|
||||
PROMPT 80 1 ""
|
||||
FIELD 45->NOME
|
||||
END
|
||||
|
||||
DATA 4
|
||||
BEGIN
|
||||
KEY "DATA NASCITA"
|
||||
PROMPT 114 1 ""
|
||||
FIELD 45->DATANA
|
||||
FORMAT "1444-"
|
||||
END
|
||||
|
||||
STRINGA 5
|
||||
BEGIN
|
||||
KEY "SESSO"
|
||||
PROMPT 128 1 ""
|
||||
FIELD 45->SESSO
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
BEGIN
|
||||
KEY "COMUNE DI NASCITA"
|
||||
PROMPT 11 3 ""
|
||||
FIELD 45->COMUNENA
|
||||
END
|
||||
|
||||
STRINGA 7
|
||||
BEGIN
|
||||
KEY "PROV DI NASCITA"
|
||||
PROMPT 48 3 ""
|
||||
FIELD 45->PROVNA
|
||||
END
|
||||
|
||||
NUMERO 8
|
||||
BEGIN
|
||||
KEY "MESE DI RIFERIMENTO"
|
||||
PROMPT 11 5 ""
|
||||
FIELD 56->MESERIF
|
||||
END
|
||||
|
||||
NUMERO 9
|
||||
BEGIN
|
||||
KEY "IMPOSTA RIMBORSATA"
|
||||
PROMPT 25 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->IMPRIMB9
|
||||
MESSAGE ADD,FL->9
|
||||
END
|
||||
|
||||
NUMERO 10
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 44 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->IMPVERS10
|
||||
MESSAGE ADD,FL->10
|
||||
END
|
||||
|
||||
NUMERO 11
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 63 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->INTER11
|
||||
MESSAGE ADD,FL->11
|
||||
END
|
||||
|
||||
NUMERO 12
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 81 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->IMPVERS12
|
||||
MESSAGE ADD,FL->12
|
||||
END
|
||||
|
||||
NUMERO 13
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 100 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->INTER13
|
||||
MESSAGE ADD,FL->13
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 116 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->STASSA14
|
||||
MESSAGE ADD,FL->14
|
||||
END
|
||||
|
||||
NUMERO 15
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO A RIMBORSO"
|
||||
PROMPT 11 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->CONTRIMB15
|
||||
MESSAGE ADD,FL->15
|
||||
END
|
||||
|
||||
NUMERO 16
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 30 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->CONTVERS16
|
||||
MESSAGE ADD,FL->16
|
||||
END
|
||||
|
||||
NUMERO 17
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 49 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->INTER17
|
||||
MESSAGE ADD,FL->17
|
||||
END
|
||||
|
||||
NUMERO 18
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 68 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->CONTVER18
|
||||
MESSAGE ADD,FL->18
|
||||
END
|
||||
|
||||
NUMERO 19
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 86 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->INTER19
|
||||
MESSAGE ADD,FL->19
|
||||
END
|
||||
|
||||
NUMERO 20
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 102 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->STASSA20
|
||||
MESSAGE ADD,FL->20
|
||||
END
|
||||
|
||||
STRINGA 21
|
||||
BEGIN
|
||||
KEY "CONGUAGLI NON EFFETTUATI"
|
||||
PROMPT 122 7 ""
|
||||
FIELD 56->CONNEFF21
|
||||
END
|
||||
|
||||
STRINGA 22
|
||||
BEGIN
|
||||
KEY "TIPO CONGUAGLIO"
|
||||
PROMPT 129 7 ""
|
||||
FIELD 56->TIPOCONG22
|
||||
END
|
||||
|
||||
STRINGA 23
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE CAAF"
|
||||
PROMPT 11 9 ""
|
||||
FIELD 104@->S1
|
||||
END
|
||||
|
||||
STRINGA 24
|
||||
BEGIN
|
||||
KEY "DENOMINAZIONE CAAF"
|
||||
PROMPT 43 9 ""
|
||||
FIELD 104@->S0
|
||||
END
|
||||
|
||||
NUMERO 25
|
||||
BEGIN
|
||||
KEY "NUMERO ISCRIZIONE ALBO"
|
||||
PROMPT 101 9 ""
|
||||
FIELD 104@->I1
|
||||
END
|
||||
|
||||
DATA 26
|
||||
BEGIN
|
||||
KEY "DATA RICEZIONE MOD.730-5"
|
||||
PROMPT 115 9 ""
|
||||
FORMAT "1444-"
|
||||
PICTURE "## ^ ##^^^^^"
|
||||
FIELD 56->DATARIC26
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER LAST 4
|
||||
|
||||
NUMERO 9
|
||||
BEGIN
|
||||
KEY "IMPOSTA RIMBORSATA"
|
||||
PROMPT 25 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 10
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 44 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 11
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 63 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 12
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 81 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 13
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 100 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 116 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 15
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO A RIMBORSO"
|
||||
PROMPT 11 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 16
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 30 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 17
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 49 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 18
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 68 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 19
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 86 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 20
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 102 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
END
|
||||
USE 56
|
||||
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
|
||||
JOIN %CAF ALIAS 104 INTO CODTAB=CODCAAF
|
||||
JOIN 9 INTO CODDITTA=CODDITTA
|
||||
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||
JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR
|
||||
JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC
|
||||
JOIN 13 TO 106@ ALIAS 213 INTO COM==COMRF(COMRES)
|
||||
|
||||
END
|
||||
DESCRIPTION
|
||||
BEGIN
|
||||
56->* "Quadro A1 770"
|
||||
45->* "Anagrafica dei dipendenti"
|
||||
104@->* "Tabella CAAF"
|
||||
9->* "Ditte"
|
||||
106@->* "Anagrafica persone fisiche e giuridiche (ditta)"
|
||||
108@->* "Anagrafica persone fisiche (ditta)"
|
||||
113@->* "Comuni DITTA (nascita)"
|
||||
213@->* "Comuni DITTA (residenza)"
|
||||
END
|
||||
|
||||
GENERAL
|
||||
BEGIN
|
||||
OFFSET 0 0
|
||||
FONT "Courier New"
|
||||
SIZE 11
|
||||
CARATTERE "X"
|
||||
INIZIO_POS 3 2
|
||||
FINE_POS 131
|
||||
GRID "+++++++++-|"
|
||||
END
|
||||
|
||||
SECTION HEADER FIRST 28
|
||||
|
||||
LISTA 1
|
||||
BEGIN
|
||||
KEY "Tipo anagrafica"
|
||||
FLAGS "H"
|
||||
FIELD 106@->TIPOA
|
||||
ITEM "F|Fisica" MESSAGE SHOW,1@|HIDE,2@
|
||||
ITEM "G|Giuridica" MESSAGE SHOW,2@|HIDE,1@
|
||||
END
|
||||
|
||||
STRINGA 2
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE"
|
||||
PROMPT 3 13 ""
|
||||
FIELD 106@->COFI
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "RAGIONE SOCIALE"
|
||||
PROMPT 40 13 ""
|
||||
GROUP 2
|
||||
FIELD 106@->RAGSOC
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "COGNOME"
|
||||
PROMPT 40 13 ""
|
||||
GROUP 1
|
||||
FIELD 106@->RAGSOC[1,30]
|
||||
END
|
||||
|
||||
STRINGA 5
|
||||
BEGIN
|
||||
KEY "NOME"
|
||||
PROMPT 17 15 ""
|
||||
GROUP 1
|
||||
FIELD 106@->RAGSOC[31,50]
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
BEGIN
|
||||
KEY "SESSO"
|
||||
PROMPT 58 15 ""
|
||||
GROUP 1
|
||||
FIELD 108@->SESSO
|
||||
END
|
||||
|
||||
STRINGA 7
|
||||
BEGIN
|
||||
KEY "DATA DI NASCITA"
|
||||
PROMPT 67 15 ""
|
||||
GROUP 1
|
||||
FIELD 108@->DATANASC
|
||||
END
|
||||
|
||||
STRINGA 8
|
||||
BEGIN
|
||||
KEY "COMUNE DI NASCITA"
|
||||
PROMPT 84 15 ""
|
||||
GROUP 1
|
||||
FIELD 113@->DENCOM
|
||||
END
|
||||
|
||||
STRINGA 9
|
||||
BEGIN
|
||||
KEY "PROV. DI NASCITA"
|
||||
PROMPT 126 15 ""
|
||||
GROUP 1
|
||||
FIELD 113@->PROVCOM
|
||||
END
|
||||
|
||||
STRINGA 10
|
||||
BEGIN
|
||||
KEY "COMUNE DI RES.FISCALE"
|
||||
PROMPT 17 17 ""
|
||||
FIELD 213@->DENCOM
|
||||
END
|
||||
|
||||
STRINGA 11
|
||||
BEGIN
|
||||
KEY "PROV DI RES.FISCALE"
|
||||
PROMPT 59 17 ""
|
||||
FIELD 213@->PROVCOM
|
||||
END
|
||||
|
||||
STRINGA 12
|
||||
BEGIN
|
||||
KEY "VIA di RES."
|
||||
PROMPT 66 17 ""
|
||||
FIELD 106@->INDRF
|
||||
FIELD 106@->INDRES
|
||||
END
|
||||
|
||||
STRINGA 15
|
||||
BEGIN
|
||||
KEY "NUM. CIVICO di RES."
|
||||
PROMPT 104 17 ""
|
||||
FIELD 106@->CIVRF
|
||||
FIELD 106@->CIVRES
|
||||
END
|
||||
|
||||
STRINGA 16
|
||||
BEGIN
|
||||
KEY "CAP"
|
||||
PROMPT 125 17 ""
|
||||
FIELD 106@->CAPRF
|
||||
FIELD 106@->CAPRES
|
||||
END
|
||||
|
||||
STRINGA 13
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE DEL SOGGETTO DICHIARANTE"
|
||||
PROMPT 87 20 ""
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "NUM. FOGLIO"
|
||||
PROMPT 125 23 ""
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION BODY ODD 10
|
||||
|
||||
STRINGA 1
|
||||
BEGIN
|
||||
KEY "COD.FIS"
|
||||
PROMPT 11 1 ""
|
||||
FIELD 45->CODFI
|
||||
END
|
||||
|
||||
STRINGA 2
|
||||
BEGIN
|
||||
KEY "COGNOME"
|
||||
PROMPT 43 1 ""
|
||||
FIELD 45->COGNOME
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "NOME"
|
||||
PROMPT 80 1 ""
|
||||
FIELD 45->NOME
|
||||
END
|
||||
|
||||
DATA 4
|
||||
BEGIN
|
||||
KEY "DATA NASCITA"
|
||||
PROMPT 114 1 ""
|
||||
FIELD 45->DATANA
|
||||
FORMAT "1444-"
|
||||
END
|
||||
|
||||
STRINGA 5
|
||||
BEGIN
|
||||
KEY "SESSO"
|
||||
PROMPT 128 1 ""
|
||||
FIELD 45->SESSO
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
BEGIN
|
||||
KEY "COMUNE DI NASCITA"
|
||||
PROMPT 11 3 ""
|
||||
FIELD 45->COMUNENA
|
||||
END
|
||||
|
||||
STRINGA 7
|
||||
BEGIN
|
||||
KEY "PROV DI NASCITA"
|
||||
PROMPT 48 3 ""
|
||||
FIELD 45->PROVNA
|
||||
END
|
||||
|
||||
NUMERO 8
|
||||
BEGIN
|
||||
KEY "MESE DI RIFERIMENTO"
|
||||
PROMPT 11 5 ""
|
||||
FIELD 56->MESERIF
|
||||
END
|
||||
|
||||
NUMERO 9
|
||||
BEGIN
|
||||
KEY "IMPOSTA RIMBORSATA"
|
||||
PROMPT 25 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->IMPRIMB9
|
||||
MESSAGE ADD,FL->9
|
||||
END
|
||||
|
||||
NUMERO 10
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 44 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->IMPVERS10
|
||||
MESSAGE ADD,FL->10
|
||||
END
|
||||
|
||||
NUMERO 11
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 63 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->INTER11
|
||||
MESSAGE ADD,FL->11
|
||||
END
|
||||
|
||||
NUMERO 12
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 81 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->IMPVERS12
|
||||
MESSAGE ADD,FL->12
|
||||
END
|
||||
|
||||
NUMERO 13
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 100 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->INTER13
|
||||
MESSAGE ADD,FL->13
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 116 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->STASSA14
|
||||
MESSAGE ADD,FL->14
|
||||
END
|
||||
|
||||
NUMERO 15
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO A RIMBORSO"
|
||||
PROMPT 11 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->CONTRIMB15
|
||||
MESSAGE ADD,FL->15
|
||||
END
|
||||
|
||||
NUMERO 16
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 30 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->CONTVERS16
|
||||
MESSAGE ADD,FL->16
|
||||
END
|
||||
|
||||
NUMERO 17
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 49 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->INTER17
|
||||
MESSAGE ADD,FL->17
|
||||
END
|
||||
|
||||
NUMERO 18
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 68 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->CONTVER18
|
||||
MESSAGE ADD,FL->18
|
||||
END
|
||||
|
||||
NUMERO 19
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 86 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->INTER19
|
||||
MESSAGE ADD,FL->19
|
||||
END
|
||||
|
||||
NUMERO 20
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 102 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
FIELD 56->STASSA20
|
||||
MESSAGE ADD,FL->20
|
||||
END
|
||||
|
||||
STRINGA 21
|
||||
BEGIN
|
||||
KEY "CONGUAGLI NON EFFETTUATI"
|
||||
PROMPT 122 7 ""
|
||||
FIELD 56->CONNEFF21
|
||||
END
|
||||
|
||||
STRINGA 22
|
||||
BEGIN
|
||||
KEY "TIPO CONGUAGLIO"
|
||||
PROMPT 129 7 ""
|
||||
FIELD 56->TIPOCONG22
|
||||
END
|
||||
|
||||
STRINGA 23
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE CAAF"
|
||||
PROMPT 11 9 ""
|
||||
FIELD 104@->S1
|
||||
END
|
||||
|
||||
STRINGA 24
|
||||
BEGIN
|
||||
KEY "DENOMINAZIONE CAAF"
|
||||
PROMPT 43 9 ""
|
||||
FIELD 104@->S0
|
||||
END
|
||||
|
||||
NUMERO 25
|
||||
BEGIN
|
||||
KEY "NUMERO ISCRIZIONE ALBO"
|
||||
PROMPT 101 9 ""
|
||||
FIELD 104@->I1
|
||||
END
|
||||
|
||||
DATA 26
|
||||
BEGIN
|
||||
KEY "DATA RICEZIONE MOD.730-5"
|
||||
PROMPT 115 9 ""
|
||||
FORMAT "1444-"
|
||||
PICTURE "## ^ ##^^^^^"
|
||||
FIELD 56->DATARIC26
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER LAST 4
|
||||
|
||||
NUMERO 9
|
||||
BEGIN
|
||||
KEY "IMPOSTA RIMBORSATA"
|
||||
PROMPT 25 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 10
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 44 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 11
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 63 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 12
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 81 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 13
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 100 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 116 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 15
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO A RIMBORSO"
|
||||
PROMPT 11 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 16
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 30 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 17
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 49 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 18
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 68 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 19
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 86 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 20
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 102 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
897
m770/77qa2.frm
897
m770/77qa2.frm
@ -1,447 +1,450 @@
|
||||
USE 57
|
||||
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
|
||||
JOIN %CAF ALIAS 104 INTO CODTAB=CODCAAF
|
||||
JOIN 9 INTO CODDITTA=CODDITTA
|
||||
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||
JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR
|
||||
JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC
|
||||
JOIN 13 TO 106@ ALIAS 213 INTO COM==COMRF(COMRES)
|
||||
|
||||
END
|
||||
DESCRIPTION
|
||||
BEGIN
|
||||
57->* "Quadro A2 770"
|
||||
45->* "Anagrafica dei dipendenti"
|
||||
104@->* "Tabella CAAF"
|
||||
9->* "Ditte"
|
||||
106@->* "Anagrafica persone fisiche e giuridiche (ditta)"
|
||||
108@->* "Anagrafica persone fisiche (ditta)"
|
||||
113@->* "Comuni DITTA (nascita)"
|
||||
213@->* "Comuni DITTA (residenza)"
|
||||
END
|
||||
|
||||
GENERAL
|
||||
BEGIN
|
||||
OFFSET 0 0
|
||||
FONT "Courier New"
|
||||
SIZE 11
|
||||
CARATTERE "X"
|
||||
INIZIO_POS 3 2
|
||||
FINE_POS 131
|
||||
GRID "+++++++++-|"
|
||||
END
|
||||
|
||||
SECTION HEADER FIRST 28
|
||||
|
||||
LISTA 1
|
||||
BEGIN
|
||||
KEY "Tipo anagrafica"
|
||||
FLAGS "H"
|
||||
FIELD 106@->TIPOA
|
||||
ITEM "F|Fisica" MESSAGE SHOW,1@|HIDE,2@
|
||||
ITEM "G|Giuridica" MESSAGE SHOW,2@|HIDE,1@
|
||||
END
|
||||
|
||||
STRINGA 2
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE"
|
||||
PROMPT 3 13 ""
|
||||
FIELD 106@->COFI
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "RAGIONE SOCIALE"
|
||||
PROMPT 40 13 ""
|
||||
GROUP 2
|
||||
FIELD 106@->RAGSOC
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "COGNOME"
|
||||
PROMPT 40 13 ""
|
||||
GROUP 1
|
||||
FIELD 106@->RAGSOC[1,30]
|
||||
END
|
||||
|
||||
STRINGA 5
|
||||
BEGIN
|
||||
KEY "NOME"
|
||||
PROMPT 17 15 ""
|
||||
GROUP 1
|
||||
FIELD 106@->RAGSOC[31,50]
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
BEGIN
|
||||
KEY "SESSO"
|
||||
PROMPT 59 15 ""
|
||||
GROUP 1
|
||||
FIELD 108@->SESSO
|
||||
END
|
||||
|
||||
STRINGA 7
|
||||
BEGIN
|
||||
KEY "DATA DI NASCITA"
|
||||
PROMPT 67 15 ""
|
||||
GROUP 1
|
||||
FIELD 108@->DATANASC
|
||||
END
|
||||
|
||||
STRINGA 8
|
||||
BEGIN
|
||||
KEY "COMUNE DI NASCITA"
|
||||
PROMPT 84 15 ""
|
||||
GROUP 1
|
||||
FIELD 113@->DENCOM
|
||||
END
|
||||
|
||||
STRINGA 9
|
||||
BEGIN
|
||||
KEY "PROV. DI NASCITA"
|
||||
PROMPT 125 15 ""
|
||||
GROUP 1
|
||||
FIELD 113@->PROVCOM
|
||||
END
|
||||
|
||||
STRINGA 10
|
||||
BEGIN
|
||||
KEY "COMUNE DI RES.FISCALE"
|
||||
PROMPT 17 17 ""
|
||||
FIELD 213@->DENCOM
|
||||
END
|
||||
|
||||
STRINGA 11
|
||||
BEGIN
|
||||
KEY "PROV DI RES.FISCALE"
|
||||
PROMPT 59 17 ""
|
||||
FIELD 213@->PROVCOM
|
||||
END
|
||||
|
||||
STRINGA 12
|
||||
BEGIN
|
||||
KEY "VIA di RES."
|
||||
PROMPT 66 17 ""
|
||||
FIELD 106@->INDRF
|
||||
END
|
||||
|
||||
STRINGA 15
|
||||
BEGIN
|
||||
KEY "NUM. CIVICO di RES."
|
||||
PROMPT 104 17 ""
|
||||
FIELD 106@->CIVRF
|
||||
END
|
||||
|
||||
STRINGA 16
|
||||
BEGIN
|
||||
KEY "CAP"
|
||||
PROMPT 123 17 ""
|
||||
FIELD 106@->CAPRF
|
||||
END
|
||||
|
||||
STRINGA 13
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE DEL SOGGETTO DICHIARANTE"
|
||||
PROMPT 87 20 ""
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "NUM. FOGLIO"
|
||||
PROMPT 125 23 ""
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION BODY ODD 10
|
||||
|
||||
STRINGA 1
|
||||
BEGIN
|
||||
KEY "COD.FIS"
|
||||
PROMPT 11 1 ""
|
||||
FIELD 45->CODFI
|
||||
END
|
||||
|
||||
STRINGA 2
|
||||
BEGIN
|
||||
KEY "COGNOME"
|
||||
PROMPT 43 1 ""
|
||||
FIELD 45->COGNOME
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "NOME"
|
||||
PROMPT 80 1 ""
|
||||
FIELD 45->NOME
|
||||
END
|
||||
|
||||
DATA 4
|
||||
BEGIN
|
||||
KEY "DATA NASCITA"
|
||||
PROMPT 114 1 ""
|
||||
FIELD 45->DATANA
|
||||
FORMAT "1444-"
|
||||
END
|
||||
|
||||
STRINGA 5
|
||||
BEGIN
|
||||
KEY "SESSO"
|
||||
PROMPT 128 1 ""
|
||||
FIELD 45->SESSO
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
BEGIN
|
||||
KEY "COMUNE DI NASCITA"
|
||||
PROMPT 11 3 ""
|
||||
FIELD 45->COMUNENA
|
||||
END
|
||||
|
||||
STRINGA 7
|
||||
BEGIN
|
||||
KEY "PROV. DI NASCITA"
|
||||
PROMPT 51 3 ""
|
||||
FIELD 45->PROVNA
|
||||
END
|
||||
|
||||
STRINGA 8
|
||||
BEGIN
|
||||
KEY "CONGUAGLI NON EFFETTUATI"
|
||||
PROMPT 16 5 ""
|
||||
FIELD 57->CONEFF
|
||||
END
|
||||
|
||||
STRINGA 9
|
||||
BEGIN
|
||||
KEY "RETTIFICA CONGUAGLIO"
|
||||
PROMPT 31 5 ""
|
||||
FIELD 57->RETCON
|
||||
END
|
||||
|
||||
NUMERO 10
|
||||
BEGIN
|
||||
KEY "IMPOSTA RIMBORSATA"
|
||||
PROMPT 39 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->10
|
||||
FIELD 57->SIRPEFRIMB
|
||||
END
|
||||
|
||||
NUMERO 11
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 54 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->11
|
||||
FIELD 57->VIRPEF
|
||||
END
|
||||
|
||||
NUMERO 12
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 70 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->12
|
||||
FIELD 57->INTIRPEF
|
||||
END
|
||||
|
||||
NUMERO 13
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 85 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->13
|
||||
FIELD 57->AIRPEFIV
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 100 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->14
|
||||
FIELD 57->AIRPEFINT
|
||||
END
|
||||
|
||||
NUMERO 15
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 115 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->15
|
||||
FIELD 57->STASSA15
|
||||
END
|
||||
|
||||
NUMERO 16
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO A RIMBORSO"
|
||||
PROMPT 8 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->16
|
||||
FIELD 57->CONTR16
|
||||
END
|
||||
|
||||
NUMERO 17
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 23 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->17
|
||||
FIELD 57->CONTRVER
|
||||
END
|
||||
|
||||
NUMERO 18
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 39 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->18
|
||||
FIELD 57->INTER18
|
||||
END
|
||||
|
||||
NUMERO 19
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 54 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->19
|
||||
FIELD 57->CONTV19
|
||||
END
|
||||
|
||||
NUMERO 20
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 70 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->20
|
||||
FIELD 57->INTE20
|
||||
END
|
||||
|
||||
NUMERO 21
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU CSSN"
|
||||
PROMPT 85 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->21
|
||||
FIELD 57->SOPRAT21
|
||||
END
|
||||
|
||||
NUMERO 22
|
||||
BEGIN
|
||||
KEY "MOD. 730/95 NON LIQUIDABILE"
|
||||
PROMPT 108 7 ""
|
||||
FIELD 57->M730NLIQ
|
||||
END
|
||||
|
||||
STRINGA 23
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE CAAF"
|
||||
PROMPT 11 9 ""
|
||||
FIELD 104@->S1
|
||||
END
|
||||
|
||||
STRINGA 24
|
||||
BEGIN
|
||||
KEY "DENOMINAZIONE CAAF"
|
||||
PROMPT 44 9 ""
|
||||
FIELD 104@->S0
|
||||
END
|
||||
|
||||
NUMERO 25
|
||||
BEGIN
|
||||
KEY "NUMERO ISCRIZIONE ALBO"
|
||||
PROMPT 119 9 ""
|
||||
FIELD 104@->I1
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER LAST 4
|
||||
|
||||
NUMERO 10
|
||||
BEGIN
|
||||
KEY "IMPOSTA RIMBORSATA"
|
||||
PROMPT 39 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 11
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 54 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 12
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 70 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 13
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 85 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 100 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 15
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 115 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 16
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO A RIMBORSO"
|
||||
PROMPT 8 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 17
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 23 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 18
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 39 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 19
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 54 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 20
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 70 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 21
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU CSSN"
|
||||
PROMPT 85 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
END
|
||||
USE 57
|
||||
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
|
||||
JOIN %CAF ALIAS 104 INTO CODTAB=CODCAAF
|
||||
JOIN 9 INTO CODDITTA=CODDITTA
|
||||
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||
JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR
|
||||
JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC
|
||||
JOIN 13 TO 106@ ALIAS 213 INTO COM==COMRF(COMRES)
|
||||
|
||||
END
|
||||
DESCRIPTION
|
||||
BEGIN
|
||||
57->* "Quadro A2 770"
|
||||
45->* "Anagrafica dei dipendenti"
|
||||
104@->* "Tabella CAAF"
|
||||
9->* "Ditte"
|
||||
106@->* "Anagrafica persone fisiche e giuridiche (ditta)"
|
||||
108@->* "Anagrafica persone fisiche (ditta)"
|
||||
113@->* "Comuni DITTA (nascita)"
|
||||
213@->* "Comuni DITTA (residenza)"
|
||||
END
|
||||
|
||||
GENERAL
|
||||
BEGIN
|
||||
OFFSET 0 0
|
||||
FONT "Courier New"
|
||||
SIZE 11
|
||||
CARATTERE "X"
|
||||
INIZIO_POS 3 2
|
||||
FINE_POS 131
|
||||
GRID "+++++++++-|"
|
||||
END
|
||||
|
||||
SECTION HEADER FIRST 28
|
||||
|
||||
LISTA 1
|
||||
BEGIN
|
||||
KEY "Tipo anagrafica"
|
||||
FLAGS "H"
|
||||
FIELD 106@->TIPOA
|
||||
ITEM "F|Fisica" MESSAGE SHOW,1@|HIDE,2@
|
||||
ITEM "G|Giuridica" MESSAGE SHOW,2@|HIDE,1@
|
||||
END
|
||||
|
||||
STRINGA 2
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE"
|
||||
PROMPT 3 13 ""
|
||||
FIELD 106@->COFI
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "RAGIONE SOCIALE"
|
||||
PROMPT 40 13 ""
|
||||
GROUP 2
|
||||
FIELD 106@->RAGSOC
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "COGNOME"
|
||||
PROMPT 40 13 ""
|
||||
GROUP 1
|
||||
FIELD 106@->RAGSOC[1,30]
|
||||
END
|
||||
|
||||
STRINGA 5
|
||||
BEGIN
|
||||
KEY "NOME"
|
||||
PROMPT 17 15 ""
|
||||
GROUP 1
|
||||
FIELD 106@->RAGSOC[31,50]
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
BEGIN
|
||||
KEY "SESSO"
|
||||
PROMPT 59 15 ""
|
||||
GROUP 1
|
||||
FIELD 108@->SESSO
|
||||
END
|
||||
|
||||
STRINGA 7
|
||||
BEGIN
|
||||
KEY "DATA DI NASCITA"
|
||||
PROMPT 67 15 ""
|
||||
GROUP 1
|
||||
FIELD 108@->DATANASC
|
||||
END
|
||||
|
||||
STRINGA 8
|
||||
BEGIN
|
||||
KEY "COMUNE DI NASCITA"
|
||||
PROMPT 84 15 ""
|
||||
GROUP 1
|
||||
FIELD 113@->DENCOM
|
||||
END
|
||||
|
||||
STRINGA 9
|
||||
BEGIN
|
||||
KEY "PROV. DI NASCITA"
|
||||
PROMPT 125 15 ""
|
||||
GROUP 1
|
||||
FIELD 113@->PROVCOM
|
||||
END
|
||||
|
||||
STRINGA 10
|
||||
BEGIN
|
||||
KEY "COMUNE DI RES.FISCALE"
|
||||
PROMPT 17 17 ""
|
||||
FIELD 213@->DENCOM
|
||||
END
|
||||
|
||||
STRINGA 11
|
||||
BEGIN
|
||||
KEY "PROV DI RES.FISCALE"
|
||||
PROMPT 59 17 ""
|
||||
FIELD 213@->PROVCOM
|
||||
END
|
||||
|
||||
STRINGA 12
|
||||
BEGIN
|
||||
KEY "VIA di RES."
|
||||
PROMPT 66 17 ""
|
||||
FIELD 106@->INDRF
|
||||
FIELD 106@->INDRES
|
||||
END
|
||||
|
||||
STRINGA 15
|
||||
BEGIN
|
||||
KEY "NUM. CIVICO di RES."
|
||||
PROMPT 104 17 ""
|
||||
FIELD 106@->CIVRF
|
||||
FIELD 106@->CIVRES
|
||||
END
|
||||
|
||||
STRINGA 16
|
||||
BEGIN
|
||||
KEY "CAP"
|
||||
PROMPT 123 17 ""
|
||||
FIELD 106@->CAPRF
|
||||
FIELD 106@->CAPRES
|
||||
END
|
||||
|
||||
STRINGA 13
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE DEL SOGGETTO DICHIARANTE"
|
||||
PROMPT 87 20 ""
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "NUM. FOGLIO"
|
||||
PROMPT 125 23 ""
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION BODY ODD 10
|
||||
|
||||
STRINGA 1
|
||||
BEGIN
|
||||
KEY "COD.FIS"
|
||||
PROMPT 11 1 ""
|
||||
FIELD 45->CODFI
|
||||
END
|
||||
|
||||
STRINGA 2
|
||||
BEGIN
|
||||
KEY "COGNOME"
|
||||
PROMPT 43 1 ""
|
||||
FIELD 45->COGNOME
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "NOME"
|
||||
PROMPT 80 1 ""
|
||||
FIELD 45->NOME
|
||||
END
|
||||
|
||||
DATA 4
|
||||
BEGIN
|
||||
KEY "DATA NASCITA"
|
||||
PROMPT 114 1 ""
|
||||
FIELD 45->DATANA
|
||||
FORMAT "1444-"
|
||||
END
|
||||
|
||||
STRINGA 5
|
||||
BEGIN
|
||||
KEY "SESSO"
|
||||
PROMPT 128 1 ""
|
||||
FIELD 45->SESSO
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
BEGIN
|
||||
KEY "COMUNE DI NASCITA"
|
||||
PROMPT 11 3 ""
|
||||
FIELD 45->COMUNENA
|
||||
END
|
||||
|
||||
STRINGA 7
|
||||
BEGIN
|
||||
KEY "PROV. DI NASCITA"
|
||||
PROMPT 51 3 ""
|
||||
FIELD 45->PROVNA
|
||||
END
|
||||
|
||||
STRINGA 8
|
||||
BEGIN
|
||||
KEY "CONGUAGLI NON EFFETTUATI"
|
||||
PROMPT 16 5 ""
|
||||
FIELD 57->CONEFF
|
||||
END
|
||||
|
||||
STRINGA 9
|
||||
BEGIN
|
||||
KEY "RETTIFICA CONGUAGLIO"
|
||||
PROMPT 31 5 ""
|
||||
FIELD 57->RETCON
|
||||
END
|
||||
|
||||
NUMERO 10
|
||||
BEGIN
|
||||
KEY "IMPOSTA RIMBORSATA"
|
||||
PROMPT 39 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->10
|
||||
FIELD 57->SIRPEFRIMB
|
||||
END
|
||||
|
||||
NUMERO 11
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 54 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->11
|
||||
FIELD 57->VIRPEF
|
||||
END
|
||||
|
||||
NUMERO 12
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 70 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->12
|
||||
FIELD 57->INTIRPEF
|
||||
END
|
||||
|
||||
NUMERO 13
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 85 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->13
|
||||
FIELD 57->AIRPEFIV
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 100 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->14
|
||||
FIELD 57->AIRPEFINT
|
||||
END
|
||||
|
||||
NUMERO 15
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 115 5 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->15
|
||||
FIELD 57->STASSA15
|
||||
END
|
||||
|
||||
NUMERO 16
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO A RIMBORSO"
|
||||
PROMPT 8 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->16
|
||||
FIELD 57->CONTR16
|
||||
END
|
||||
|
||||
NUMERO 17
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 23 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->17
|
||||
FIELD 57->CONTRVER
|
||||
END
|
||||
|
||||
NUMERO 18
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 39 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->18
|
||||
FIELD 57->INTER18
|
||||
END
|
||||
|
||||
NUMERO 19
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 54 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->19
|
||||
FIELD 57->CONTV19
|
||||
END
|
||||
|
||||
NUMERO 20
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 70 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->20
|
||||
FIELD 57->INTE20
|
||||
END
|
||||
|
||||
NUMERO 21
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU CSSN"
|
||||
PROMPT 85 7 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
MESSAGE ADD,FL->21
|
||||
FIELD 57->SOPRAT21
|
||||
END
|
||||
|
||||
NUMERO 22
|
||||
BEGIN
|
||||
KEY "MOD. 730/95 NON LIQUIDABILE"
|
||||
PROMPT 108 7 ""
|
||||
FIELD 57->M730NLIQ
|
||||
END
|
||||
|
||||
STRINGA 23
|
||||
BEGIN
|
||||
KEY "CODICE FISCALE CAAF"
|
||||
PROMPT 11 9 ""
|
||||
FIELD 104@->S1
|
||||
END
|
||||
|
||||
STRINGA 24
|
||||
BEGIN
|
||||
KEY "DENOMINAZIONE CAAF"
|
||||
PROMPT 44 9 ""
|
||||
FIELD 104@->S0
|
||||
END
|
||||
|
||||
NUMERO 25
|
||||
BEGIN
|
||||
KEY "NUMERO ISCRIZIONE ALBO"
|
||||
PROMPT 119 9 ""
|
||||
FIELD 104@->I1
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER LAST 4
|
||||
|
||||
NUMERO 10
|
||||
BEGIN
|
||||
KEY "IMPOSTA RIMBORSATA"
|
||||
PROMPT 39 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 11
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 54 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 12
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 70 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 13
|
||||
BEGIN
|
||||
KEY "IMPOSTA VERSATA"
|
||||
PROMPT 85 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 14
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 100 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 15
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU IRPEF"
|
||||
PROMPT 115 1 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 16
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO A RIMBORSO"
|
||||
PROMPT 8 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 17
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 23 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 18
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 39 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 19
|
||||
BEGIN
|
||||
KEY "CONTRIBUTO VERSATO"
|
||||
PROMPT 54 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 20
|
||||
BEGIN
|
||||
KEY "INTERESSI"
|
||||
PROMPT 70 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
NUMERO 21
|
||||
BEGIN
|
||||
KEY "SOPRATTASSA SU CSSN"
|
||||
PROMPT 85 3 ""
|
||||
PICTURE "###.###.###.###^^^"
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
120
m770/77qa3.frm
120
m770/77qa3.frm
@ -1,6 +1,7 @@
|
||||
USE 58
|
||||
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
|
||||
JOIN 9 INTO CODDITTA=CODDITTA
|
||||
JOIN 102 INTO CODDITTA=CODDITTA
|
||||
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||
JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR
|
||||
JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC
|
||||
@ -31,6 +32,14 @@ END
|
||||
|
||||
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
|
||||
BEGIN
|
||||
KEY "Tipo anagrafica"
|
||||
@ -45,6 +54,7 @@ BEGIN
|
||||
KEY "CODICE FISCALE"
|
||||
PROMPT 3 13 ""
|
||||
FIELD 106@->COFI
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
@ -53,6 +63,7 @@ BEGIN
|
||||
PROMPT 40 13 ""
|
||||
GROUP 2
|
||||
FIELD 106@->RAGSOC
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
@ -61,6 +72,7 @@ BEGIN
|
||||
PROMPT 40 13 ""
|
||||
GROUP 1
|
||||
FIELD 106@->RAGSOC[1,30]
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 5
|
||||
@ -69,6 +81,7 @@ BEGIN
|
||||
PROMPT 17 15 ""
|
||||
GROUP 1
|
||||
FIELD 106@->RAGSOC[31,50]
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
@ -77,6 +90,7 @@ BEGIN
|
||||
PROMPT 59 15 ""
|
||||
GROUP 1
|
||||
FIELD 108@->SESSO
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 7
|
||||
@ -85,6 +99,7 @@ BEGIN
|
||||
PROMPT 67 15 ""
|
||||
GROUP 1
|
||||
FIELD 108@->DATANASC
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 8
|
||||
@ -93,6 +108,7 @@ BEGIN
|
||||
PROMPT 84 15 ""
|
||||
GROUP 1
|
||||
FIELD 113@->DENCOM
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 9
|
||||
@ -101,6 +117,7 @@ BEGIN
|
||||
PROMPT 126 15 ""
|
||||
GROUP 1
|
||||
FIELD 113@->PROVCOM
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 10
|
||||
@ -108,6 +125,7 @@ BEGIN
|
||||
KEY "COMUNE DI RES.FISCALE"
|
||||
PROMPT 17 17 ""
|
||||
FIELD 213@->DENCOM
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 11
|
||||
@ -115,6 +133,7 @@ BEGIN
|
||||
KEY "PROV DI RES.FISCALE"
|
||||
PROMPT 59 17 ""
|
||||
FIELD 213@->PROVCOM
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 12
|
||||
@ -122,6 +141,8 @@ BEGIN
|
||||
KEY "VIA di RES."
|
||||
PROMPT 67 17 ""
|
||||
FIELD 106@->INDRF
|
||||
FIELD 106@->INDRES
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 15
|
||||
@ -129,6 +150,8 @@ BEGIN
|
||||
KEY "NUM. CIVICO di RES."
|
||||
PROMPT 104 17 ""
|
||||
FIELD 106@->CIVRF
|
||||
FIELD 106@->CIVRES
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 16
|
||||
@ -136,6 +159,8 @@ BEGIN
|
||||
KEY "CAP"
|
||||
PROMPT 123 17 ""
|
||||
FIELD 106@->CAPRF
|
||||
FIELD 106@->CAPRES
|
||||
GROUP 10
|
||||
END
|
||||
|
||||
STRINGA 13
|
||||
@ -150,6 +175,101 @@ BEGIN
|
||||
PROMPT 125 25 ""
|
||||
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
|
||||
|
||||
SECTION BODY ODD 6
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user