Re: edit code as variable in %editc()

I have a page of edit codes at rpglanguage.com/editcodes.html.

The edit code on %editc must be a literal.

Regards,
John McKay mba.


----- Original Message ----- From: "Bruce Vining" <bvining@xxxxxxxxxxxxxxx>
To: "RPG programming on the IBM i / System i" <rpg400-l@xxxxxxxxxxxx>
Sent: Friday, January 29, 2010 5:12 PM
Subject: Re: edit code as variable in %editc()

As previously pointed out, %editc requires that the edit code value be a
character constant.

If you want to use a variable edit code value the Convert Edit Code
(QECCVTEC) API documented at
http://publib.boulder.ibm.com/infocenter/iseries/v5r4/topic/apis/QECCVTEC.htm
and
the Edit (QECEDT) API documented at
http://publib.boulder.ibm.com/infocenter/iseries/v5r4/topic/apis/QECEDT.htm may
be of interest to you. These do require just a bit more work than the RPG
builtin though.

Bruce Vining


On Fri, Jan 29, 2010 at 9:56 AM, rick baird <rick.baird@xxxxxxxxx> wrote:

hey all,

is there a way to use %editc using a variable as the actual code?

for instance:

D $ecd S 1a
D $alpha S 10

$ecd = 'L'
alpha = %editc(number:$ecd)

when I try this, I get a compile error:

The second parameter $ECD for %EDITC is not a character
constant of length 1.

seems like a no brainer to me, but is it really possible this isn't
allowed?
--
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.

--
Regards,
Bruce
www.brucevining.com
www.powercl.com
--
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.