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. |