Re: yajl_addNum - but what if 0

I am unsure if you will end up with a decimal point you don't want.
you can do something ugly like this..
%char(%dec(%editc(myVar:'X'):15:0));
You should end up with just the 0 like you want or the number in myVar with no leading zeroes.
Do let us all know if DECEDIT('0.') worked for you? thanks.

Good Luck.

On February 14, 2019 at 3:40 PM Jay Vaughn <jeffersonvaughn@xxxxxxxxx> wrote:


Thanks! I’ll give it a try.

Jay

On Feb 14, 2019, at 2:28 PM, B Stone <bvstone@xxxxxxxxx> wrote:

I had this issue a while back too, and had done some odd things with it..
until someone pointed out all I need to do is:

H DECEDIT('0.')

I believe this will work for integers as well. You can give it a try, but
I believe it should work.

Original conversation was here':
https://www.fieldexit.com/forum/display?threadid=456


Bradley V. Stone
www.bvstools.com
MAILTOOL Benefit #15 <https://www.bvstools.com/mailtool.html>: The ability
to add a Footer to each email sent using an IFS stream file.

On Thu, Feb 14, 2019 at 1:04 PM Jay Vaughn <jeffersonvaughn@xxxxxxxxx>
wrote:

what if row.amount is 0 in the below example?

yajl_addNum('amount': %char(row.amount));

your json, is returned without a zero which results in invalid JSON...

If you do %editc(row.amount:'X') instead, it pads with leading zero's which
is also invalid.

What do you guys use for this?

Jay
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com