What is the difference between comp and comp-3 usage?
Explain other COBOL usage?s.
Answers were Sorted based on User's Feedback
Answer / elite group
Comp -- binary form
Comp-3 Packed Decimal
Usages are:
Display: Default it occupies the number of bytes is equal
to the size of the data-item
Comp -- Binary Number of bytes is equal to the size of the
data-item
Comp-1 -- 4-Bytes no pic clause is required
Comp-2 -- 8-byted no pic caluse is required, Double
precision
Comp-3 -- Packed Decimal Number of bytes is
(n+1)/2 -- if n is odd
(n/2)+1 -- if n is even
Comp-4 --- Same as Comp
| Is This Answer Correct ? | 57 Yes | 14 No |
Answer / cauvitha
comp - used for binary representation. To make the calculations faster. it can have S and 9.
Memory usage is
s9(1)-s9(4) - 2bytes
s9(5)-s9(9) - 4bytes
s9(10)-s9(18) - 8bytes
===
comp-3 - used to store packed decimal values. Stores comparitively more values than comp. It can have S, 9, V.
Memory usage is
n/2 + 1 (Even)
n+1/2 (odd)
| Is This Answer Correct ? | 24 Yes | 4 No |
Answer / sultana
Usage Clause :COMP
Binary representation of data item.
PIC clause can contain S and 9 only.
S9(01) – S9(04) Half word.
S9(05) – S9(09) Full word.
S9(10) - S9(18) Double word.
| Is This Answer Correct ? | 4 Yes | 2 No |
I need to compare 3 variables(dates) and do some processing based on the earliest date. There could be more then 1 date record in any of the 3 fields. What is the best way to code this?
What is file status 92?
What are the situations u have used in ur project for Subcript and Index ? 1.if u use Subscript why not Index,why u choose Subscript only? 2.if u use Index why not Subscript,what abt Displacement?
file status 00 is checked after opening the file or reading the file
What will happen if we move SPACES to numeric field and ZEROES to alphabetic field?
consider the following piece of code 01 GROUP-ITEM 05 AMOUNT-1 PIC 99V9 USAGE COMP VALUE 50 05 AMOUNT-2 PIC 9(4)V99 USAGE COMP MOVE ZERO TO GROUP-ITEM ADD 50 TO AMOUNT-1 what will be the content of AMOUNT-1? a.50 b.100 c.0 d.unpredictable
what is subscript in cobol?give realtime example?
There is a production file which has millions of records in it.The program that uses it ends up with an SOC7 abend.It is sure that the abend is due to some invalid data in the file.Is there any way to debugg the SOC7 abend with out giving displays? I need the record which is cause for the abend.
How can I tell if a module is being called DYNAMICALLY or STATICALLY?
can we write paragraph in area B .....
Why do we code s9 (4) comp. Inspite of knowing comp-3 will occupy less space?
if we have " ibm mainframe ",in that how to remove first and last leading space eg:"ibm mainframe" like that the answer we need