diff --git a/m770/77base1.frm b/m770/77base1.frm
index bf1d36c4c..a74c62277 100755
--- a/m770/77base1.frm
+++ b/m770/77base1.frm
@@ -4,16 +4,17 @@ JOIN  9 TO 36 INTO CODDITTA=CODDITTA
 JOIN  6 TO  9 ALIAS 116 INTO TIPOA=TIPOA CODANAGR=CODANAGR
 JOIN  7 TO  9 INTO CODANAGR=CODANAGR
 JOIN  8 TO  6 ALIAS 118 INTO CODANAGR=CODANAGR
-JOIN 13 TO  8 ALIAS 113 INTO COM=COMNASC
-JOIN 13 TO  6 ALIAS 213 INTO COM=COMRF
-JOIN 13 TO  6 ALIAS 613 INTO COM=COMRES
+JOIN 13 TO  8 ALIAS 113 INTO COM==COMNASC
+JOIN 13 TO  6 ALIAS 213 INTO COM==COMRF
+JOIN 13 TO  6 ALIAS 613 INTO COM==COMRES
 JOIN  6 TO  36  ALIAS 216 INTO TIPOA=="F" CODANAGR==RAPPR   
 JOIN  8 TO 216@ ALIAS 218 INTO CODANAGR==CODANAGR 
 JOIN 13 TO 218@ ALIAS 313 INTO COM==COMNASC
 JOIN 13 TO 216@ ALIAS 413 INTO COM==COMRF(COMRES)
-JOIN 10 TO   9 INTO CODDITTA==CODDITTA CODATT==CODATTPREV
-JOIN  6 TO  10 ALIAS 316 INTO TIPOA==TIPOADS CODANAGR==CODANGRDS
-JOIN 13 TO  10 ALIAS 513 INTO COM==COMCS
+JOIN 10 TO   9  INTO CODDITTA==CODDITTA CODATT==CODATTPREV
+JOIN  6 TO  10  ALIAS 316 INTO TIPOA==TIPOADS CODANAGR==CODANGRDS
+JOIN 13 TO  10  ALIAS 513 INTO COM==COMCS 
+JOIN 13 TO 316@ ALIAS 713 INTO COM==COMRF(COMRES)
 END
 
 DESCRIPTION
@@ -197,7 +198,8 @@ STRINGA 17
 BEGIN
   KEY "CAP"
   PROMPT 122 7 ""
-  FIELD 116@->CAPRF
+  FIELD 116@->CAPRF 
+  FIELD 116@->CAPRES  
   GROUP 1  
 END  
   
@@ -708,16 +710,16 @@ STRINGA 79
 BEGIN
   KEY "LUOGO CONSERVAZIONE S.C. - COM"
   PROMPT 25 39 ""     
-  FIELD 613@->DENCOM  
-  FIELD 513@->DENCOM
+  FIELD 513@->DENCOM 
+  FIELD 713@->DENCOM  
 END
 
 STRINGA 80
 BEGIN
   KEY "LUOGO CONSERVAZIONE S.C. - PROV"
   PROMPT 92 39 ""
-  FIELD 613@->PROVCOM  
   FIELD 513@->PROVCOM
+  FIELD 713@->PROVCOM
 END
   
 STRINGA 81