Re: Is it possible to open file dynamically in RPG or COBOL

[david.kahn@xxxxxxxxxx]

Baba Rahiman <baba.rahiman@kiosk.ch> wrote:

>In  my program (RPG or COBOL) I want to ask user to enter filename .
>After user enters the filename, I want to open the file.
>Is it possible in COBOL or RPG?

Baba,

This approach should work in either language. In the program give the file a
default name, say DUMMY. In RPG you would need to define the file with user
controlled open. Before opening the file, call QCMDEXC with an OVRDBF command to
override DUMMY to the name supplied by the user. Depending on exactly what you
are intending to do you may also need to specify LVLCHK(*NO) on the OVRDBF
command.

Dave Kahn, ABB Steward Ltd.


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---