Inserimento della stampa del quadro C
git-svn-id: svn://10.65.10.50/trunk@3225 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
ale
parent
b84f269f65
commit
cafd14f200
BIN
m770/772.pdb
BIN
m770/772.pdb
Binary file not shown.
815
m770/77qc.frm
815
m770/77qc.frm
@ -1,419 +1,396 @@
|
|||||||
USE 61
|
USE 61
|
||||||
JOIN %CA7 TO 61 ALIAS 14 INTO CODTAB=CODCAUS
|
JOIN %CA7 TO 61 ALIAS 14 INTO CODTAB=CODCAUS
|
||||||
JOIN 9 INTO CODDITTA=CODDITTA
|
JOIN 9 INTO CODDITTA=CODDITTA
|
||||||
JOIN 6 TO 9 ALIAS 116 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
JOIN 6 TO 9 ALIAS 116 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||||
JOIN 8 TO 6 ALIAS 118 INTO CODANAGR=CODANAGR
|
JOIN 8 TO 6 ALIAS 118 INTO CODANAGR=CODANAGR
|
||||||
JOIN 13 TO 8 ALIAS 113 INTO COM=COMNASC
|
JOIN 13 TO 8 ALIAS 113 INTO COM=COMNASC
|
||||||
JOIN 13 TO 6 ALIAS 213 INTO COM=COMRF(COMRES)
|
JOIN 13 TO 6 ALIAS 213 INTO COM=COMRF(COMRES)
|
||||||
JOIN 6 TO 61 ALIAS 216 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
JOIN 6 TO 61 ALIAS 216 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||||
JOIN 8 TO 216@ ALIAS 218 INTO CODANAGR=CODANAGR
|
JOIN 8 TO 216@ ALIAS 218 INTO CODANAGR=CODANAGR
|
||||||
JOIN 13 TO 216@ ALIAS 313 INTO COM=COMNASC
|
JOIN 13 TO 218@ ALIAS 313 INTO COM=COMNASC
|
||||||
JOIN 13 TO 218@ ALIAS 413 INTO COM=COMRF(COMRES)
|
JOIN 13 TO 216@ ALIAS 413 INTO COM=COMRF(COMRES)
|
||||||
JOIN %STA TO 216@ ALIAS 24 INTO CODTAB=STATORES
|
JOIN %STA TO 216@ ALIAS 24 INTO CODTAB=STATORES
|
||||||
END
|
END
|
||||||
|
|
||||||
DESCRIPTION
|
DESCRIPTION
|
||||||
BEGIN
|
BEGIN
|
||||||
61->* "Quadro D 770"
|
61->* "Quadro C 770"
|
||||||
9->* "Ditte"
|
9->* "Ditte"
|
||||||
6->* "Anagrafica persone fisiche e giuridiche"
|
6->* "Anagrafica persone fisiche e giuridiche"
|
||||||
8->* "Anagrafica persone fisiche"
|
8->* "Anagrafica persone fisiche"
|
||||||
113@->* "Comuni"
|
113@->* "Comuni"
|
||||||
213@->* "Comuni"
|
213@->* "Comuni"
|
||||||
216@->* "Anagrafica persone fisiche e giuridiche"
|
216@->* "Anagrafica persone fisiche e giuridiche"
|
||||||
218@->* "Anagrafica persone giuridiche"
|
218@->* "Anagrafica persone giuridiche"
|
||||||
313@->* "Comuni"
|
313@->* "Comuni"
|
||||||
413@->* "Comuni"
|
413@->* "Comuni"
|
||||||
END
|
END
|
||||||
|
|
||||||
GENERAL
|
GENERAL
|
||||||
BEGIN
|
BEGIN
|
||||||
OFFSET 0 0
|
OFFSET 0 0
|
||||||
FONT "Courier 17cpi"
|
FONT "Courier 17cpi"
|
||||||
SIZE 10
|
SIZE 11
|
||||||
CA "X"
|
CA "X"
|
||||||
IN 3 2
|
IN 3 2
|
||||||
FI 131
|
FI 131
|
||||||
END
|
END
|
||||||
|
|
||||||
SECTION HEADER FIRST 28
|
SECTION HEADER FIRST 22
|
||||||
|
|
||||||
STRINGA 1
|
LISTA 9
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "CODICE FISCALE"
|
KEY "Tipo anagrafica"
|
||||||
PROMPT 4 9 ""
|
FLAGS "H"
|
||||||
FIELD 116@->COFI
|
FIELD 116@->TIPOA
|
||||||
END
|
ITEM "F|Fisica" MESSAGE SHOW,1@|HIDE,2@
|
||||||
|
ITEM "G|Giuridica" MESSAGE SHOW,2@|HIDE,1@
|
||||||
STRINGA 2
|
END
|
||||||
BEGIN
|
|
||||||
KEY "RAGIONE SOCIALE"
|
STRINGA 1
|
||||||
PROMPT 39 9 ""
|
BEGIN
|
||||||
FIELD 116@->RAGSOC
|
KEY "CODICE FISCALE"
|
||||||
GROUP 2
|
PROMPT 3 11 ""
|
||||||
END
|
FIELD 116@->COFI
|
||||||
|
END
|
||||||
STRINGA 3
|
|
||||||
BEGIN
|
STRINGA 2
|
||||||
KEY "COGNOME"
|
BEGIN
|
||||||
PROMPT 39 9 ""
|
KEY "RAGIONE SOCIALE"
|
||||||
FIELD 116@->RAGSOC[1,30]
|
PROMPT 39 11 ""
|
||||||
GROUP 1
|
FIELD 116@->RAGSOC
|
||||||
END
|
GROUP 2
|
||||||
|
END
|
||||||
STRINGA 4
|
|
||||||
BEGIN
|
STRINGA 3
|
||||||
KEY "NOME"
|
BEGIN
|
||||||
PROMPT 17 11 ""
|
KEY "COGNOME"
|
||||||
FIELD 116@->RAGSOC[31,50]
|
PROMPT 39 11 ""
|
||||||
GROUP 1
|
FIELD 116@->RAGSOC[1,30]
|
||||||
END
|
GROUP 1
|
||||||
|
END
|
||||||
STRINGA 5
|
|
||||||
BEGIN
|
STRINGA 4
|
||||||
KEY "SESSO"
|
BEGIN
|
||||||
PROMPT 58 11 ""
|
KEY "NOME"
|
||||||
FIELD 118@->SESSO
|
PROMPT 17 13 ""
|
||||||
GROUP 1
|
FIELD 116@->RAGSOC[31,50]
|
||||||
END
|
GROUP 1
|
||||||
|
END
|
||||||
STRINGA 6
|
|
||||||
BEGIN
|
STRINGA 5
|
||||||
KEY "DATA DI NASCITA"
|
BEGIN
|
||||||
PROMPT 66 11 ""
|
KEY "SESSO"
|
||||||
FIELD 118@->DATANASC
|
PROMPT 56 13 ""
|
||||||
GROUP 1
|
FIELD 118@->SESSO
|
||||||
END
|
GROUP 1
|
||||||
|
END
|
||||||
STRINGA 7
|
|
||||||
BEGIN
|
STRINGA 6
|
||||||
KEY "COMUNE DI NASCITA"
|
BEGIN
|
||||||
PROMPT 84 11 ""
|
KEY "DATA DI NASCITA"
|
||||||
FIELD 113@->DENCOM
|
PROMPT 63 13 ""
|
||||||
GROUP 1
|
FIELD 118@->DATANASC
|
||||||
END
|
GROUP 1
|
||||||
|
END
|
||||||
STRINGA 8
|
|
||||||
BEGIN
|
STRINGA 7
|
||||||
KEY "PROV. DI NASCITA"
|
BEGIN
|
||||||
PROMPT 126 11 ""
|
KEY "COMUNE DI NASCITA"
|
||||||
FIELD 113@->PROVCOM
|
PROMPT 83 13 ""
|
||||||
GROUP 1
|
FIELD 113@->DENCOM
|
||||||
END
|
GROUP 1
|
||||||
|
END
|
||||||
LISTA 9
|
|
||||||
BEGIN
|
STRINGA 8
|
||||||
KEY "Tipo anagrafica"
|
BEGIN
|
||||||
FIELD 116@->TIPOA
|
KEY "PROV. DI NASCITA"
|
||||||
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
|
PROMPT 122 13 ""
|
||||||
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
|
FIELD 113@->PROVCOM
|
||||||
END
|
GROUP 1
|
||||||
|
END
|
||||||
STRINGA 10
|
|
||||||
BEGIN
|
STRINGA 10
|
||||||
KEY "COMUNE DI RES.FISCALE"
|
BEGIN
|
||||||
PROMPT 17 13 ""
|
KEY "COMUNE DI RES.FISCALE"
|
||||||
FIELD 213@->DENCOM
|
PROMPT 17 15 ""
|
||||||
END
|
FIELD 213@->DENCOM
|
||||||
|
END
|
||||||
STRINGA 11
|
|
||||||
BEGIN
|
STRINGA 11
|
||||||
KEY "PROV DI RES.FISCALE"
|
BEGIN
|
||||||
PROMPT 59 13 ""
|
KEY "PROV DI RES.FISCALE"
|
||||||
FIELD 213@->PROVCOM
|
PROMPT 56 15 ""
|
||||||
END
|
FIELD 213@->PROVCOM
|
||||||
|
END
|
||||||
STRINGA 12
|
|
||||||
BEGIN
|
STRINGA 12
|
||||||
KEY "VIA di RES."
|
BEGIN
|
||||||
PROMPT 66 13 ""
|
KEY "VIA di RES."
|
||||||
FIELD 116@->INDRF
|
PROMPT 67 15 ""
|
||||||
END
|
FIELD 116@->INDRF
|
||||||
|
FLAGS "H"
|
||||||
STRINGA 13
|
MESSAGE COPY,17
|
||||||
BEGIN
|
END
|
||||||
KEY "NUM. CIVICO di RES."
|
|
||||||
PROMPT 102 13 ""
|
STRINGA 15
|
||||||
FIELD 116@->CIVRF
|
BEGIN
|
||||||
END
|
KEY "NUM. CIVICO di RES."
|
||||||
|
PROMPT 103 15 ""
|
||||||
STRINGA 14
|
FIELD 116@->CIVRF
|
||||||
BEGIN
|
FLAGS "H"
|
||||||
KEY "CAP"
|
MESSAGE APPEND,17
|
||||||
PROMPT 120 13 ""
|
END
|
||||||
FIELD 116@->CAPRF
|
|
||||||
END
|
STRINGA 17
|
||||||
|
BEGIN
|
||||||
STRINGA 15
|
KEY "VIA + NUM CIV. DI RES."
|
||||||
BEGIN
|
PROMPT 67 15 ""
|
||||||
KEY "CODICE FISCALE DICHIARANTE"
|
END
|
||||||
PROMPT 118 16 ""
|
|
||||||
END
|
STRINGA 16
|
||||||
|
BEGIN
|
||||||
NUMBER 16
|
KEY "CAP"
|
||||||
BEGIN
|
PROMPT 124 15 ""
|
||||||
KEY "NUM. FOGLIO"
|
FIELD 116@->CAPRF
|
||||||
PROMPT 123 20 ""
|
END
|
||||||
END
|
|
||||||
|
STRINGA 13
|
||||||
END
|
BEGIN
|
||||||
|
KEY "CODICE FISCALE DICHIARANTE"
|
||||||
SECTION BODY ODD 8
|
PROMPT 105 18 ""
|
||||||
|
END
|
||||||
LISTA 100
|
|
||||||
BEGIN
|
NUMBER 14
|
||||||
KEY "Tipo anagrafica"
|
BEGIN
|
||||||
FIELD 216@->TIPOA
|
KEY "NUM. FOGLIO"
|
||||||
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
|
PROMPT 125 21 ""
|
||||||
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
|
END
|
||||||
END
|
|
||||||
|
END
|
||||||
STRINGA 1
|
|
||||||
BEGIN
|
SECTION BODY ODD 6
|
||||||
KEY "COD.FIS"
|
|
||||||
PROMPT 10 2 ""
|
LISTA 100
|
||||||
FIELD 216@->COFI
|
BEGIN
|
||||||
END
|
KEY "Tipo anagrafica"
|
||||||
|
FIELD 216@->TIPOA
|
||||||
STRING 2
|
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
|
||||||
BEGIN
|
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
|
||||||
KEY "COGNOME"
|
END
|
||||||
PROMPT 42 2 ""
|
|
||||||
FIELD 216@->RAGSOC[1,30]
|
STRINGA 1
|
||||||
GROUP 1
|
BEGIN
|
||||||
END
|
KEY "COD.FIS"
|
||||||
|
PROMPT 10 1 ""
|
||||||
STRING 3
|
FIELD 216@->COFI
|
||||||
BEGIN
|
END
|
||||||
KEY "NOME"
|
|
||||||
PROMPT 81 2 ""
|
STRING 2
|
||||||
FIELD 216@->RAGSOC[31,50]
|
BEGIN
|
||||||
GROUP 1
|
KEY "COGNOME"
|
||||||
END
|
PROMPT 42 1 ""
|
||||||
|
FIELD 216@->RAGSOC[1,30]
|
||||||
STRING 102
|
GROUP 1
|
||||||
BEGIN
|
END
|
||||||
KEY "RAGSOC GIURIDICHE"
|
|
||||||
PROMPT 54 2 ""
|
STRING 3
|
||||||
FIELD 216@->RAGSOC
|
BEGIN
|
||||||
GROUP 2
|
KEY "NOME"
|
||||||
END
|
PROMPT 81 1 ""
|
||||||
|
FIELD 216@->RAGSOC[31,50]
|
||||||
STRING 4
|
GROUP 1
|
||||||
BEGIN
|
END
|
||||||
KEY "DATA NASCITA"
|
|
||||||
PROMPT 114 2 ""
|
STRING 4
|
||||||
FIELD 218@->DATANASC
|
BEGIN
|
||||||
END
|
KEY "DATA NASCITA"
|
||||||
|
PROMPT 114 1 ""
|
||||||
STRING 5
|
FIELD 218@->DATANASC
|
||||||
BEGIN
|
END
|
||||||
KEY "SESSO"
|
|
||||||
PROMPT 129 2 ""
|
STRING 5
|
||||||
FIELD 218@->SESSO
|
BEGIN
|
||||||
END
|
KEY "SESSO"
|
||||||
|
PROMPT 129 1 ""
|
||||||
STRING 6
|
FIELD 218@->SESSO
|
||||||
BEGIN
|
END
|
||||||
KEY "COMUNE DI NASCITA"
|
|
||||||
PROMPT 10 4 ""
|
STRING 6
|
||||||
FIELD 313@->DENCOM
|
BEGIN
|
||||||
GROUP 1
|
KEY "COMUNE DI NASCITA"
|
||||||
END
|
PROMPT 10 3 ""
|
||||||
|
FIELD 313@->DENCOM
|
||||||
STRING 101
|
GROUP 1
|
||||||
BEGIN
|
END
|
||||||
KEY "COMUNE DI RESIDENZA GIURIDICHE"
|
|
||||||
PROMPT 10 4 ""
|
STRING 7
|
||||||
FIELD 413@->DENCOM
|
BEGIN
|
||||||
GROUP 2
|
KEY "PROV DI NASCITA"
|
||||||
END
|
PROMPT 47 3 ""
|
||||||
|
FIELD 313@->PROVCOM
|
||||||
STRING 7
|
GROUP 1
|
||||||
BEGIN
|
END
|
||||||
KEY "PROV DI NASCITA"
|
|
||||||
PROMPT 47 4 ""
|
STRING 8
|
||||||
FIELD 313@->PROVCOM
|
BEGIN
|
||||||
GROUP 1
|
KEY "COMUNE DI RESIDENZA"
|
||||||
END
|
PROMPT 53 3 ""
|
||||||
|
FIELD 413@->DENCOM
|
||||||
STRING 8
|
GROUP 1
|
||||||
BEGIN
|
END
|
||||||
KEY "COMUNE DI RESIDENZA"
|
|
||||||
PROMPT 53 4 ""
|
STRING 9
|
||||||
FIELD 413@->DENCOM
|
BEGIN
|
||||||
GROUP 1
|
KEY "PROV. RESIDENZA"
|
||||||
END
|
PROMPT 88 3 ""
|
||||||
|
FIELD 413@->PROVCOM
|
||||||
STRING 9
|
END
|
||||||
BEGIN
|
|
||||||
KEY "PROV. RESIDENZA"
|
STRING 101
|
||||||
PROMPT 88 4 ""
|
BEGIN
|
||||||
FIELD 413@->PROVCOM
|
KEY "VIA RES."
|
||||||
END
|
PROMPT 94 3 ""
|
||||||
|
FIELD 216@->INDRES[1,20]
|
||||||
STRING 106
|
FLAGS "H"
|
||||||
BEGIN
|
MESSAGE COPY,10
|
||||||
KEY "PROV. RESIDENZA GIURIDICHE"
|
END
|
||||||
PROMPT 61 4 ""
|
|
||||||
FIELD 413@->PROVCOM
|
STRING 102
|
||||||
GROUP 2
|
BEGIN
|
||||||
END
|
KEY "NUM.CIV"
|
||||||
|
PROMPT 93 3 ""
|
||||||
STRING 10
|
FLAGS "H"
|
||||||
BEGIN
|
FIELD 216@->CIVRES
|
||||||
KEY "VIA RES."
|
MESSAGE APPEND,10
|
||||||
PROMPT 94 4 ""
|
END
|
||||||
FIELD 216@->INDRES[1,18]
|
|
||||||
FLAGS "H"
|
STRING 10
|
||||||
MESSAGE COPY,12|COPY,107
|
BEGIN
|
||||||
END
|
KEY "VIA RES. + numcivres"
|
||||||
|
PROMPT 95 3 ""
|
||||||
STRING 11
|
GROUP 1
|
||||||
BEGIN
|
END
|
||||||
KEY "NUM.CIV"
|
|
||||||
PROMPT 93 4 ""
|
STRING 11
|
||||||
FLAGS "H"
|
BEGIN
|
||||||
FIELD 216@->CIVRES
|
KEY "DESCR. CAUSALE"
|
||||||
MESSAGE APPEND,12|APPEND,107
|
PROMPT 10 5 ""
|
||||||
END
|
FIELD 14@->S0[1,20]
|
||||||
|
END
|
||||||
STRING 12
|
|
||||||
BEGIN
|
STRING 12
|
||||||
KEY "VIA RES. + numcivres"
|
BEGIN
|
||||||
PROMPT 95 4 ""
|
KEY "FLAG C.T."
|
||||||
GROUP 1
|
PROMPT 34 5 ""
|
||||||
END
|
FIELD 14@->B2
|
||||||
|
END
|
||||||
STRING 107
|
|
||||||
BEGIN
|
STRING 13
|
||||||
KEY "VIA RES GIURIDICHE"
|
BEGIN
|
||||||
PROMPT 69 4 ""
|
KEY "FLAG T.S."
|
||||||
GROUP 2
|
PROMPT 39 5 ""
|
||||||
END
|
FIELD 14@->B3
|
||||||
|
END
|
||||||
STRING 13
|
|
||||||
BEGIN
|
NUMBER 14
|
||||||
KEY "FLAG I.C."
|
BEGIN
|
||||||
PROMPT 129 4 ""
|
KEY "AMMONTARE CORRISPOSTO"
|
||||||
FIELD 14@->B1
|
PROMPT 45 5 ""
|
||||||
END
|
PICTURE "###.###.###^^^"
|
||||||
|
MESSAGE ADD,FL->14
|
||||||
STRING 14
|
FIELD 61->TOTALE
|
||||||
BEGIN
|
END
|
||||||
KEY "FLAG DI NON RESIDENTE"
|
|
||||||
PROMPT 11 6 ""
|
NUMBER 15
|
||||||
FIELD 216@->SOGGNRES
|
BEGIN
|
||||||
END
|
KEY "CONTRIBUTI S.S.N."
|
||||||
|
PROMPT 60 5 ""
|
||||||
STRING 15
|
PICTURE "###.###.###^^^"
|
||||||
BEGIN
|
MESSAGE ADD,FL->15
|
||||||
KEY "STATO ESTERO DI RES."
|
FIELD 61->CONTSSN
|
||||||
PROMPT 16 6 ""
|
END
|
||||||
FIELD 24@->S0
|
|
||||||
END
|
NUMBER 16
|
||||||
|
BEGIN
|
||||||
STRING 16
|
KEY "SOMME NON SOGGETTE A RITENUTA"
|
||||||
BEGIN
|
PROMPT 76 5 ""
|
||||||
KEY "CODICE STATO ESTERO DI RES."
|
PICTURE "###.###.###^^^"
|
||||||
PROMPT 75 6 ""
|
MESSAGE ADD,FL->16
|
||||||
FIELD 216@->STATORES
|
FIELD 61->SOMME
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING 17
|
NUMBER 17
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "CODICE FISCALE ESTERO"
|
KEY "IMPONIBILE"
|
||||||
PROMPT 89 6 ""
|
PROMPT 91 5 ""
|
||||||
FIELD 216@->COFIEST
|
PICTURE "###.###.###^^^"
|
||||||
END
|
MESSAGE ADD,FL->17
|
||||||
|
FIELD 61->IMPONIBILE
|
||||||
STRING 18
|
END
|
||||||
BEGIN
|
|
||||||
KEY "DESCR. CAUSALE"
|
NUMBER 18
|
||||||
PROMPT 10 8 ""
|
BEGIN
|
||||||
FIELD 14@->S0[1,20]
|
KEY "RITENUTE OPERATE"
|
||||||
END
|
PROMPT 105 5 ""
|
||||||
|
PICTURE "###.###.###^^^"
|
||||||
STRING 19
|
MESSAGE ADD,FL->18
|
||||||
BEGIN
|
FIELD 61->RITENUTE
|
||||||
KEY "TOTALE"
|
END
|
||||||
PROMPT 36 8 ""
|
|
||||||
FIELD 61->TOTALE
|
NUMBER 19
|
||||||
PICTURE "#########^^^"
|
BEGIN
|
||||||
END
|
KEY "NETTO CORRISPOSTO"
|
||||||
|
PROMPT 120 5 ""
|
||||||
STRING 20
|
PICTURE "###.###.###^^^"
|
||||||
BEGIN
|
MESSAGE ADD,FL->19
|
||||||
KEY "SOMME NON SOGGETTE A RITENUTA"
|
FIELD 61->NETTO
|
||||||
PROMPT 55 8 ""
|
END
|
||||||
FIELD 61->SOMME
|
|
||||||
PICTURE "#########^^^"
|
END
|
||||||
END
|
|
||||||
|
SECTION FOOTER LAST 2
|
||||||
STRING 21
|
|
||||||
BEGIN
|
NUMBER 14
|
||||||
KEY "IMPONIBILE"
|
BEGIN
|
||||||
PROMPT 75 8 ""
|
KEY "TOTALE AMMONTARE CORRISPOSTO"
|
||||||
FIELD 61->IMPONIBILE
|
PROMPT 45 1 ""
|
||||||
PICTURE "#########^^^"
|
PICTURE "###.###.###^^^"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING 22
|
NUMBER 15
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "ALIQUOTA"
|
KEY "TOTALE CONTRIBUTI S.S.N."
|
||||||
PROMPT 88 8 ""
|
PROMPT 61 1 ""
|
||||||
FIELD 61->PERC
|
PICTURE "###.###.###^^^"
|
||||||
PICTURE "###@@"
|
END
|
||||||
END
|
|
||||||
|
NUMBER 16
|
||||||
STRING 23
|
BEGIN
|
||||||
BEGIN
|
KEY "TOTALE SOMME NON SOGGETTE A RITENUTA"
|
||||||
KEY "IMPORTO"
|
PROMPT 76 1 ""
|
||||||
PROMPT 100 8 ""
|
PICTURE "###.###.###^^^"
|
||||||
FIELD 61->IMPORTO
|
END
|
||||||
PICTURE "#########^^^"
|
|
||||||
END
|
NUMBER 17
|
||||||
|
BEGIN
|
||||||
STRING 24
|
KEY "TOTALE IMPONIBILE"
|
||||||
BEGIN
|
PROMPT 91 1 ""
|
||||||
KEY "NETTO"
|
PICTURE "###.###.###^^^"
|
||||||
PROMPT 119 8 ""
|
END
|
||||||
FIELD 61->NETTO
|
|
||||||
PICTURE "#########^^^"
|
NUMBER 18
|
||||||
END
|
BEGIN
|
||||||
|
KEY "TOTALE RITENUTE OPERATE"
|
||||||
END
|
PROMPT 105 1 ""
|
||||||
|
PICTURE "###.###.###^^^"
|
||||||
SECTION BODY EVEN 2
|
END
|
||||||
|
|
||||||
NUMBER 1
|
NUMBER 19
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "TOTALE TOTALE"
|
KEY "TOTALE NETTO CORRISPOSTO"
|
||||||
PROMPT 36 1 ""
|
PROMPT 120 1 ""
|
||||||
END
|
PICTURE "###.###.###^^^"
|
||||||
|
END
|
||||||
NUMBER 2
|
|
||||||
BEGIN
|
END
|
||||||
KEY "TOTALE SOMME NON SOGGETTE"
|
|
||||||
PROMPT 55 1 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER 3
|
|
||||||
BEGIN
|
|
||||||
KEY "TOTALE IMPONIBILE"
|
|
||||||
PROMPT 75 1 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER 4
|
|
||||||
BEGIN
|
|
||||||
KEY "TOTALE IMPORTO"
|
|
||||||
PROMPT 101 1 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER 5
|
|
||||||
BEGIN
|
|
||||||
KEY "TOTALE NETTO"
|
|
||||||
PROMPT 120 1 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
END
|
|
||||||
|
|||||||
@ -41,14 +41,14 @@ SECTION HEADER FIRST 28
|
|||||||
STRINGA 1
|
STRINGA 1
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "CODICE FISCALE"
|
KEY "CODICE FISCALE"
|
||||||
PROMPT 4 9 ""
|
PROMPT 4 13 ""
|
||||||
FIELD 116@->COFI
|
FIELD 116@->COFI
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 2
|
STRINGA 2
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "RAGIONE SOCIALE"
|
KEY "RAGIONE SOCIALE"
|
||||||
PROMPT 39 9 ""
|
PROMPT 39 13 ""
|
||||||
FIELD 116@->RAGSOC
|
FIELD 116@->RAGSOC
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
@ -56,7 +56,7 @@ END
|
|||||||
STRINGA 3
|
STRINGA 3
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "COGNOME"
|
KEY "COGNOME"
|
||||||
PROMPT 39 9 ""
|
PROMPT 39 13 ""
|
||||||
FIELD 116@->RAGSOC[1,30]
|
FIELD 116@->RAGSOC[1,30]
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -64,7 +64,7 @@ END
|
|||||||
STRINGA 4
|
STRINGA 4
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "NOME"
|
KEY "NOME"
|
||||||
PROMPT 17 11 ""
|
PROMPT 17 15 ""
|
||||||
FIELD 116@->RAGSOC[31,50]
|
FIELD 116@->RAGSOC[31,50]
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -72,7 +72,7 @@ END
|
|||||||
STRINGA 5
|
STRINGA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "SESSO"
|
KEY "SESSO"
|
||||||
PROMPT 58 11 ""
|
PROMPT 58 15 ""
|
||||||
FIELD 118@->SESSO
|
FIELD 118@->SESSO
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -80,7 +80,7 @@ END
|
|||||||
STRINGA 6
|
STRINGA 6
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "DATA DI NASCITA"
|
KEY "DATA DI NASCITA"
|
||||||
PROMPT 66 11 ""
|
PROMPT 66 15 ""
|
||||||
FIELD 118@->DATANASC
|
FIELD 118@->DATANASC
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -88,7 +88,7 @@ END
|
|||||||
STRINGA 7
|
STRINGA 7
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "COMUNE DI NASCITA"
|
KEY "COMUNE DI NASCITA"
|
||||||
PROMPT 84 11 ""
|
PROMPT 84 15 ""
|
||||||
FIELD 113@->DENCOM
|
FIELD 113@->DENCOM
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -96,7 +96,7 @@ END
|
|||||||
STRINGA 8
|
STRINGA 8
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "PROV. DI NASCITA"
|
KEY "PROV. DI NASCITA"
|
||||||
PROMPT 126 11 ""
|
PROMPT 126 15 ""
|
||||||
FIELD 113@->PROVCOM
|
FIELD 113@->PROVCOM
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -112,42 +112,42 @@ END
|
|||||||
STRINGA 10
|
STRINGA 10
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "COMUNE DI RES.FISCALE"
|
KEY "COMUNE DI RES.FISCALE"
|
||||||
PROMPT 17 13 ""
|
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 13 ""
|
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 13 ""
|
PROMPT 66 17 ""
|
||||||
FIELD 116@->INDRF
|
FIELD 116@->INDRF
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 13
|
STRINGA 13
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "NUM. CIVICO di RES."
|
KEY "NUM. CIVICO di RES."
|
||||||
PROMPT 102 13 ""
|
PROMPT 102 17 ""
|
||||||
FIELD 116@->CIVRF
|
FIELD 116@->CIVRF
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 14
|
STRINGA 14
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "CAP"
|
KEY "CAP"
|
||||||
PROMPT 120 13 ""
|
PROMPT 120 17 ""
|
||||||
FIELD 116@->CAPRF
|
FIELD 116@->CAPRF
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 15
|
STRINGA 15
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "CODICE FISCALE DICHIARANTE"
|
KEY "CODICE FISCALE DICHIARANTE"
|
||||||
PROMPT 118 16 ""
|
PROMPT 118 20 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER 16
|
NUMBER 16
|
||||||
|
|||||||
844
m770/77qd1.frm
844
m770/77qd1.frm
@ -1,427 +1,417 @@
|
|||||||
USE 63
|
USE 63
|
||||||
JOIN %CA7 TO 63 ALIAS 14 INTO CODTAB=CODCAUS
|
JOIN %CA7 TO 63 ALIAS 14 INTO CODTAB=CODCAUS
|
||||||
JOIN 9 INTO CODDITTA=CODDITTA
|
JOIN 9 INTO CODDITTA=CODDITTA
|
||||||
JOIN 6 TO 9 ALIAS 116 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
JOIN 6 TO 9 ALIAS 116 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||||
JOIN 8 TO 6 ALIAS 118 INTO CODANAGR=CODANAGR
|
JOIN 8 TO 6 ALIAS 118 INTO CODANAGR=CODANAGR
|
||||||
JOIN 13 TO 8 ALIAS 113 INTO COM=COMNASC
|
JOIN 13 TO 8 ALIAS 113 INTO COM=COMNASC
|
||||||
JOIN 13 TO 6 ALIAS 213 INTO COM=COMRF(COMRES)
|
JOIN 13 TO 6 ALIAS 213 INTO COM=COMRF(COMRES)
|
||||||
JOIN 6 TO 63 ALIAS 216 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
JOIN 6 TO 63 ALIAS 216 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||||
JOIN 8 TO 216@ ALIAS 218 INTO CODANAGR=CODANAGR
|
JOIN 8 TO 216@ ALIAS 218 INTO CODANAGR=CODANAGR
|
||||||
JOIN 13 TO 216@ ALIAS 313 INTO COM=COMNASC
|
JOIN 13 TO 218@ ALIAS 313 INTO COM=COMNASC
|
||||||
JOIN 13 TO 218@ ALIAS 413 INTO COM=COMRF(COMRES)
|
JOIN 13 TO 216@ ALIAS 413 INTO COM=COMRF(COMRES)
|
||||||
JOIN %STA TO 216@ ALIAS 24 INTO CODTAB=STATORES
|
JOIN %STA TO 216@ ALIAS 24 INTO CODTAB=STATORES
|
||||||
END
|
END
|
||||||
|
|
||||||
DESCRIPTION
|
DESCRIPTION
|
||||||
BEGIN
|
BEGIN
|
||||||
63->* "Quadro D 770"
|
63->* "Quadro D1 770"
|
||||||
9->* "Ditte"
|
9->* "Ditte"
|
||||||
6->* "Anagrafica persone fisiche e giuridiche"
|
6->* "Anagrafica persone fisiche e giuridiche"
|
||||||
8->* "Anagrafica persone fisiche"
|
8->* "Anagrafica persone fisiche"
|
||||||
113@->* "Comuni"
|
113@->* "Comuni"
|
||||||
213@->* "Comuni"
|
213@->* "Comuni"
|
||||||
216@->* "Anagrafica persone fisiche e giuridiche"
|
216@->* "Anagrafica persone fisiche e giuridiche"
|
||||||
218@->* "Anagrafica persone giuridiche"
|
218@->* "Anagrafica persone giuridiche"
|
||||||
313@->* "Comuni"
|
313@->* "Comuni"
|
||||||
413@->* "Comuni"
|
413@->* "Comuni"
|
||||||
END
|
END
|
||||||
|
|
||||||
GENERAL
|
GENERAL
|
||||||
BEGIN
|
BEGIN
|
||||||
OFFSET 0 0
|
OFFSET 0 0
|
||||||
FONT "Courier 17cpi"
|
FONT "Courier 17cpi"
|
||||||
SIZE 10
|
SIZE 10
|
||||||
CA "X"
|
CA "X"
|
||||||
IN 3 2
|
IN 3 2
|
||||||
FI 131
|
FI 131
|
||||||
END
|
END
|
||||||
|
|
||||||
SECTION HEADER FIRST 28
|
SECTION HEADER FIRST 27
|
||||||
|
|
||||||
STRINGA 1
|
LISTA 9
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "CODICE FISCALE"
|
KEY "Tipo anagrafica"
|
||||||
PROMPT 4 9 ""
|
FIELD 116@->TIPOA
|
||||||
FIELD 116@->COFI
|
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
|
||||||
END
|
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
|
||||||
|
END
|
||||||
STRINGA 2
|
|
||||||
BEGIN
|
STRINGA 1
|
||||||
KEY "RAGIONE SOCIALE"
|
BEGIN
|
||||||
PROMPT 39 9 ""
|
KEY "CODICE FISCALE"
|
||||||
FIELD 116@->RAGSOC
|
PROMPT 3 12 ""
|
||||||
GROUP 2
|
FIELD 116@->COFI
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 3
|
STRINGA 2
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "COGNOME"
|
KEY "RAGIONE SOCIALE"
|
||||||
PROMPT 39 9 ""
|
PROMPT 39 12 ""
|
||||||
FIELD 116@->RAGSOC[1,30]
|
FIELD 116@->RAGSOC
|
||||||
GROUP 1
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 4
|
STRINGA 3
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "NOME"
|
KEY "COGNOME"
|
||||||
PROMPT 17 11 ""
|
PROMPT 39 12 ""
|
||||||
FIELD 116@->RAGSOC[31,50]
|
FIELD 116@->RAGSOC[1,30]
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 5
|
STRINGA 4
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "SESSO"
|
KEY "NOME"
|
||||||
PROMPT 58 11 ""
|
PROMPT 17 14 ""
|
||||||
FIELD 118@->SESSO
|
FIELD 116@->RAGSOC[31,50]
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 6
|
STRINGA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "DATA DI NASCITA"
|
KEY "SESSO"
|
||||||
PROMPT 66 11 ""
|
PROMPT 56 14 ""
|
||||||
FIELD 118@->DATANASC
|
FIELD 118@->SESSO
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 7
|
STRINGA 6
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "COMUNE DI NASCITA"
|
KEY "DATA DI NASCITA"
|
||||||
PROMPT 84 11 ""
|
PROMPT 63 14 ""
|
||||||
FIELD 113@->DENCOM
|
FIELD 118@->DATANASC
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 8
|
STRINGA 7
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "PROV. DI NASCITA"
|
KEY "COMUNE DI NASCITA"
|
||||||
PROMPT 126 11 ""
|
PROMPT 83 14 ""
|
||||||
FIELD 113@->PROVCOM
|
FIELD 113@->DENCOM
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
LISTA 9
|
STRINGA 8
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "Tipo anagrafica"
|
KEY "PROV. DI NASCITA"
|
||||||
FIELD 116@->TIPOA
|
PROMPT 122 14 ""
|
||||||
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
|
FIELD 113@->PROVCOM
|
||||||
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 10
|
STRINGA 10
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "COMUNE DI RES.FISCALE"
|
KEY "COMUNE DI RES.FISCALE"
|
||||||
PROMPT 17 13 ""
|
PROMPT 17 16 ""
|
||||||
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 13 ""
|
PROMPT 56 16 ""
|
||||||
FIELD 213@->PROVCOM
|
FIELD 213@->PROVCOM
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 12
|
STRINGA 12
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "VIA di RES."
|
KEY "VIA di RES."
|
||||||
PROMPT 66 13 ""
|
PROMPT 67 16 ""
|
||||||
FIELD 116@->INDRF
|
FIELD 116@->INDRF
|
||||||
END
|
FLAGS "H"
|
||||||
|
MESSAGE COPY,17
|
||||||
STRINGA 13
|
END
|
||||||
BEGIN
|
|
||||||
KEY "NUM. CIVICO di RES."
|
STRINGA 15
|
||||||
PROMPT 102 13 ""
|
BEGIN
|
||||||
FIELD 116@->CIVRF
|
KEY "NUM. CIVICO di RES."
|
||||||
END
|
PROMPT 103 16 ""
|
||||||
|
FIELD 116@->CIVRF
|
||||||
STRINGA 14
|
FLAGS "H"
|
||||||
BEGIN
|
MESSAGE APPEND,17
|
||||||
KEY "CAP"
|
END
|
||||||
PROMPT 120 13 ""
|
|
||||||
FIELD 116@->CAPRF
|
STRINGA 17
|
||||||
END
|
BEGIN
|
||||||
|
KEY "VIA RES. + NUM. RES."
|
||||||
STRINGA 15
|
PROMPT 67 16 ""
|
||||||
BEGIN
|
END
|
||||||
KEY "CODICE FISCALE DICHIARANTE"
|
|
||||||
PROMPT 118 16 ""
|
STRINGA 16
|
||||||
END
|
BEGIN
|
||||||
|
KEY "CAP"
|
||||||
NUMBER 16
|
PROMPT 124 16 ""
|
||||||
BEGIN
|
FIELD 116@->CAPRF
|
||||||
KEY "NUM. FOGLIO"
|
END
|
||||||
PROMPT 123 20 ""
|
|
||||||
END
|
STRINGA 13
|
||||||
|
BEGIN
|
||||||
END
|
KEY "CODICE FISCALE DICHIARANTE"
|
||||||
|
PROMPT 105 19 ""
|
||||||
SECTION BODY ODD 8
|
END
|
||||||
|
|
||||||
LISTA 100
|
NUMBER 14
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "Tipo anagrafica"
|
KEY "NUM. FOGLIO"
|
||||||
FIELD 216@->TIPOA
|
PROMPT 125 22 ""
|
||||||
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
|
END
|
||||||
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
|
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 1
|
SECTION BODY ODD 6
|
||||||
BEGIN
|
|
||||||
KEY "COD.FIS"
|
LISTA 100
|
||||||
PROMPT 10 2 ""
|
BEGIN
|
||||||
FIELD 216@->COFI
|
KEY "Tipo anagrafica"
|
||||||
END
|
FIELD 216@->TIPOA
|
||||||
|
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
|
||||||
STRING 2
|
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
|
||||||
BEGIN
|
END
|
||||||
KEY "COGNOME"
|
|
||||||
PROMPT 42 2 ""
|
STRINGA 1
|
||||||
FIELD 216@->RAGSOC[1,30]
|
BEGIN
|
||||||
GROUP 1
|
KEY "COD.FIS"
|
||||||
END
|
PROMPT 10 1 ""
|
||||||
|
FIELD 216@->COFI
|
||||||
STRING 3
|
END
|
||||||
BEGIN
|
|
||||||
KEY "NOME"
|
STRING 2
|
||||||
PROMPT 81 2 ""
|
BEGIN
|
||||||
FIELD 216@->RAGSOC[31,50]
|
KEY "COGNOME"
|
||||||
GROUP 1
|
PROMPT 42 2 ""
|
||||||
END
|
FIELD 216@->RAGSOC[1,30]
|
||||||
|
GROUP 1
|
||||||
STRING 102
|
END
|
||||||
BEGIN
|
|
||||||
KEY "RAGSOC GIURIDICHE"
|
STRING 3
|
||||||
PROMPT 54 2 ""
|
BEGIN
|
||||||
FIELD 216@->RAGSOC
|
KEY "NOME"
|
||||||
GROUP 2
|
PROMPT 81 2 ""
|
||||||
END
|
FIELD 216@->RAGSOC[31,50]
|
||||||
|
GROUP 1
|
||||||
STRING 4
|
END
|
||||||
BEGIN
|
|
||||||
KEY "DATA NASCITA"
|
STRING 101
|
||||||
PROMPT 114 2 ""
|
BEGIN
|
||||||
FIELD 218@->DATANASC
|
KEY "RAGSOC GIURIDICHE"
|
||||||
END
|
PROMPT 54 2 ""
|
||||||
|
FIELD 216@->RAGSOC
|
||||||
STRING 5
|
GROUP 2
|
||||||
BEGIN
|
END
|
||||||
KEY "SESSO"
|
|
||||||
PROMPT 129 2 ""
|
STRING 4
|
||||||
FIELD 218@->SESSO
|
BEGIN
|
||||||
END
|
KEY "DATA NASCITA"
|
||||||
|
PROMPT 114 2 ""
|
||||||
STRING 6
|
FIELD 218@->DATANASC
|
||||||
BEGIN
|
GROUP 1
|
||||||
KEY "COMUNE DI NASCITA"
|
END
|
||||||
PROMPT 10 4 ""
|
|
||||||
FIELD 313@->DENCOM
|
STRING 5
|
||||||
GROUP 1
|
BEGIN
|
||||||
END
|
KEY "SESSO"
|
||||||
|
PROMPT 129 2 ""
|
||||||
STRING 101
|
FIELD 218@->SESSO
|
||||||
BEGIN
|
GROUP 1
|
||||||
KEY "COMUNE DI RESIDENZA GIURIDICHE"
|
END
|
||||||
PROMPT 10 4 ""
|
|
||||||
FIELD 413@->DENCOM
|
STRING 6
|
||||||
GROUP 2
|
BEGIN
|
||||||
END
|
KEY "COMUNE DI NASCITA"
|
||||||
|
PROMPT 10 4 ""
|
||||||
STRING 7
|
FIELD 313@->DENCOM
|
||||||
BEGIN
|
GROUP 1
|
||||||
KEY "PROV DI NASCITA"
|
END
|
||||||
PROMPT 47 4 ""
|
|
||||||
FIELD 313@->PROVCOM
|
STRING 7
|
||||||
GROUP 1
|
BEGIN
|
||||||
END
|
KEY "PROV DI NASCITA"
|
||||||
|
PROMPT 47 4 ""
|
||||||
STRING 8
|
FIELD 313@->PROVCOM
|
||||||
BEGIN
|
GROUP 1
|
||||||
KEY "COMUNE DI RESIDENZA"
|
END
|
||||||
PROMPT 53 4 ""
|
|
||||||
FIELD 413@->DENCOM
|
STRING 8
|
||||||
GROUP 1
|
BEGIN
|
||||||
END
|
KEY "COMUNE DI RESIDENZA"
|
||||||
|
PROMPT 53 4 ""
|
||||||
STRING 9
|
FIELD 413@->DENCOM
|
||||||
BEGIN
|
GROUP 1
|
||||||
KEY "PROV. RESIDENZA"
|
END
|
||||||
PROMPT 88 4 ""
|
|
||||||
FIELD 413@->PROVCOM
|
STRING 102
|
||||||
END
|
BEGIN
|
||||||
|
KEY "COMUNE DI RESIDENZA GIURIDICHE"
|
||||||
STRING 106
|
PROMPT 10 4 ""
|
||||||
BEGIN
|
FIELD 413@->DENCOM
|
||||||
KEY "PROV. RESIDENZA GIURIDICHE"
|
GROUP 2
|
||||||
PROMPT 61 4 ""
|
END
|
||||||
FIELD 413@->PROVCOM
|
|
||||||
GROUP 2
|
STRING 9
|
||||||
END
|
BEGIN
|
||||||
|
KEY "PROV. RESIDENZA"
|
||||||
STRING 10
|
PROMPT 88 4 ""
|
||||||
BEGIN
|
FIELD 413@->PROVCOM
|
||||||
KEY "VIA RES."
|
GROUP 1
|
||||||
PROMPT 94 4 ""
|
END
|
||||||
FIELD 216@->INDRES[1,18]
|
|
||||||
FLAGS "H"
|
STRING 103
|
||||||
MESSAGE COPY,12|COPY,107
|
BEGIN
|
||||||
END
|
KEY "PROVINCIA DI RESIDENZA GIURIDICHE"
|
||||||
|
PROMPT 88 4 ""
|
||||||
STRING 11
|
FIELD 413@->PROVCOM
|
||||||
BEGIN
|
GROUP 2
|
||||||
KEY "NUM.CIV"
|
END
|
||||||
PROMPT 93 4 ""
|
|
||||||
FLAGS "H"
|
STRING 105
|
||||||
FIELD 216@->CIVRES
|
BEGIN
|
||||||
MESSAGE APPEND,12|APPEND,107
|
KEY "VIA RESIDENZA"
|
||||||
END
|
PROMPT 94 4 ""
|
||||||
|
FIELD 216@->INDRES[1,18]
|
||||||
STRING 12
|
FLAGS "H"
|
||||||
BEGIN
|
MESSAGE COPY,10|COPY,104
|
||||||
KEY "VIA RES. + numcivres"
|
END
|
||||||
PROMPT 95 4 ""
|
|
||||||
GROUP 1
|
STRING 106
|
||||||
END
|
BEGIN
|
||||||
|
KEY "NUMERO CIVICO"
|
||||||
STRING 107
|
PROMPT 93 4 ""
|
||||||
BEGIN
|
FLAGS "H"
|
||||||
KEY "VIA RES GIURIDICHE"
|
FIELD 216@->CIVRES
|
||||||
PROMPT 69 4 ""
|
MESSAGE APPEND,10|APPEND,104
|
||||||
GROUP 2
|
END
|
||||||
END
|
|
||||||
|
STRING 10
|
||||||
STRING 13
|
BEGIN
|
||||||
BEGIN
|
KEY "VIA + NUMERO CIVICO RESIDENZA"
|
||||||
KEY "FLAG I.C."
|
PROMPT 95 4 ""
|
||||||
PROMPT 129 4 ""
|
GROUP 1
|
||||||
FIELD 14@->B1
|
END
|
||||||
END
|
|
||||||
|
STRING 104
|
||||||
STRING 14
|
BEGIN
|
||||||
BEGIN
|
KEY "VIA + NUMERO CIVICO RESIDENZA GIURIDICHE"
|
||||||
KEY "FLAG DI NON RESIDENTE"
|
PROMPT 69 4 ""
|
||||||
PROMPT 11 6 ""
|
GROUP 2
|
||||||
FIELD 216@->SOGGNRES
|
END
|
||||||
END
|
|
||||||
|
STRING 11
|
||||||
STRING 15
|
BEGIN
|
||||||
BEGIN
|
KEY "CAUSALE DEL QUADRO D1"
|
||||||
KEY "STATO ESTERO DI RES."
|
PROMPT 10 8 ""
|
||||||
PROMPT 16 6 ""
|
FIELD 14@->S3
|
||||||
FIELD 24@->S0
|
END
|
||||||
END
|
|
||||||
|
NUMBER 12
|
||||||
STRING 16
|
BEGIN
|
||||||
BEGIN
|
KEY "TOTALE"
|
||||||
KEY "CODICE STATO ESTERO DI RES."
|
PROMPT 36 8 ""
|
||||||
PROMPT 75 6 ""
|
FIELD 63->TOTALE
|
||||||
FIELD 216@->STATORES
|
PICTURE "###.###.###^^^"
|
||||||
END
|
MESSAGE ADD,FL->12
|
||||||
|
END
|
||||||
STRING 17
|
|
||||||
BEGIN
|
NUMBER 13
|
||||||
KEY "CODICE FISCALE ESTERO"
|
BEGIN
|
||||||
PROMPT 89 6 ""
|
KEY "QUOTA PROVVIGIONI"
|
||||||
FIELD 216@->COFIEST
|
PROMPT 55 8 ""
|
||||||
END
|
FIELD 63->QUOTAPRO
|
||||||
|
PICTURE "###.###.###^^^"
|
||||||
STRING 18
|
MESSAGE ADD,FL->13
|
||||||
BEGIN
|
END
|
||||||
KEY "DESCR. CAUSALE"
|
|
||||||
PROMPT 10 8 ""
|
NUMBER 14
|
||||||
FIELD 14@->S0[1,20]
|
BEGIN
|
||||||
END
|
KEY "SPESE ANTICIPATE"
|
||||||
|
PROMPT 65 8 ""
|
||||||
STRING 19
|
FIELD 63->SPESEANT
|
||||||
BEGIN
|
PICTURE "###.###.###^^^"
|
||||||
KEY "TOTALE"
|
MESSAGE ADD,FL->14
|
||||||
PROMPT 36 8 ""
|
END
|
||||||
FIELD 63->TOTALE
|
|
||||||
PICTURE "#########^^^"
|
NUMBER 15
|
||||||
END
|
BEGIN
|
||||||
|
KEY "IMPONIBILE"
|
||||||
STRING 20
|
PROMPT 75 8 ""
|
||||||
BEGIN
|
FIELD 63->IMPONIBILE
|
||||||
KEY "QUOTA PROVVIGIONI"
|
PICTURE "###.###.###^^^"
|
||||||
PROMPT 55 8 ""
|
MESSAGE ADD,FL->15
|
||||||
FIELD 63->QUOTAPRO
|
END
|
||||||
PICTURE "#########^^^"
|
|
||||||
END
|
NUMBER 16
|
||||||
|
BEGIN
|
||||||
STRING 21
|
KEY "ALIQUOTA"
|
||||||
BEGIN
|
PROMPT 88 8 ""
|
||||||
KEY "SPESE ANTICIPATE"
|
FIELD 63->PERC
|
||||||
PROMPT 65 8 ""
|
PICTURE "###@@"
|
||||||
FIELD 63->SPESEANT
|
END
|
||||||
PICTURE "#########^^^"
|
|
||||||
END
|
NUMBER 17
|
||||||
|
BEGIN
|
||||||
STRING 22
|
KEY "IMPORTO"
|
||||||
BEGIN
|
PROMPT 100 8 ""
|
||||||
KEY "IMPONIBILE"
|
FIELD 63->IMPORTO
|
||||||
PROMPT 75 8 ""
|
PICTURE "###.###.###^^^"
|
||||||
FIELD 63->IMPONIBILE
|
MESSAGE ADD,FL->17
|
||||||
PICTURE "#########^^^"
|
END
|
||||||
END
|
|
||||||
|
NUMBER 18
|
||||||
STRING 23
|
BEGIN
|
||||||
BEGIN
|
KEY "NETTO"
|
||||||
KEY "ALIQUOTA"
|
PROMPT 119 8 ""
|
||||||
PROMPT 88 8 ""
|
FIELD 63->NETTO
|
||||||
FIELD 63->PERC
|
PICTURE "###.###.###^^^"
|
||||||
PICTURE "###@@"
|
MESSAGE ADD,FL->18
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING 24
|
END
|
||||||
BEGIN
|
|
||||||
KEY "IMPORTO"
|
SECTION BODY EVEN 2
|
||||||
PROMPT 100 8 ""
|
|
||||||
FIELD 63->IMPORTO
|
NUMBER 12
|
||||||
PICTURE "#########^^^"
|
BEGIN
|
||||||
END
|
KEY "TOTALE TOTALE"
|
||||||
|
PROMPT 36 1 ""
|
||||||
STRING 25
|
END
|
||||||
BEGIN
|
|
||||||
KEY "NETTO"
|
NUMBER 13
|
||||||
PROMPT 119 8 ""
|
BEGIN
|
||||||
FIELD 63->NETTO
|
KEY "TOTALE QUOTA PROVVIGIONI"
|
||||||
PICTURE "#########^^^"
|
PROMPT 55 1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
END
|
NUMBER 14
|
||||||
|
BEGIN
|
||||||
SECTION BODY EVEN 2
|
KEY "TOTALE SPESE ANTICIPATE"
|
||||||
|
PROMPT 75 1 ""
|
||||||
NUMBER 1
|
END
|
||||||
BEGIN
|
|
||||||
KEY "TOTALE TOTALE"
|
NUMBER 15
|
||||||
PROMPT 36 1 ""
|
BEGIN
|
||||||
END
|
KEY "TOTALE IMPONIBILE"
|
||||||
|
PROMPT 75 1 ""
|
||||||
NUMBER 2
|
END
|
||||||
BEGIN
|
|
||||||
KEY "TOTALE SOMME NON SOGGETTE"
|
NUMBER 17
|
||||||
PROMPT 55 1 ""
|
BEGIN
|
||||||
END
|
KEY "TOTALE IMPORTO"
|
||||||
|
PROMPT 101 1 ""
|
||||||
NUMBER 3
|
END
|
||||||
BEGIN
|
|
||||||
KEY "TOTALE IMPONIBILE"
|
NUMBER 18
|
||||||
PROMPT 75 1 ""
|
BEGIN
|
||||||
END
|
KEY "TOTALE NETTO"
|
||||||
|
PROMPT 120 1 ""
|
||||||
NUMBER 4
|
END
|
||||||
BEGIN
|
|
||||||
KEY "TOTALE IMPORTO"
|
END
|
||||||
PROMPT 101 1 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER 5
|
|
||||||
BEGIN
|
|
||||||
KEY "TOTALE NETTO"
|
|
||||||
PROMPT 120 1 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
END
|
|
||||||
|
|||||||
7876
m770/77stq.cpp
7876
m770/77stq.cpp
File diff suppressed because it is too large
Load Diff
BIN
m770/77stq.sbr
BIN
m770/77stq.sbr
Binary file not shown.
Loading…
x
Reference in New Issue
Block a user