diff --git a/gcc/cobol/UAT/testsuite.src/syn_definition.at b/gcc/cobol/UAT/testsuite.src/syn_definition.at
index bc4e0983355663acc4dffc8f4422ac76fecc741a..26706ea59d054ca28f5a704f845c78c1a09b8a49 100644
--- a/gcc/cobol/UAT/testsuite.src/syn_definition.at
+++ b/gcc/cobol/UAT/testsuite.src/syn_definition.at
@@ -678,8 +678,8 @@ cobol1: error: failed compiling prog.cob
 ])
 AT_CHECK([$COMPILE_ONLY badprog.cob], [1], [],
 [badprog.cob:8: error: F1: SAME AS uses its own parent MESSAGE-TEXT-2
-badprog.cob:10: error: F1 created with SAME AS, cannot have new member FILLER at 'FILLER'
-badprog.cob:10: error: 05 FILLER on is not part of an 01 record at 'FILLER'
+badprog.cob:10: error: F1 created with SAME AS or TYPE TO, cannot have new member FILLER at 'FILLER'
+badprog.cob:10: error: 05 FILLER is not part of an 01 record at 'FILLER'
 badprog.cob:12: error: 01 MT3 SAME AS precludes other DATA DIVISION clauses
 badprog.cob:12: error: 77 OUTPUT-NAME SAME AS MESSAGE-TEXT-2: must be elementary
 .:13: 5 errors in DATA DIVISION, compilation ceases detected at end of file
diff --git a/gcc/cobol/symbols.h b/gcc/cobol/symbols.h
index 0005e0f6b3f04bf2107dd5a501b25880ff9a18b0..4bd2ac92b74ac072d661f0d3a2e512e49be6634d 100644
--- a/gcc/cobol/symbols.h
+++ b/gcc/cobol/symbols.h
@@ -571,7 +571,6 @@ struct cbl_field_t {
     attr |= (that.attr & external_e);
     attr |= same_as_e;
 
-    occurs = that.occurs; // might be partly wrong
     data  = that.data;
 
     if( ! (is_typedef || that.type == FldClass) ) {