01 a pic s9(5) value '-12345' how it will be stored
Answers were Sorted based on User's Feedback
Answer / nagaraj ramammorthy
here the usage clause is DISPLAY which is default. so each
digit takes one byte to store and the sign is punched with
the last digit..
so it will be stored as 1234N.
note:
numbers punched with '+' sign
0 - {
1 - A
2 - B
3 - C
4 - D
5 - E
6 - F
7 - G
8 - H
9 - I
numbers punched with '-' sign
0 - }
1 - J
2 - K
3 - L
4 - M
5 - N
6 - O
7 - P
8 - Q
9 - R
hope this is clear
| Is This Answer Correct ? | 6 Yes | 1 No |
Answer / shekhar
as from -1 to -9 uses from j to r....
and signed trailing is default...
so the ans is 1234n....
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / sachin
I think from -1 to -9 uses the letter
J to onward
and for +1 to +9
uses the A to H
| Is This Answer Correct ? | 3 Yes | 1 No |
01 a pic s9(5) value '-12345' how it will be stored
It will be stored :
1234u
In data files Negative Values are Stored as per the
following manner
0-p 1-q 2-r 3-s 4-t 5-u 6-v 7-w 8-x 9-y
The Last Digit of the No. is stored like this in the
following example.
Example: 01 a pic s9(4)v99
move -3456.23 to a.
display a.
Output is : 34562s
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / dave
I have verified the Nagaraj Ramammorthy's answer this seems
to be correct...
| Is This Answer Correct ? | 0 Yes | 0 No |
What is the difference between SEARCH and SEARCH ALL? What is more efficient?
Explain about Redefines cluse?
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
What are the cobol coding sheets?
what is a zoned decimal data type and how it will be stored?
what is rediffine clause?in what situation it can use?give me real time example?
maximum of how many screens we can open in emulator
how to check whether the open command of a sequential file is successful? or not?
If there are two files one with 100 records and other with 101 records. we have to find out the one record that is the odd man out . What are the steps to do it
What is the default value of DISP parameter?
How do u find the programs calling the given module, without having doing 3.13 on loadlib/source library?
How many sections are there in data division in COBOL?