RE: Does Qcmdexc return an error ??

["Turnidge, Dave" <DTurnidge@xxxxxxxxxxxxxxxxxxxx>]

CHKOBJ? 

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of derek gonsalves
Sent: Wednesday, May 30, 2007 7:35 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: Does Qcmdexc return an error ??


Sorry Joe,

I guess i typed it wrong.
My from file and to file are the same.
OVRDBF FILE(MPPMP100) TOFILE(DXGO/MPPMP100) The requirement of my
program is that, if file MPPMP100 does not exist in DXGO, then an error
message should be written to the printer file.Any suggestions for this??


> From: "Joe Pluta" <joepluta@xxxxxxxxxxxxxxxxx>
> Reply-To: RPG programming on the AS400 / iSeries 
> <rpg400-l@xxxxxxxxxxxx>
> To: "'RPG programming on the AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>
> Subject: RE: Does Qcmdexc return an error ??
> Date: Wed, 30 May 2007 07:29:55 -0500
>
> > From: derek gonsalves
> >
> > Hi,
> >
> > I have a Qcmdexc statement in a program.
> > OVRDBF FILE(ABC) TOFILE(                    )
> > Now for eg.
> > the TOFILE is DXGO/ABC. If MPPMP100 does not exist in DXGO, can i
> capture
> > this error?(Or is there any other way of doing it)
>
> Derek, the override command (OVRDBF) doesn't actually check for the
file.
> It simply tells the operating system that any programs trying to open 
> file ABC should instead open MPPMP100 in DXGO.  (I assume you meant 
> that your TOFILE is DXGO/MPPMP100.)
>
> An error doesn't actually occur until a program tries to open file ABC.

> At that point, the operating system sees the override and attempts to 
> open the TOFILE.  Typically, this is when your RPG program first loads 
> (or if you have defined the USROPN keyword for the file, it happens 
> when you issue the OPEN opcode to the file).
>
> The easiest way to handle this is probably with a USROPN file.  You 
> could put an error indicator on your OPEN statement, or put a MONITOR 
> block around it.
>
> Joe
>
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing 
> list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, 
> unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a 
> moment to review the archives at http://archive.midrange.com/rpg400-l.