Re: a file in a service program

["Joep Beckeringh" <joep.beckeringh@xxxxxxxxxx>]

Rick,

All our service programs open and close all files on every call. Obviously
we don't do I/O intensive things in service programs. If we did, we would
probably open on first call and close on last call (special call to indicate
that caller is finished).

If you leave files open till the end of the activation group, keep in mind
that you are also keeping a lock on the files. That means (at least) no
other job can get a *EXCL lock to these files. So no clearing, reorganising
or ending of journaling is possible.

Joep Beckeringh


----- Original Message -----
From: <rick.baird@xxxxxxxxxxxxxxx>
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Sent: Friday, September 26, 2003 3:16 PM
Subject: Re: a file in a service program


>
> Joep, thanks for the clarification.
>
> So, how do you open files in srvpgms?  Let the program or usr opened?
>
> does letting the program open the file, open it on first call to any
> procedure in the srvpgm and then leave it open till the end of acvgrp?  if
> so, that would be acceptable for my purposes in this particular srvpgm
(but
> not in a couple others).
>
> btw - I'm using nomain.
>
> thanks,
>
> Rick