RE: Using OPNQRYF issue with a missing key.

If I had the option, I would convert to ILE and use SQL too.

Going backwards is backward....

Darryl Freinkel
A4G.
Tel: 770.321.8562 Ext 111 | Cell: 678.355.8562

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Vernon
Hamberg
Sent: Monday, March 2, 2020 5:08 PM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: Using OPNQRYF issue with a missing key.

Hi Darryl

You have to use SHARE(*YES), so that the called program can use the ODP
- open data path - created by OPNQRYF.

Other than that, I don't know what is happening - seems about time to go
with SQL in the RPG. Or create an SQL index with the same name as whatever
is used in RPG, and maybe it can be an index over a JOIN VIEW and include
the columns you want in it.

Thinking crazy I am!

Cheers
Vern

On 3/2/2020 2:41 PM, dfreinkel wrote:

I have an issue where there is a CL program with an OPNQRYF using
SHARE(*YES) on a JOIN LF.



I had to change the program from SHARE(*YES) to SHARE(*NO) only to
find that the keys on the OPNQRYF are different to the keys defined in
the DDS of the JOIN file. The SHARE(*YES) allows this or did allow it
until another modification came through when the RPG program crashed on

loading the RPG.

The keys defined in the join LF are:

* Key 1 (both files)
* Key 2 (second file only)
* Key 3 (both files)



The OPNQRYF keys are as follows:



File1.Key1

File2.Key2

File1.Key3





Can this be achieved in defining the join LF?



TIA



Darryl Freinkel

A4G.

Tel: 770.321.8562 Ext 111 | Cell: 678.355.8562

--
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@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link:
https://amazon.midrange.com