Thank you David.

How can the first 4 bytes of the Data structure that are a binary value be
converted to a number ?
I am getting this error when i do the following :
A character representation of a numeric value is in error (C G D F).
RPG statement performed a conversion from character to numeric using data
that was in error.

d ErrorInfo 240A
d Bin4 S 10I 0 INZ
eval Bin4 = %Int(%SubSt(ErrorInfo:1:4))

ERRORINFO =
....5...10...15...20...25...30...35...40...45...50...55...60
1 ' ■*MIXCASE1 '
61 ' '
121 ' '
181 ' '

----
Regards,
Mohan Eashver



On Thu, Oct 11, 2018 at 4:24 PM David Gibbs <david@xxxxxxxxxxxx> wrote:

On 10/11/2018 3:20 PM, Mohan Eashver wrote:
Thank you for your response David & Mark.
But this is what I get after expanding. The 1st message data value should
have been 16. But is showing some strange character.

EVAL APIError
BYTESPROVIED OF APIERROR = 256
BYTESAVAIL OF APIERROR = 35
ERRORID OF APIERROR = 'CPF4AA7'
ERRORRSVD OF APIERROR = '0'
ERRORINFO OF APIERROR =
....5...10...15...20...25...30...35...40...45...50...55...60
1 ' ■*MIXCASE1 '
61 ' '
121 ' '
181 ' '

Look at the message field data for CPF4AA7 ... the first 4 bytes are a
binary value that coresponds to the reason code. The next 15 bytes are the
rule

If you look at APIERROR.ERRORINFO in hex, you'll see the binary value.

david

--
David Gibbs
midrange.com

IBM i on Power Systems: For when you can't afford to be out of business!

I'm riding 615 miles (Yes, you read that right) in the American Diabetes
Association's Tour de Cure to raise money for diabetes research, education,
advocacy, and awareness. You can make a tax deductible donation to my ride
by visiting https://lsteml.diabetessucks.net.

See where I get my donations from ... visit
https://lsteml.diabetessucks.net/map for an interactive map (it's a geeky
thing).

I may have diabetes, but diabetes doesn't have me!
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
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: http://amzn.to/2dEadiD

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2020 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].