|
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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.