× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  1.  Home
  2. RPG400-L
  3. December 2019

using arrays as part of the parameters to a procedure in a service program

Merry Christmas everyone
I am hoping that not too many people have taken today as a holiday
Before I forget - we are on V7r3

I am creating a brand new service program, with a number of new procedures
This particular procedure has the following prototype

dcl-pr getCTFulfill likeds(rtnUserProfileDS);
pPbnum packed(7:0) const;
pPbslt# packed(2:0) const;
pFulfillmentId char(17) const;
pReceipt# char(10) const;
pDebug ind const options(*nopass);
pLR ind const options(*nopass);
end-pr;


I now need to insert 2 arrays after pReceipt# (if that makes a difference)
Each array will have a dim of 2000

The question is - how do I define them in the above prototype?

As always - all responses gratefully accepted
Alan Shore
E-mail : ASHORE@xxxxxxxx<mailto:ASHORE@xxxxxxxx>
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill


As an Amazon Associate we earn from qualifying purchases.

This thread ...
Follow-Ups:
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.