Re: Clear record format clearing parameter as well...

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

Robert,

The "CLEAR FOORDHD" is apparently clearing some global variables.

Is it possible that p_FONumber is viewing the same area of memory as one 
of the globals you cleared?

Just because p_FONumber provides read-only access to the underlying 
memory doesn't mean that the global variables are read-only, too.

On 12/19/2011 12:06 PM, Robert Rogerson wrote:
>     Hi all,
>
>     I have a subprocedure to create an order header record.
>          P CreateFlexOrderHeader...
>          P                 b
>          d CreateFlexOrderHeader...
>          d                 pi              n
>          d  p_FONumber                         like(ord#) const
>          d  p_BatchIdRec                       likeds(batchIdRecTemplate)
>     const
>
>           * Local variables
>
>           /free
>            Clear foordhd;
>     .
>     .
>     .
>           /end-free
>
>          P CreateFlexOrderHeader...
>          P                 e
>
>     When I put the program in debug a break just before the CLEAR FOORDHD
>     statement the p_FONumber parameter (a new order number) and p_BatchIdRec
>     (a record used to build a new order record) both have (correct) values.
>
>     When I issue the Clear foordhd statement (foordhd is the record format in
>     the file which I am building a new record for) the value for po_FONumber
>     is being set to 0 while p_BatchIdRec remains unchanged.
>
>     Can someone tell me why p_FONumber being changed?
>
>     Thanks,
>
>     Robert Rogerson