How to Unpack the Packed decimal data in COBOL

latheef · New User Joined: 25 Sep 2009 Posts: 13 Location: chennai

Hi,

Please suggest how to handle below scenario in COBOL.

I have 2 variables (as given below) in my input file.

05 TDs-A PIC S9(05) COMP-3.
05 TDs-B PIC 9(04) COMP-3.

I want to unpack above Packed decimal data before writing in to my output file.

Please help me to resolve this issue. Thanks.!

Pandora-Box · Posted: Thu Jul 04, 2013 1:49 pm

Here , Does unpack mean to display the data in readable format (without Hex on) ??

latheef · New User Joined: 25 Sep 2009 Posts: 13 Location: chennai

My intention is I want to convert this packed decimal data in to zoned decimal format. please help me the zoned decimal variables declaration for above variables.

Pandora-Box · Posted: Thu Jul 04, 2013 2:22 pm

Lots of examples in forum please search and what have you tried so far?

Nic Clouston · Posted: Thu Jul 04, 2013 5:49 pm

This is a basic beginners question. You should not be on this forum but on the sister forum http://ibmmainframeforum.com/index.php
and there is nothing that cannot be found in the COBOL language reference manual and COBOL user guide.

dick scherrer · Posted: Fri Jul 05, 2013 9:28 pm

Hello,

If you do not have this working yet, suggest you define 2 new fields with the PICtures you want for the output.

Try a few things and if there is still doubt, post what you tried, what happened, and your doubt.

Some will be able to clarify.