Interested to Buy Any Domain ? << Click Here >> for more details...
wht is packed decimal in cobol
- 2 Answers
- 7289 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / billyboyo
Packed decimal is IBM's method to allow calculation
directly in base-10.
A DISPLAY numeric field might be PIC S9(7).
If you were to try to add 1 to this, the compiler would
convert, in its own work area, this field to a "packed
decimal" field and generate an AP (Add Packed) to do the
addition, then it would convert the field back to DISPLAY
and the correct value would be in your PIC S9(7) field.
Notice that if you had started off with a COMP-3 (packed
decimal) PIC S9(7) you avoid doing two conversions (from
display to packed and from packed to display).
If you have 1234567 in your display field, it looks like
this in HEX "F1F2F3F4F5F6F7". In comp-3/packed decimal it
looks like this in HEX "1234567C", where the C is the sign
(C is positive, D is negative, and F is unsigned).
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / naagju
Packed decimal is nothing but COMP3..
which occupies half byte for a character n half byte for sign.
Ex.01 name pic x(10) value 'sivaNaagju'
which occupies only 5 bytes.
| Is This Answer Correct ? | 2 Yes | 5 No |
have in 100 records in a file i want to read first 3 records and skip next 3 records and agan i want to read 3 records and again i want to skip 3 records...
2 Answers ITC Indian Tobacco Company, PNP, TCS,
How to Write the RESTART Logic Using COBOL?
4 Answers GalaxE, L&T, Syntel, TCS,
What are the different open modes available in cobol?
what is the difference between start and startbr?
can you declare redefine in level 01?
How To Separate The Numerics From An Alphanumric Data Item Which Contains Both Alphabates And Numerics ?
What is XDC ?
What is the usage of comp fields in cobol?
what is the coding difference between COBOL and CICS.
What is the Purpose of POINTER Phrase in STRING command in COBOL?
diffrence between renames and redifnes with examples
I have program P1 which calls file F1 which has 100 records and following structure 001 .................. 002 .................. 003 .................. 098 .................... 099 ................... 100 .................... Now I want to read these files and write these records in file F2 in following manner. 001 ...... 051 ..... 002 ...... 052 ..... 003 ...... 053 ..... .......... ....... .......... ....... .......... ....... 048 ........ 098 ...... 049 .......... 099 ....... 050 .... 100 ......
COBOL 
