Re: Write packed number to program-described file using imbedded SQL

Timothy,

Not near an iSeries right know but, What happens if you define your
packed number in a DS, along a char field, something like:

MYDS DS
CharF 04
Num 04 0


Move your data to Num and then Move CharF to your program described file?

HTH,

Luis Rodriguez
IBM Certified Systems Expert — eServer i5 iSeries



On Mon, Dec 14, 2009 at 4:22 PM, Timothy Adair <tadair@xxxxxxxxxxxxxxxx> wrote:

Am I just having a massive brain-cramp on this one?  How do you write a
packed number (7,4 - 4 bytes long) to a program-described file using
imbedded SQL?  Defining the field as packed in RPG doesn't help because the
program still considers it as if it were unpacked (i.e. 123.4567).

Please don't ask why I would want to do this - I'm in a situation where
there are few options.

Help?  (My main has turned to brush.)

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