Which language? As you are talking about 9(4), I guess it may be COBOL.
Then: put a field pic 9 usage comp-3 just behind the field with the unsigned decimal data, initialized with zero. Then you have an additional zero halfbyte and a valid sign. Then you overlay the original field by a pic 9 usage comp-3 field, which is 1 byte longer than the original field. There you will find a value which is ten times larger than the original value (because of the additional zero digit). You use this value in the normal way. Kind regards Bernd Am 24.07.2013 11:20, schrieb Ron Thomas:
Hello. I have a input file where the data is stored in unsigned packed decimal format, now i need the data to be moved to 9(4) field. Could someone let me know how the data is retrived? Thanks, Ron T ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
