Re: RNF5198 (was: "no subject")

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

(Redirected from MIDRANGE-L)

This usually happens when you specify UPDATE on a file that was not opened 
for update.  i.e. you did not specify "U" for "Update" on the F-spec for 
this file.

If you'd like more detail on error messages in a compile lissting, you can 
specify OPTION(*SECLVL) on the CRTBNDRPG or CRTRPGMOD command. This'll 
give you more info about the error message.

Alternately, you can type:
    DSPMSGD RANGE(RNF5198) MSGF(QDEVTOOLS/QRPGLEMSG)

That should allow you to display more info about the error message.

Good luck


On Mon, 19 Dec 2005, Bruce Barrett wrote:

> I received this question in an email from one of our developers.  I have
> verified the profile has the correct authority to do the update, but I
> can not seem to locate the cause of the error message.  I even went so
> far as to give *PUBLIC all authority to the file.
> Where can I find information on the error code?
>
> *RNF5198 30      1 File in Factor 2 is not allowed for UPDATE or DELETE
>                   operation.
>
> Here is the code:
>
> 86 C                   Read(E)   ISPFPSO
> 87 C                   DoW       NOT %EOF
> 88  *
> 89 C                   If        ENTXSO = *BLANKS
> 90 C     KPSDX         Chain(E)  ISPSDX0
> 91 C                   If        NOT %ERROR
> 92 C                   Eval      ENTXSO = ENTXSX
> 93 C                   Update(e) ISPSO00
> 94 C                   Endif
> 95 C                   Endif
> 96  *
> 97 C                   Read(E)   ISPFPSO
> 98 C                   EndDo
>
> Here is the authority I found for the file:
>
>                            Display Object Authority
>
>
>
> Object . . . . . . . :   ISPFPSO         Owner  . . . . . . . :   ISPRD
>
>   Library  . . . . . :     xxxxxxxx      Primary group  . . . :   *NONE
>
> Object type  . . . . :   *FILE           ASP device . . . . . :
> *SYSBAS
>
>
> Object secured by authorization list  . . . . . . . . . . . . :
> PRDDTA
>
>
>                          Object    ----------Object-----------
>
> User        Group       Authority  Opr  Mgt  Exist  Alter  Ref
>
> *GROUP      ISPRD       *ALL        X    X     X      X     X
>
> *PUBLIC                 *USE        X
>
>
>
>
> Bruce Barrett
> PMI Mortgage Insurance Co.
> 3003 Oak Road
> Walnut Creek, CA 94597
> 925-658-6152
> bruce.barrett@xxxxxxxxxxxx
>
> This e-mail is confidential and may be privileged. If you are not the
> intended recipient, please destroy this message and notify the sender.
>
>
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.