Re: [open-cobol-list] OC issues (more)

[John R. Culleton]

On Tuesday 17 January 2006 01:18 pm, Sergey Kashyrin wrote:
> Hi again.
> All of that is about compatibility with MAJOR compilers (390, AS/400, MF,
> FJ) in a situations when program is incorrect.
>
>        IDENTIFICATION DIVISION.
>        PROGRAM-ID. ztest INITIAL.
>        ENVIRONMENT DIVISION.
>        DATA DIVISION.
>        WORKING-STORAGE SECTION.
>        PROCEDURE DIVISION.
>            PERFORM 01-SUB.
>            PERFORM 02-SUB.
>            GOBACK.
>        01-SUB.
>            DISPLAY "TEST1 OK".
>        01-EXIT.
>            EXIT.
>        02-SUB.
>            DISPLAY "TEST2 OK".
>        01-EXIT.
>            EXIT.

Paragraph name 01-EXIT is defined twice. The compile should error
off. 

The exit paragraphs are superflouous in any case because there are
no PERFORM---  THRU --- statements. 

Decades ago IBM upgraded COBOL D(?) and programs started blowing
up. They had paragrahs not terminated by a period. But that was
just sloppy programming.

No one should construct a compiler IMO to accept syntax errors
just because other compilers are silent on the errors. 

-- 
John Culleton
Books with answers to marketing and publishing questions:
http://wexfordpress.com/tex/shortlist.pdf

Book coaches, consultants and packagers:
http://wexfordpress.com/tex/packagers.pdf