Re: CL STG(*DEFINED) Problem.

Thanks Simon

Your suggestions fixed my issue. I missed the bit re PARM and BASED.

The reason I did;
RTNWID: CHGVAR &RTNWIDTH &RTNWIDTH was so that I
could debug the program and break on the line.

Is the Midgrange list a better place for technical questions like this.
In my opinion, no. Now that CL has the ability to use pointers and based
variablesI think questions are best raised on this list.

BTW This also fixes a old problem I had with CL in that Packed Decimal data
from APIs was so awkard to deal with.

Frank Kolmann

On 27/02/2009, at 10:11 AM, frank kolmann wrote:

What I am asking is what did I do wrong with the new CL code.
The archives mention using %OFS but I dont see how to use %OFS here.

PS. I realise this is the RPG list but I figure you guys would be
best qualified to help with this question.

Should still have asked it on the proper list.

Two problems I see immediately:

1) DEFVAR uses position: position = offset + 1

2) Can't have a variable as both PARM and *DEFINED or *BASED

And what do you think
RTNWID: CHGVAR &RTNWIDTH &RTNWIDTH
is going to do?

Most straight-forward fix is to define a new variable &SPLWIDTH as
*DEFINED on &DS at the correct position and then copy that value into
the return value.

Regards,
Simon Coulter.