Re: Passing a array DS as a parameter

Thank you for the suggestion Birgitta.
I changed the code to use an array DS.
The code is here. https://wiki.midrange.com/index.php/ARRAY_DS_of_DSPFD

I am using V7R3

However I am getting only the first element of the DS array back to the calling program.

FWIW I know I had the MODS passing working previously, so what changed?

In any case , what have I done wrong to not get the entire DS array back to the caller.
This is the first time I used a  DS array.  Is it even possible to pass a DS array as a parameter?


Regards
Frank





On 12/02/2020 5:41 pm, Birgitta Hauser wrote:

Why using a MODs and not an Array Data Structure?
Both have the same structure under the cover.

Mit freundlichen Grüßen / Best regards

Birgitta Hauser


"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
„Train people well enough so they can leave, treat them well enough so they
don't want to.“ (Richard Branson)


-----Original Message-----
From: RPG400-L<rpg400-l-bounces@xxxxxxxxxxxxxxxxxx>  On Behalf Of Frank
Kolmann
Sent: Mittwoch, 12. Februar 2020 05:42
To:rpg400-l@xxxxxxxxxxxxxxxxxx
Subject: Passing a MODS as a parameter

Hi

A while back I wrote a program that uses QDFRTVFD api.
source is here
https://wiki.midrange.com/index.php/QDFRTVFD_%E2%80%94_Retrieve_Display_File
_Description


I am quite sure I had this working.
But Dan Bale mentioned to me that the code is not working.

Reason why the program fails , is only the first OCCUR of the MODS is passed
to the caller program.

Has something changed?

How I coded the pass of the MODS is to define the MODS in both the caller
and called program and pass the pointer to the MODS via a parameter.

Thanks for any suggestions.

Frank Kolmann