Re: QIBM_QP0L_SCAN_OPEN situation

[Randy Cayton <randy_cayton@xxxxxxxxxxx>]

sounds good , have a good one

On Fri, Jan 22, 2021 at 1:33 PM Jay Vaughn <jeffersonvaughn@xxxxxxxxx>
wrote:

> We have an exit point on our IFS files.
> When an IFS file is open, our exit pgm fires.
>
> Now the way I understand it, is that this file is in the process of opening
> and our exit pgm is part of that open process.
>
> Our exit pgm does this...
>
> call pgm1 (modify file contents being opened)
> call pgm2 (use those modified contents)
>
> However, we are not seeing the modified contents in pgm2.
>
> We were thinking of the obvious solutions.
> 1.) after pgm 1, close() and reopen in pgm2... but this is part of the
> initial file opening so close() is not allowed in this exit pgm.
> 2.) after pgm1, obtain a new fileID (scanDescriptor), but the original one
> passed in via the exit pgm parm, is still the same.  How would we get an
> updated one (if one exists)?
> 3.) after pgm 1 is there a "commit" of some sorts we need to do, as this
> IFS file is under commitment control.
>
> Any input would be appreciated.
>
> Jay
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: https://amazon.midrange.com