RE: File open management

David,

If the program is at a point where you have a message to answer why not
just look at the code, if possible. You can do this from a 5250 screen
by...

1. Starting a service job against the job with the failing program.
2. Start debug against the failing program.
3. Set your break points if needed.

While in debug you can...

1. Display any available variable.
2. If it is an interactive job, work with the user to determine what is
causing the failure.

Good luck,



Gary Monnier

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of David FOXWELL
Sent: Wednesday, February 02, 2011 5:36 AM
To: RPG programming on the IBM i / System i
Subject: File open management

Hi all,

Trying to debug a program that has failed. Unfortunately, on pressing
'G' the program restarts a procedure where the first instruction is OPEN
Myfile.
The file is closed at the end of the procedure.

Should that be :
if not %open;
open myfile; ?

Is there anyway of closing the file while debugging in order to continue
the program?

Thanks.