Midrange News for the IBM i Community


Posted by: Chris Proctor
Programmer Analyst
Columbia Sports Company
Portland, OR
Passing a data structure as a parm
has no ratings.
Published: 29 Sep 2015
Revised: 30 Sep 2015 - 1050 days ago
Last viewed on: 15 Aug 2018 (2066 views) 

Using IBM i? Need to create Excel, CSV, HTML, JSON, PDF, SPOOL reports? Learn more about the fastest and least expensive tool for the job: SQL iQuery.

Passing a data structure as a parm Published by: Chris Proctor on 29 Sep 2015 view comments(2)

Hello all. I'm having a problem coding with the new "DCL-"  when it comes to passing a data structure to a program that is being called within a program. I'm sure I just have the syntax wrong. Can someone please give me the correct way to code it? The error is telling me that the attributes of PARM4 don't match the prototype. It appears that maybe the program sees PARM4 as a data structure, but the prototype sees it as a CHAR(256) field, right? If so, how should I adress this? I don't think I can define the parm in the prototype as a data structure.  Thanks in advance!! Here's an example of one:

 

 

dcl-pr prcTypCurrSearch extpgm('TBL170');

  parm4 char(256);

end-pr;

 

dcl-ds parm4 extname('TBL170ED') inz end-ds;

 

 

 

dsevnt = sevent;

dsmod = 'PRC';

dsact = '1';

dstrn = '1';

dsnact = '0';

dshom = '0';

prcTypCurrSearch(parm4);

Return to midrangenews.com home page.
Sort Ascend | Descend

COMMENTS