Interested to Buy Any Domain ? << Click Here >> for more details...
01 a pic s9(5) value '-12345' how it will be stored
- 7 Answers
- 15359 Views
- ACS, I also Faced
- E-Mail Answers
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 |
How can we increase the size of an existing PDS to include more no. of modules.
What is an in line perform? When would you use it? Anything else you wish to say about it.
What is LENGTH in COBOL II?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
when SE37 SB37 and sd37 occurs how to increase the volume , primary quantity and secondary quantity?
How to delete the records of a dataset through cobol programme?We should not use jcl utilitities like IDCAMS.
What is amode(31)
How can I tell if a module is being called DYNAMICALLY or STATICALLY?
Can the OCCURS clause be at the 01 level?
how to run sub programs using static and dynamic call ...
what is the difference between perform varying and perform until
can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move 'xy' to b. display a,b.
COBOL 
