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 |
01 a pic x(4) value 'abcd' 01 b pic 9(3) can we move from a to b.if possible what would be stored in b.
What is the figurative constant in cobol?
how we separate the cobol cics statements from cobol&cics programming?
How do pass the values to the parameters in cobol
The hierarchy of the execution of logical operators is (a) NOT AND OR (b) AND OR NOT (c) OR AND NOT (d) OR NOT AND
10 Answers Huawei, IBM, TCS,
have in 100 records in a file i want to read first 3 records and skip next 3 records and agan i want to read 3 records and again i want to skip 3 records...
2 Answers ITC Indian Tobacco Company, PNP, TCS,
Is it possible to mutliply a comp variable with an comp-3 variable. Will there be any error if i do it?
what is level 66 means??
How to Pass table from a cobol program to another cobol program and how to use that table in called program
Whats the use of Examine command? can someone help me?
How to covert given string into ASCII value in COBOL/MF COBOL
what is Reentrancy and Quasi-reentrancy?