Re: QRG4033 - help needed

[Joep Beckeringh <joep.beckeringh@xxxxxxxxxx>]

Basically the error message states that the file is already open. I see 
that you already have IBM on the case, so I assume you already checked that?

Joep Beckeringh


Op 15-4-2020 om 17:05 schreef dfreinkel:
> I recompiled the code, to check, using DFTACTGRP(*YES). I still have the
> issue.
>
> Here is the error and joblog portion.
>
> The file in error is a join LF.
>
> Darryl Freinkel
> A4G.
> Tel: 770.321.8562 Ext 111 | Cell: 678.355.8562
>
>
>                           Additional Message Information
>
>   
>
>   Message ID . . . . . . :   CPF4205
>
>   Date sent  . . . . . . :   04/15/20      Time sent  . . . . . . :
> 10:02:36
>   
>
>   Message . . . . :   Shared open not allowed for query.
>
>   
>
>   Cause . . . . . :   The query open may not share a previously opened
> member,
>     and member OEPRTJ01 file OEPRTJ01 in library OEFILES is already open for
>
>     shared processing.
>
>   Recovery  . . . :   If shared processing is not required, specify program
>
>     parameter SHARE(NO).  If the query must be opened for shared processing,
>
>     close member OEPRTJ01 file OEPRTJ01 in library OEFILES before opening the
>
>     query.  If the member must be open, either open it with program parameter
>
>     SHARE(NO), or specify the SHARE(*NO) parameter on the OVRDBF command to
>
>     override the member.  Then try your request again.
>
>   
>
>         8800 - OVRDBF FILE(OEPRTJ01) OVRSCOPE(*JOB) SHARE(*YES)
>
>         9000 - OPNQRYF FILE((OEPRTJ01)) KEYFLD((PRPSOP) (PRENG#))
> SEQONLY(*NO)
>       Shared open not allowed for query.
>
>       Error occurred during processing of command.
>
>       Function check. CPF9899 unmonitored by OEUPGMC at statement 9000,
>
>         instruction X'008A'.
>
>       CPF9899 received by OEUPGMC at 9000. (C D I R)
>
>       CPF9899 received by OEUPGMC at 9000. (C D I R)