On 10/12/2018 8:09 AM, Mohan Eashver wrote:
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

I would suggest you use a data structure for ErrorInfo instead of a character field.

Something like this:

dcl-ds ErrorInfo qualified;
reason int (4);
rule char (15);
end-ds;

reasonCode = ErrorInfo.reason;
rule = ErrorInfo.rule;

david


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].