Interested to Buy Any Domain ? << Click Here >> for more details...
01 a pic s9(5) value '-12345' how it will be stored
- 7 Answers
- 15763 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 |
What is Alternate Index ? How is it different from regular index ?
Why occurs cannot be used in 01 level in COBOL?
Identify the invalid dataname from the following: (A) savings-account (B) annual-allocation-for-overhead (C) samount250 (D) 12demand
How to read records which is in sequential file in reverse order ? Exp. 1 2 3 4 5 . i want 5 4 3 2 1?please clear my doubt any one
What is a report item?
01 NAME1 PIC X(13) VALUE "COBOL PROGRAMMING". 01 NAME2 PIC X(13). now I want to display the value of NAME1 in reverse order i.e value should be displayed as "GNIMMARGORP LOBOC" HOW can I do that ??? please let me know if any one knows it.
how can u find out just by seeing wheater it is main program or sub program ? any two ways to identify reply soon ?
How can I find the maximum value of a field in a file while reading the file dynamically? without using sort function. Suppose i have a file with fields Timestamp, description, teamname, teamnumber.. i have read the file till end and find the maximun value of timestamp which is not in sorted order.. can we use function max(timestamp)?
consider the following progrm statements MOVE 0 TO SW.NO.OF.REC PERFORM PRI-OUT UNTIL SW=1 DISPALY NO.OF.REC STOP RUN PRE-OUT READ IN-FILE AT END MOVE 1 TO SW WRITE OUO-REC FROM IN-REC ADD 1 TO NO.OF REC if the IN-FILE contains 1000 records what value will be displayedafter the PERFORM is over?assume that N0.OF.REC has PIC 9(4) a.1000 b.1001 c.1 d.none of the above since there is a syntex error
how can u redefine picx(10) with pic 9(6).
What are subroutines ? and how do we pass data to the sub routines?
What is length is cobol?
COBOL 
