RE: OPNQRYF with variable key names

Marla,

Are you doing any SETLL/SETGT in the RPG program?

Are you using READ or READP?

Sounds like the RPG program may be at the EOF when it starts.

Sorry I can't be of more help, but I quit using OPNQRYF years ago and went to 
embedded SQL. 

Charles Wilt
--
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
 

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Alan C
> Sent: Wednesday, June 22, 2005 12:49 PM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: OPNQRYF with variable key names
> 
> 
> Marla,
> 
> The *ASCEND/*DESCEND will not make a difference if there are records 
> selected, so there must be something else going on.
> 
> What first comes to my mind, based on your getting data for 
> *ASCEND and 
> none for *DESCEND, is to suggest looking for lines in your 
> RPG that make 
> record selections or comparisons after the READ to the file.
> 
> - Alan
> 
> 
> >Through further testing, I found that my only problem - 
> whether it is by using the CL statements or the RPG version - 
> is that I don't have any records selected when I chose to 
> sort my data descending.
> >
> >I don't get any error messages, just an end of file 
> condition that there was no data.  It doesn't matter if my 
> data is alpha or numeric.  If I choose to have the data in 
> *DESCEND sequence for whatever key field, I don't have any 
> data.  My code works fine the default of *ASCEND.  If I 
> hardcode the field name in the keyfld for the one I want to 
> have sorted descending, it still will not provide me any 
> data.  I am not sure how to go about even debugging this to 
> find the issue.
> >
> >I am not sure what else I can provide to give further 
> information.  Please let me know what other information you 
> need me to provide.
> >
> >Thanks!
> >Marla Snow
> >
> >
> >  
> >
> 
> -- 
> 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.
> 
>