|
Curt, Try this: H BNDDIR('XTOOLS/XTOOLS') /copy xtools/qcpysrc,numtochar eval %char(numToNum(%subst(myData:3:4) : 'P' : 7 : 2)) This requires RPG xTools, however. If you don't have xTools, look up the LBCPYNV MI instruction, which is what I use under the covers. -Bob Cozzi www.iSeriesTV.com iPod your industry news instead of reading it. Coming June 2006 Ask your friends to tune into iSeriesTV.com -----Original Message----- From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Curt Vancalster Sent: Tuesday, May 30, 2006 2:46 PM To: rpg400-l@xxxxxxxxxxxx Subject: Moving Packed Data I am working in RPG IV. I am trying to substringing out of a character field, packed data. I am trying to put this packed data back into another character field, but I don't want it packed, I want to see the actual value. How do I accomplish this? I tried substringing into a character field and then moved that into a signed field, but that does not work. I get a decimal data error. I don't want to create a data structure either cause the format of the initial character field could change. Any suggestions? Curt VanCalster Lead Programmer Smithfield Beef Group., - Green Bay, WI (920) 406-1174 curt.vancalster@xxxxxxxxxx
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.