[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[open-cobol-list] Re: OC issues - number 7
From: |
Roger While |
Subject: |
[open-cobol-list] Re: OC issues - number 7 |
Date: |
Wed Jan 18 13:34:11 2006 |
That was fixed in CVS /snapshot tarball a couple of days ago.
Current CVS / snaphot tarball as of this mail has the
COMPUTE EQUAL and OBJECT-COMPUTER fixes.
(as always note that CVS takes time to update)
Snapshot at usual place.
Roger
the next one looks like bug.
IDENTIFICATION DIVISION.
PROGRAM-ID. ztest INITIAL.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 T COMP.
05 MENU-AREA-LEN PIC S9(04) VALUE +5.
05 COMMAREA-LEN PIC S9(04) VALUE +58.
05 LCTABL-RECLEN PIC S9(4) VALUE +255.
05 LCTABL-KEYLEN PIC S9(4) VALUE +16.
05 CA-DATE-AREA-LENGTH PIC S9(4) VALUE +65.
01 L PIC S9(4) COMP.
PROCEDURE DIVISION.
MOVE LENGTH OF T TO L.
DISPLAY 'LEN=3D' L.
GOBACK.
G:\bank64\src\obj>cobc -x -std=3Dibm ztest7.cbl
ztest7.cbl:6: Error: 'T' binary field cannot be larger than 18 digits
- [open-cobol-list] Re: OC issues - number 7,
Roger While <=