[open-cobol-list] two other cobol problems

[David Korn]

A program that contains:
===================cut here===========================================
                               '  CONTROL RECORD MISSING FOR 1ST BILL '
      -                        'GROUP'
===================cut here===========================================
gets error messages

`GROUP' reserved word, but not supported yet
`GROUP' undefined



The following program causes the compiler to abort:
====================cut here===============================
       ID DIVISION.                                                     
       PROGRAM-ID. VCCRCO04.                                            
       ENVIRONMENT DIVISION.                                            
       INPUT-OUTPUT SECTION.                                            
       DATA DIVISION.                                                   
       WORKING-STORAGE SECTION.                                         
       01  WK-CHARGE-RECORD.                                            
           05  CO-USAGE-AMOUNTS                OCCURS 5 TIMES
                                               INDEXED BY IX-USG.
               10  CO-USG-CALLS                PIC S9(09) COMP-3.
           05  CO-CALL-CARD-AMTS               OCCURS 3 TIMES
                                               INDEXED BY IX-CC.
               10  CO-CC-CALLS                 PIC S9(09) COMP-3.
                                                                        
       01  WK-USAGE-RECORD.                                             
           05  CO-USAGE-AMOUNTS                OCCURS 5 TIMES
                                               INDEXED BY IX-USG.
               10  CO-USG-CALLS                PIC S9(09) COMP-3.
           05  CO-CALL-CARD-AMTS               OCCURS 3 TIMES
                                               INDEXED BY IX-CC.
               10  CO-CC-CALLS                 PIC S9(09) COMP-3.
====================cut here===============================
prog.cob:17: redefinition of `IX-USG'
prog.cob:9: `IX-USG' previously defined here
prog/tree.c:1657: invalid type cast from `#<unknown constant>' at prog.cob:18


Both of these are with open-cobol-0.23.29.

David Korn
address@hidden