I'm on 7.1 and I get blank also.
~Zach
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Joe Pluta
Sent: Friday, February 18, 2011 2:23 PM
To: RPG programming on the AS400 / iSeries
Subject: Wanna see something scary?
Take a look at this code:
d MyConstant c 'Data'
/free
DoProc();
*inlr = *on;
/end-free
p DoProc b
d pi
/free
MyProc( MyConstant);
/end-free
p e
p MyProc b
d pi
d MyParm 10 const
d tempvar s 10
/free
tempvar = MyParm;
/end-free
p e
What would you expect tempvar to get set to? I think it would be "Data"
but I would be wrong. It gets blanks, at least on my system.
Joe
--
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.
NOTICE: This electronic mail message and any files transmitted with it are intended
exclusively for the individual or entity to which it is addressed. The message,
together with any attachment, may contain confidential and/or privileged information.
Any unauthorized review, use, printing, saving, copying, disclosure or distribution
is strictly prohibited. If you have received this message in error, please
immediately advise the sender by reply email and delete all copies.
midrange.com
