× 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.



From Midrange-L (moved across, since it's a pure RPG question):

On 11/12/2012 8:02 AM, rpglist@xxxxxxxxxxx wrote:
I'm trying to pass a parm into a free format program and I have it
prototyped as follows:

DRigsChk pr extpgm('@RIGSCHK')
D InDate 8
DClm3024R pi
D InDate 8

However when I try to check the value of Indate I get a MCH3601

What the heck am I doing wrong here?



The example is a bit confusing. You have a PR/PI that do not appear to be matched to one another. Although they look like they accept the same parameter, they have different names, so RPG will not consider them the same thing.

But, in any case, MCH3601 doesn't mean that there's something wrong with your PI. It means that the caller didn't pass the parameter. There's nothing you can do on the receiving side (where the PI is) to force the caller to pass the parameter... that has to be done on the calling side.

-SK

As an Amazon Associate we earn from qualifying purchases.

This thread ...


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.