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

View File

@ -124,6 +124,7 @@ BEGIN
KEY "VIA di RES."
PROMPT 66 16 ""
FIELD 106@->INDRF
FIELD 106@->INDRES
END
STRINGA 15
@ -131,6 +132,7 @@ BEGIN
KEY "NUM. CIVICO di RES."
PROMPT 104 16 ""
FIELD 106@->CIVRF
FIELD 106@->CIVRES
END
STRINGA 16
@ -138,6 +140,7 @@ BEGIN
KEY "CAP"
PROMPT 123 16 ""
FIELD 106@->CAPRF
FIELD 106@->CAPRES
END
STRINGA 13

View File

@ -124,6 +124,7 @@ BEGIN
KEY "VIA di RES."
PROMPT 66 17 ""
FIELD 106@->INDRF
FIELD 106@->INDRES
END
STRINGA 15
@ -131,6 +132,7 @@ BEGIN
KEY "NUM. CIVICO di RES."
PROMPT 104 17 ""
FIELD 106@->CIVRF
FIELD 106@->CIVRES
END
STRINGA 16
@ -138,6 +140,7 @@ BEGIN
KEY "CAP"
PROMPT 125 17 ""
FIELD 106@->CAPRF
FIELD 106@->CAPRES
END
STRINGA 13

View File

@ -124,6 +124,7 @@ BEGIN
KEY "VIA di RES."
PROMPT 66 17 ""
FIELD 106@->INDRF
FIELD 106@->INDRES
END
STRINGA 15
@ -131,6 +132,7 @@ BEGIN
KEY "NUM. CIVICO di RES."
PROMPT 104 17 ""
FIELD 106@->CIVRF
FIELD 106@->CIVRES
END
STRINGA 16
@ -138,6 +140,7 @@ BEGIN
KEY "CAP"
PROMPT 123 17 ""
FIELD 106@->CAPRF
FIELD 106@->CAPRES
END
STRINGA 13

View File

@ -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