[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[open-cobol-list] a program that doesn't compile
From: |
David Korn |
Subject: |
[open-cobol-list] a program that doesn't compile |
Date: |
Tue Feb 10 08:05:03 2004 |
cc: address@hidden
Subject: a program that doesn't compile
--------
The followng program compiles with the IBM MVS Cobol compiler but gives
prog5.cob:17: parse error, unexpected '('
with open cobol.
==========================prog5.cob========================
IDENTIFICATION DIVISION.
PROGRAM-ID. PROG5.
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 Q385-HIER-STRUC-ARRAY-REQREC.
03 Q385-TBL-REQST-CD PIC X(8) VALUE SPACES.
03 Q385-HIER-STRUC-ARRAY-ROW.
06 Q385-HIER-PRORD-KEY PIC X(80) VALUE SPACES.
06 Q385-RELTV-HIER-LVL-NBR PIC S9(2) COMP-3
VALUE ZEROES.
06 Q385-PRNT-HP-PRORD-KEY PIC X(80) VALUE SPACES.
PROCEDURE DIVISION.
MOVE LOW-VALUES TO
Q385-PRNT-HP-PRORD-KEY((Q385-RELTV-HIER-LVL-NBR * 2) - 1:2)
==========================end prog5.cob========================
David Korn
address@hidden
- [open-cobol-list] a program that doesn't compile,
David Korn <=