Hi All,
how is sign is stored in S9(17) comp-3 variable.
Answer with an Example will be of great help.
Answers were Sorted based on User's Feedback
Answer / sudhakar
In comp-3 format sign is stoted in the last nibble along
with data for e.g +1234 last digit is +4 it comes as D
| Is This Answer Correct ? | 12 Yes | 4 No |
Answer / blessy
it is stored as hex value in the last nibble(4 bits) of the
storage. for eg: if the number is +100, it stores hex 0C in
the last byte. as 2D if the number is -102 .
| Is This Answer Correct ? | 8 Yes | 0 No |
Answer / srinivas adilapuram
The sign is stored seperately as rightmost half-a-byte
regardless of whether 'S' is specified in the PIC clause or not.
Thanks
Srinivas
| Is This Answer Correct ? | 6 Yes | 0 No |
Answer / 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
| Is This Answer Correct ? | 3 Yes | 1 No |
How to read records from flat file in reverse order through COBOL program?
14 Answers Accenture, Broadridge, IBM, MAT, Polaris, SPIC, Syntel, TCS, Wipro,
What is a scope terminator give example?
Sending data is aplhabetic size 7 (value 3000), I wantated this value to be stored in database, which is defined as s9(7)v9(2)comp-3.
can internal sort be applied to sort ksds files?
what is search and searchall?what is the diffrence between them?give an best example?
What is the figurative constant in cobol?
A s9(4). B v9(4) value 0.21 can i move this?
what are the isolation levels and where we use it in the db2 program
consider the fallowing 77 stat pic 9. 88 male value 1,2,3. 88 female value 4 through7. what will be the value of stat a) set male to true. b) set female to true.
what is jcl approach for programming?
What is comp-1 and comp-2?
Suppose i have a Cobol field of 10 byte. it contains a decimal sign.How to know where is the point location?