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
1.Is it possible to move the data from 99.99 to 99v99? 2.What is the CICS-vsam Compilation process? 3.In My GDG 5 generation will be there GDG3 got an abend what will happen? 4.In my GDG first generation is +1 And I want to add the new generation what will happen previous generation? 5.How can you give the PIC clause below conditions A). s9 (reddy), B). s9 (5) occurs 5 times? 6.How override the proc from a particular step? and what is symbolic and override Procs?
what is amode(24), amode(31), rmode(24) and rmode(any)?
how do you reference the variable unblock file formats from cobol programs
What is the use of intialize verb?
If you are current on the owner of a set, what is the difference between an obtain next and obtain first? Actually in which topic will we use dis???Plz explain it clearly
how do you define single dimensional array and multidimensional array in your cobol?
How do you reference the fixed block file formats from cobol programs
What is inspect in cobol ?
In COBOL, what is the different between index and subscript?
How many sections are there in data division in COBOL?
A table has two indexes defined. Which one will be used by the SEARCH?
Write the code to count the sum of n natural numbers.
How do define dynamic array in cobol.
how to refer the data field?
IF I mention stop run in CICS what happens?