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

["Henrik Krebs" <hkrebs@xxxxxxxxx>]

Nedenfor er resultatet af din e-mail formular.
Indsendt af hkrebs@hkrebs.dk

message: No problem opening a file within RPG (I don't know the codes in COBOL, 
but they are similar I guess):

The F-SPEC must have an 'UC'=UserControlled
You must have an C-spec 'OPEN' 

Note the behaviour of QCMDEXC - The override works for current invocation level 
and downwards. A call to a CL-program would not do it unless it specifies 
OVRSCOPE(*JOB).

Also consider taking in the File INF-DS. It has a 'file open?'switch. Use this 
if you want to test if the file already is open so you can do a close first 
before doing a new override and re-open.

An example:

FVARFILE IF  F      80            DISK                           UC

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