[open-cobol-list] Re: File IO error with std=mvs

[Keisuke Nishida]

At Wed, 03 Mar 2004 21:00:24 +0100,
Margit Schubert-While wrote:
> 
>          SELECT XYZ ASSIGN TO DATANAME1.
> 
>          01  DATANAME1    PIC X(128)  VALUE "VALIDINPUTFILE".
> 
>          OPEN INPUT XYZ.
>          READ XYZ AT END GO TO Z-END.
> 
> Works fine with std=cobol85 or std=mf.
> With std=mvs, it doesn't find the file. (In fileio.c there is rubbish in 
> the filename)
> Presumably caused by "assign-clause: ibm" in mvs.conf which activates
> CB_ASSIGN_IBM in typeck.c

From 
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IGY3LR10/4.2.3?DT=20020920180651
| assignment-name-1
| Identifies the external data file. It can be specified as a name or as
| the content of an alphanumeric literal.
| 
| Note: Assignment-name-1 is not the name of a data item, and
| assignment-name-1 cannot be contained in a data item. It is a just a
| character string.

You cannot define DATANAME1 as a data item.  If you want to do so,
please use -std=mf or write your own config file.

Keisuke