Re: %Dec and UTF-16 fields ...

As I recall, the documentation states the the %char bif converts UTF to a local string. Did you try?

AvType = %dec(%char(attrVal) : 2 : 0);

Eric

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Leif Guldbrand
Sent: Wednesday, October 17, 2007 12:35 PM
To: RPG programming on the AS400 / iSeries
Subject: %Dec and UTF-16 fields ...



Using Scott's Expat parser with UTF-16 it seems the compiler dont
like the use of %Dec with UTF-16 fields as first parameter (V5R3M0).

D XMLdata s 16383C

XmlData = %Ucs2(XmlDoc);
(XmlDoc is a varying field I receive inside a record from another place)

P start B
D start PI

D attrVal s 100C varying
D attrValA s 100A varying

Ex. with attrVal as a UTF-16 field:
if %char(Field) = 'Type';
AvType = %dec(attrVal : 2 : 0);
*RNF0327 30 1 The first parameter for %DEC or %DECH is not valid.


Ex. with attrValA as a chr. field:
if %char(Field) = 'Type';
attrValA = %char(attrVal);
AvType = %dec(attrValA : 2 : 0);
Compiles and behave as expected ...

Any comments or insight to this behavior :-)

Regards,
Leif


--
This is the RPG programming on the AS400 / iSeries (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.




--
This is the RPG programming on the AS400 / iSeries (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.