× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



In the dump, what is the value of the rrn field?

jim

----- Original Message ----- From: "Joseph Pascoguin" <joe.pascoguin@xxxxxxxxxxx>
To: <rpg400-l@xxxxxxxxxxxx>
Sent: Tuesday, August 22, 2006 8:40 AM
Subject: Session or device error



Good Morning All,

I wrote a simple Load-all subfile program SFR001 to access CUSTOMER file.
I wrote the same program(same load all) by giving different name SFR001A to
access same CUSTOMER.
When I call SFR001A it is throwing the error " Session or device error
occurred in file SFD001 (C G D F)."
I took D to see dump, the one statement that attracted me is as below
Message Identifier . . . . . . . . . . :   CPF5021
            Incorrect relative record number or field selection error.

In the additional message information by F1 , I can seen below


Message ID . . . . . . :   RNQ1255       Severity . . . . . . . :   99
Message type . . . . . :   Inquiry
Date sent . . . . . . : 08/22/06 Time sent . . . . . . : 08:30:43

Message . . . . :   Session or device error occurred in file SFD001 (C G D
F).
Cause . . . . . :   RPG procedure SFR001A in program PASCOJ/SFR001A at
 statement *INIT detected a session or device error.  Recovery may be
 possible. Examine the major/minor return code value to determine the
 specific error that occurred. If the major return code is 82 then the
error
 occurred while acquiring a session or device. If the major return code is
83
 then the error occurred during an I/O operation and the session or device
is
 still active.

Can some one advise why the second program(SFR001A) is throwing this
exception, though it is same as that of SFR001?
Thank you all,

JoeP

_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today it's FREE!
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/

--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.