Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

UNPACKing the COBOL packed numeric data.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
mail_ssb

New User


Joined: 26 Mar 2005
Posts: 17

PostPosted: Thu Jan 19, 2006 7:36 am    Post subject: UNPACKing the COBOL packed numeric data.
Reply with quote

Hello,

Assume some input record contains all packed numeric data. I would like to unpack the digits for reporting purpose. I know ASSEMBLER has unpack instruction. Is there some way one can do this in Enterprise COBOL...?

Thanks for help.
Back to top
View user's profile Send private message

priya

Moderator


Joined: 24 Jul 2003
Posts: 568
Location: Bangalore

PostPosted: Thu Jan 19, 2006 10:14 pm    Post subject:
Reply with quote

Simply move COMP-3 to DISPLAY item before creating the report. it will work.
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Fri Jan 20, 2006 7:57 am    Post subject:
Reply with quote

If you're going to print the field it makes more sense to move it to the ediited field in the report line. The edited field could look something like

PIC ----9.99

If you moved a negative 123.45 to it, it would print as -123.45. If you moved a positive 6.54 to it, it would print as bbb6.54, where the "b"s are spaces.
Back to top
View user's profile Send private message
mail_ssb

New User


Joined: 26 Mar 2005
Posts: 17

PostPosted: Sat Jan 21, 2006 2:31 pm    Post subject: UNPACKing the COBOL packed numeric data.
Reply with quote

Hi Priya,

I am sorry, I did not get that. Did you mean that I need to move packed numbers directly into a variable of type 9.

E.g. Say, input is 2 byte comp-3. Should I move this into 9(4) variable of a report layout...? I dont think, that works.

Let me know, if I understood it wrong. Thanks for your help.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Validate date and numeric fields and ... Rick Silvers DFSORT/ICETOOL 6 Thu May 11, 2017 6:51 pm
No new posts Replace values in the input data Vikas Maharnawar DFSORT/ICETOOL 10 Thu May 11, 2017 2:18 pm
This topic is locked: you cannot edit posts or make replies. Cobol GUI (like Editor) Kala Mainframe COBOL Programming 14 Wed May 10, 2017 12:30 pm
No new posts IMS T-Pipe queue counts in a COBOL Pr... Siva NKK Kothamasu IMS DB/DC 0 Tue May 09, 2017 6:31 pm
No new posts READ A PACKED "NEGATIVE" FI... jdesouza CA Products 3 Tue May 02, 2017 11:43 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us