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 in reverse order in flat file? I know we can do it by reading all records into an array.... Then read records in reverse order by using subscript or index but can any body give me the exact code.
maximum of how many screens we can open in emulator
I have the requirement to compare the two files and pick up the matching records. File 1. file2 23 32 32 13 34 15 35 36 36 35 43 Get the matching records from this 2 files to out file. how you will do this in cobol program?
15 Answers ADP, Broadridge, CTS, HSBC, L&T, RBS, TCS,
what is difference between cobol and cobol/400
how to resolve the file status 47.......
How To Separate The Numerics From An Alphanumric Data Item Which Contains Both Alphabates And Numerics ?
how many bytes does s9(7)COMP-3 field occupies?
what is s013u000 for?
how to display the dataset information?
how to pass 100 to s9(4) how r they inserted ?
can we declare occurs in 01 level?
What are VS COBOL 11 special features?