Perhapse you logged off, then logged back on causing the activation group to be destroyed, thus you got a new copy of the program?
Mark Murphy
STAR BASE Consulting, Inc.
mmurphy@xxxxxxxxxxxxxxx
-----rpg400-l-bounces@xxxxxxxxxxxx wrote: -----
To: "'RPG programming on the IBM i / System i'" <rpg400-l@xxxxxxxxxxxx>
From: "Jerry C. Adams"
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
Date: 07/12/2012 09:40AM
Subject: RE: %Parms Test Problem
Sorry for the delayed reply, but I was off yesterday.
Okay, I understand what you and Jon are saying, Barbara. And now I'm
thoroughly confused because I changed the program and prototype back to use
Options(*NoPass) on both parameters, plus a line that Gary suggested to see
what the value of %parms is.
I retested (with debug) the program and everything worked fine. The number
of parms had the correct value (even if the parm itself was blank). The
code in which I want to test whether or not I have received any parms
worked:
IF %parms >= 2;
dspOption = *On;
ELSE;
dspOption = *Off;
ENDIF;
Obviously I cannot *guarantee* that my retro version matches the version
that was causing me problems the other day because I did not keep a listing
of that version. But to the best of my knowledge the only thing I did this
morning was add back the *NoPass option, but I must have done something ever
so slightly different that has escaped me.
Regarding Jon's suggestion about PTFs, I'm still languishing on V5R1 so that
is not an option. (I do keep "suggesting" that we upgrade box and OS
version, but at this stage that is all I can do, and the answer keeps coming
back, 'No.' I would be looking forward to retirement if I wasn't sure that
I would be bored out of my mind!)
Jerry C. Adams
IBM i Programmer/Analyst
In theory there is no difference between theory and practice, but in
practice there is.
--
A&K Wholesale
Murfreesboro, TN
615-867-5070
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Barbara Morris
Sent: Tuesday, July 10, 2012 3:12 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: %Parms Test Problem
On 2012/7/10 1:51 PM, Jerry C. Adams wrote:
I'll take your word for it, Jon. Per my previous reply, it worked
when I removed the *NoPass options and tested via the command line.
Coding the *NoPass option should have no effect on whether %parms works.
And as Jon pointed out in his correction, the caveat about the minimal
operational descriptor only applies for bound calls. %parms always works for
a program call, no matter how you call the program, from the command line or
another program or an S36 proc.
If it was me, I'd try adding back the *NoPass and see if it still works.
Maybe there was something else going on like picking up an old version of
the program with a new version of the source.
--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or
change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
midrange.com
