Determine the total no of bytes in the following.
01 rec1.
02 a pic x(6)
02 b redefines a.
03 c occus 6 times pic 9.
02 d occurs 6 times pic 9.
03 e pic x(5)
03 f pic 999.
Answer Posted / jayaprabhu
01 rec1.
02 a pic x(6)-------------------- 6 bytes
02 b redefines a.
03 c occurs 6 times pic 9.------ 6*1(pic 9 ie why we
have mul with 1 )------------------- 6 bytes
02 d occurs 6 times pic 9.------- (6*1) 6 bytes
03 e pic x(05)------------------- 5*6 =30 bytes
03 f pic 999. --------------------- 3*6=18
6
6
6
30
18
66
if you remove e f
18
| Is This Answer Correct ? | 0 Yes | 1 No |
Post New Answer View All Answers
Define static linking and dynamic linking.
Why occurs cannot be used in 01 level in COBOL?
1.give the details about WHEN OTHER. 2. how many form are available in evaluate.
How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?
IF I mention stop run in CICS what happens?
What is the difference between structured cobol programming and object alternativelyiented cobol programming?
What the difference is between continue and next sentence?
What is amode(31)
Why did you choose to work with ibm mainframe cobol programming?
i have 10 names in an array and my name is one of them also array is not in sorted order i need to display my name using index how will i do this
How to traceback if I am getting SOC7 or SOC4 abend? List down the steps
Explain how you can characterize tables in cobol?
How to read the 2nd last record of a VSAM file? (The file size is huge and we don't know the key)
Mention the guidelines to write a structured cobol program?
What is the usage of comp fields in cobol?