Re: 2 calls to same program using different parameter lengths -- RPG400-L

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

On Thu, May 18, 2017 at 1:30 PM, Rob Berendt <rob@xxxxxxxxx> wrote:

Oh. Now that makes sense. I always added them to the end anyway.
Then you would only have to add an additional signature if you removed
one, or some such thing?

You can't remove one without breaking every caller....if that's really
want you want to do...you'd do it like so

Go from
STRPGMEXP PGMLVL(*CURRENT) LVLCHK(*YES) SIGNATURE('MYSRVPGM sig v1')
EXPORT SYMBOL("CA9804R")
EXPORT SYMBOL("MYNEWSUBPROCEDURE")
ENDPGMEXP

To
STRPGMEXP PGMLVL(*CURRENT) LVLCHK(*YES) SIGNATURE('MYSRVPGM sig v2')
EXPORT SYMBOL("MYNEWSUBPROCEDURE")
ENDPGMEXP

Note the signature change to force a level check exception. If your tried
to use a PGMLVL(*PRV) block here, instead of a level check error at run
time...you'd best case, get some funky exception. Worst case, you'd get
no exception but invalid results back from the remaining procedures. As
programs that think they are calling CA9804R() would actually be calling
MYNEWSUBPROCEDURE().

Charles

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.