Corretti form del 770

git-svn-id: svn://10.65.10.50/trunk@3298 c028cbd2-c16b-5b4b-a496-9718f37d4682

m770/77qa.frm

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

m770/77qa1.frm

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

m770/77qa2.frm

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

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