|
From: David E. <de...@us...> - 2007-05-22 20:41:21
|
David Essex wrote:
> Massimo Spataro wrote:
> ...
>> prova01.cbl:14: error: syntax error, on or before 'disk'
>
> select ... assign to disk
> ...
> fd ...
> value of file-id ...
>
> This is a BUG.
> I will fix this on CVS.
I've updated CVS (0.63.67) with this minor BUG fix.
As a work around to this problem, you can use the following.
Change:
select ... assign to { identifier | literal }
Remove 'value of file-id' clause.
FD ...
* value of file-id ...
Finally the following code does not conform to the COBOL-85 standard.
working-storage section.
...
01 wtesta global.
...
procedure division using wtesta.
AFAIK, the identifier 'wtesta' should be in the 'LINKAGE SECTION'.
Hope this helps.
|