Re: Compiling RPGLE using non-keyed file that's using OPNQRYF to specify key fields

Thanks to all, with your help managed to find the solution
I'd found source for the previous version (QSYS2.SYSPARTITIONSTAT is
amazing and it seems third parties 20 years ago were more
forgiving/forgetful?)
I added the new fields and the two key fields I required.
I compiled into a temp library and the record format id was the same as the
base file, then compiled the RPGLE over that file
I will add this program to the ever growing list of things that need
modernization
Thanks again

On Thu, 21 Nov 2024 at 23:30, Roger Harman <roger.harman@xxxxxxxxxxx> wrote:

There was a time when we loved it because it was all we had.
I recall being at COMMON when it was introduced! It was the coolest thing
ever.

From an article by Gene Cobb....

https://www.ibm.com/support/pages/system/files/inline-files/$FILE/OPNQRYF.pdf

"The OPNQRYF command was introduced in 1987, near the end of life for the
IBM System/38
platform. This command received rave reviews from the programming
community because it
provided an easy interface to dynamically access records in a database
file. Consequently,
thousands of programs that use OPNQRYF were developed and are still in
production today. A
few years after OPNQRYF was made available, IBM introduced SQL to the IBM
AS/400 family
of systems, giving programmers an alternative database-access tool set —
one that also
provides great flexibility, but one that actually surpasses OPNQRYF in
many important areas."


Roger Harman
COMMON Certified Application Developer - ILE RPG on IBM i on Power



-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Jim
Oberholtzer
Sent: Thursday, November 21, 2024 6:34 AM
To: rpg400-l@xxxxxxxxxxxxxxxxxx
Cc: rpg400-l@xxxxxxxxxxxxxxxxxx
Subject: Re: Compiling RPGLE using non-keyed file that's using OPNQRYF to
specify key fields

On that ONE FILE turn off level check?

There was a time when designers loved OPNQRYF because it gave the SQL
capability without having to do imbedded SQL.




Jim Oberholtzer
Agile Technology Architects

On Nov 21, 2024, at 8:10 AM, liam henderson <liamhenderson12@xxxxxxxxx>

wrote:

I was thinking that, but the base file is LVLCHK(*YES) and when I

create a

new file with the same name but specifying keys it has a different record
format level ID

On Thu, 21 Nov 2024 at 13:44, Paul Therrien via RPG400-L <
rpg400-l@xxxxxxxxxxxxxxxxxx> wrote:

Perhaps someone created a temporary file to mimic the OPNQRYF just to

get

the program to compile originally?

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of liam
henderson
Sent: Thursday, November 21, 2024 8:41 AM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Compiling RPGLE using non-keyed file that's using OPNQRYF to
specify key fields

Hi, I'm a bit stumped with this one
There's a third party application on our system and we run a process

over

one of their files that's not keyed.
We have a CL that does an OVRDBF and OPNQRYF specifying key fields, We
then call an RPGLE to process.
The base file has changed so we need to recompile the RPGLE I keep

getting

the following:

Msg id Sv Statement Message text

*RNF7081 30 013500 The File operation is not valid; there are no
common key
fields. The specification is ignored.

I've tried performing the OVRDBF and OPNQRYF scoped to *JOB and

compiling

interactively but its having none of it.

Had a search and found a page on Code400 stating this is not possible.
Just confused as to how this program has been running daily for twenty
years.
Debugged the live program and it's the same and does not report any

issues

Any help on how I can get it compiled would be greatly appreciated

Regards.
Liam
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe,

or

change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription

related

questions.

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription

related

questions.

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription

related questions.

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.