Re: CL STG(*DEFINED) Problem.

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.
--------------------------------------------------------------------
FlyByNight Software OS/400, i5/OS Technical Specialists

http://www.flybynight.com.au/
Phone: +61 2 6657 8251 Mobile: +61 0411 091 400 /"\
Fax: +61 2 6657 8251 \ /
X
ASCII Ribbon campaign against HTML E-Mail / \
--------------------------------------------------------------------



--
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.