Re: Retrieving Decimal Data Area with QWCRDTAA

Just figured that out and the procedure worked great. I was already
piecing together similar code based Vern's comments when I was pulled off
task to work on a more pressing matter. Decided to check the group before
I got back to it, and I am glad I did. :)

Thanks again.


On Mon, Apr 23, 2012 at 5:12 PM, Dennis Lovelady <iseries@xxxxxxxxxxxx>wrote:

Well, I have a ways to go before perfection sets in, too! :) I saw
perfection on the street and it wouldn't even acknowledge me.

To that point: the last line in the example code I sent, is incorrect. It
is the End of a Procedure, not the Beginning. So please change the B to E
on that line. (Everything else, by the way, has been tested.)

Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
"As long as we are lucky we attribute it to our smartness; our bad luck we
give the gods credit for."
-- Josh Billings

Thanks for the example. And to your point, I was looking at the
returned data in hex mode when I realized what had been returned and
wrote the email, so I guess that is why I had hex on the brain. I
realized after I sent it that I wasn't technically accurate, but I
figured everyone would get what I meant. Almost sent a follow up but
decided against it.

Since everyone seemed to follow, I suppose my less than perfect wording
was adequate but not accurate. :-)

Thanks again for the example.


On Mon, Apr 23, 2012 at 3:31 PM, Dennis Lovelady
<iseries@xxxxxxxxxxxx>wrote:

Just remember, the character data here does not contain '20.345'.
If it did, it would be easy. The data here is in hex and I need to
get it to packed.

To quote Tom Hanks: I don't even want to think about what they're not
teaching you in school! Hex, in this context, is a human's view of
the data. Packed has to do with the way the data is stored. Their
usage is not interchangeable, and neither is in/compatible with the
other.

What you've said is equivalent to "I wanted to send data to by friend
but all he received was ones and zeroes."

At any rate, the code found here will, I believe, do exactly what you

want.

http://code.midrange.com/83a6933d01.html

Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
"Too bad all the people who know how to run the country are busy
driving taxis and cutting hair."
-- George Burns

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

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

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