|
(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.
midrange.com
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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
