IBM MAINFRAME HELP & SUPPORT FORUMS
Technical Forums for IBM Mainframe Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7&11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
 

Difference b/w zone decimal & pack decimal

THIS IS AN ARCHIVE FORUM: CLICK HERE TO GO TO THE ORIGINAL TOPIC

 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> Mainframe COBOL
View previous topic :: View next topic  
Author Message
priyanga



Joined: 26 Aug 2004
Posts: 5

Posted: Sat Oct 02, 2004 12:59 pm    Post subject: Difference b/w zone decimal & pack decimal  

hi,


what is difference b/w zone decimal & pack decimal



thank u
Back to top  
priya



Joined: 24 Jul 2003
Posts: 624
Location: Bangalore

Posted: Tue Oct 05, 2004 9:57 pm    Post subject: Re  

PACKED DECIMAL reserves half byte per character. To store in packed decimal use COMP-3.

The internal format of storage is 8421.

Zoned decimal reserves one 2B/ 4B / 8B depending on the no of inputs.

Use COMP / BINARY to store in Zoned Decimal.

The internal format is Binary.
Back to top  
mmwife



Joined: 30 May 2003
Posts: 1526

Posted: Wed Oct 06, 2004 8:03 am    Post subject:  

Hi Pryia,

What you describe as Zoned Decimal is really Binary. Zoned Decimal is External Decimal (usage DISPLAY).

A Zoned Decimal number is represented in storage as e.g. F1F2F3C4 for a positive 1234. The Fs and the C are the zones.
Back to top  
 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> Mainframe COBOL
Page 1 of 1
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM