× 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.



DATABASE FEEDBACK:

Relative Record Number . . . . . . . . :   6


ILE RPG/400 FORMATTED DUMP

CUSNO                 PACKED(5,0)          00001.           '00001F'X
CUSPH                 PACKED(10,0)         0000000000.      '00000000000F'X
CUSST                 CHAR(2)              '  '             '4040'X
RRN                   PACKED(4,0)          0000.            '00000F'X

In my program Iam controlling
0030.00 C                   IF        RRN>0
0031.00 C                   EVAL      *IN30=*ON
0032.00 C                   ENDIF
0033.00 C                   ENDSR
       ****************** End of data ************* with 30 for  SFLDSP...



Warm Regards,
JoeP





From: "Jim Franz" <jfranz@xxxxxxxxxxxx>
Reply-To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Subject: Re: Session or device error
Date: Tue, 22 Aug 2006 08:46:28 -0400

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.
>


--
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.


_________________________________________________________________
FREE pop-up blocking with the new MSN Toolbar - get it now! http://toolbar.msn.click-url.com/go/onm00200415ave/direct/01/


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.