Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

RPG400 : name of files substitued (OVRDBF) ?

51 views
Skip to first unread message

Patrick Chatelain

unread,
Oct 17, 2001, 2:40:45 AM10/17/01
to
Bonjour,

I need to find the name of the file substitued by OVRDBF in run of the
program RPG ...

Any sugestion to my problem ?

Thanks for advance
Patrick

John B

unread,
Oct 17, 2001, 8:59:12 AM10/17/01
to
Patrick;

One way would be to pass a parameter in to your RPG program.
Like; If ov_flag = 1 then overridden file is apfile
If ov_flag = 2 then overridden file is apxfile...

Another way might be (i haven't used it) this File API.

1.16 Retrieve File Override Information (QDMRTVFO) API
________________________________________________________________________
|
|
|
|
| Required Parameter Group:
|
|
|
|
|
|
|
|
|
| ____ __________________________________________ ________
___________ |
| | 1 | Returned override information | Output |
Char(*) | |
| |____|__________________________________________|________|___________|
|
| | 2 | Length of override information | Input |
Binary(4) | |
| |____|__________________________________________|________|___________|
|
| | 3 | Format name | Input |
Char(8) | |
| |____|__________________________________________|________|___________|
|
| | 3 | File name | Input |
Char(10) | |
| |____|__________________________________________|________|___________|
|
| | 4 | Error code | I/O |
Char(*) | |
| |____|__________________________________________|________|___________|
|
|
|
|
|
|
|
|
|
|
|
| Threadsafe: Yes
|
|
|
|________________________________________________________________________|

The Retrieve File Override Information (QDMRTVFO) API returns the name
of the file, library, member and final type of override that result
from processing TOFILE or MBR overrides for the user specified file
name.


Overrides will be processed in the following sequence:

Any call level overrides up to and including the level of the
activation group's oldest procedure

Any activation group level overrides
Any remaining call level overrides
Overrides at the job level

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX


"Patrick Chatelain" <gielor...@wanadoo.fr> wrote in message news:<9qj8ll$k5e$1...@wanadoo.fr>...

Andy Morrison

unread,
Oct 17, 2001, 1:07:49 PM10/17/01
to
try a System Request 3 .... followed by DSPOVR *all

"Patrick Chatelain" <gielor...@wanadoo.fr> wrote in message
news:9qj8ll$k5e$1...@wanadoo.fr...

Roberto Nenni

unread,
Oct 17, 2001, 2:10:50 PM10/17/01
to

"Patrick Chatelain" <gielor...@wanadoo.fr> ha scritto nel messaggio
news:9qj8ll$k5e$1...@wanadoo.fr...

> Bonjour,
>
> I need to find the name of the file substitued by OVRDBF in run of the
> program RPG ...
>
> Any sugestion to my problem ?
Try from position 83 to 92 in the infds of the file

Roberto Nenni


Caura

unread,
Oct 17, 2001, 2:39:21 PM10/17/01
to
Patrick,

you can find the Library/file/member names (among other stuff) in the "File
Information Data Structure" once the file is open.
So it's accessible in any RPG pgm .


"Patrick Chatelain" <gielor...@wanadoo.fr> wrote in message
news:9qj8ll$k5e$1...@wanadoo.fr...

0 new messages