Re: Wanna see something scary?

[Booth Martin <booth@xxxxxxxxxxxx>]

Really stupid comment that I already regret but can't keep myself from 
hitting the send button:

Joe, did this repeat when you signed out and then signed back in?



On 2/18/2011 4:23 PM, Mark Murphy/STAR BASE Consulting Inc. wrote:
> Works as expected for me.
>
> Mark Murphy
> STAR BASE Consulting, Inc.
> mmurphy@xxxxxxxxxxxxxxx
>
> -----rpg400-l-bounces@xxxxxxxxxxxx wrote: -----
> To: RPG programming on the AS400 / iSeries<rpg400-l@xxxxxxxxxxxx>
> From: Joe Pluta
> Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> Date: 02/18/2011 03:33PM
> 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