Answer Posted / viswanathan

Hi,

suppose s9(3)v9(4) comp 3 is the data type then
3+4 = 7 half bytes will be used for data.
the last half byte will be used for sign

in this example number of digits is odd(7).
so total size occupied will be 7/2 + 1/2 =4 bytes

first seven half bytes from left will have data part. so the
right most half byte will have sign value.
if this right most half byte value is D (1101) then it is -ve
if it is C (1100) or F (1111) then it is considered as +ve.

example 2
S9(4)v(2) comp 3

here number of digits is even (4+2=6),so number of bytes
used will be 6/2 +1 =4 bytes.
in this example first half byte will be having 0000 value
this will be ignored while reading from data. the next six
half bytes will be having the six digits of data. and then
the last half byte will be having the sign value as said in
the example 1.

example 3
s9(4) comp3

4-even
first half byte no data(0000). next 4 half bytes data. the
last half byte will have sign value

Thanks
Viswanathan

I have to write to a outfile where the number of records in that file should be the header of that file using IMS.. can anyone help me in this issue

2487

---

What is the difference between external and global variables in COBOL?

1362

---

How you can characterize tables in cobol?

1150

---

how do you reference the printer file formats from cobol programs

1143

---

If you are current on the owner of a set, what is the difference between an obtain next and obtain first? Actually in which topic will we use dis???Plz explain it clearly

3093

---

How do you define a variable of comp-1 and comp-2?

1138

---

What is the usage of comp fields in cobol?

1132

---

how to refer the data field?

2211

---

Difference between array and sub-script ?

1605

---

Define static linking and dynamic linking.

1113

---

What is the difference between Structured COBOL Programming and Object Oriented COBOL programming?

1057

---

How to print 10 to 1 if the input have only 10 digit number?

1220

---

how do you reference the variable unblock file formats from cobol programs

1281

---

What is the default value(s) for an initialize? What keyword will allow for an override of the default?

1063

---

What is a report item?

1093

---