How many bytes will be allocated for the following record
description
entries?
01 REC-A.
05 A PIC S9(4).
05 B PIC XXXBXXX.
05 C PIC ____9.99.
05 D PIC S9(5) COMP-3.
05 E PIC 9(3) COMP.
Answers were Sorted based on User's Feedback
Answer / suresh kumar
total 19 bytes, For furtyher expansion you can see deepaks
answer.
| Is This Answer Correct ? | 1 Yes | 6 No |
Answer / asif
05 A PIC S9(4). = 4
05 B PIC XXXBXXX. = 7
05 C PIC ----9.99. = 8
05 D PIC S9(5) COMP-3. = 3
05 E PIC 9(3) COMP. = 2
LENGTH OF REC-A = 24 BYTES.
| Is This Answer Correct ? | 0 Yes | 5 No |
Answer / guest
Folloiwng will be space allocation:
A - 4
B - 7
C - 8
D - 3
E - 2
Total 24 bytes.
| Is This Answer Correct ? | 2 Yes | 8 No |
Answer / guest
correct answer is 25 bytes.. since s9(5) comp-3 will take 4
bytes.. not 3 bytes
A-4
B-7
C-8
D-4
E-2
| Is This Answer Correct ? | 0 Yes | 11 No |
Can anyone tell me how to handle the array beyond the limit. If we have an array or a table which can handle 5000 records but now we have to compensate 20000 records with the same array? how to handle the situation.
Consider the following: 77 W-NUM PIC 9 VALUE 0 ------ MOVE 1 TO W-NUM PERFORM PARA-X UNTIL W-NUM > 9. ------ PARA-X ADD 1 TO W-NUM How many times PARA-X is executed ?
i want a program using by if, evaluate , string, unstring, perform, occurs?
How can you submit a job from COBOL programs?
what is rediffine clause?in what situation it can use?give me real time example?
is it mandatory to give data division before procedure division ? wht happens if i give procedure division first thn data division ? reply soon
What happens when we move a comp-3 field to an edited (say z (9). Zz-)?
What is the utilization of copybook in cobol? Could we utilize a similar copybook?
Can anyone please give the example of Inline Perform.
I try to use some column names in my cobol progorm but these column not in db2 table ..when do i get error ..while bind time or runtime?
What R 2 of the common forms of the EVALUATE STATEMENT ?
which of the following can be used as a check protection symbol a.Z b.S c.* d.+