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 / vineet pasricha

nice ques.

remove pic clause from d
it will take 54 bytes

Is This Answer Correct ?    0 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

how do you define single dimensional array and multidimensional array in your cobol?

667


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

992


For rewrite, why is it mandatory that file needs to be opened?

620


Can a Search can be done on a table with or without Index?

800


I have to write to a outfile where the number of records in that file should be the header of that file using IMS.. can anyone help me in this issue

1929






What is length is cobol?

645


Write some characteristics of cobol as means of business language.

614


What are literals?

626


How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that

2728


If you are current on the owner of a set, what is the difference between obtain next and obtain first?

639


how do you reference the ksds vsam file formats from cobol programs

662


What are declaratives and what are their uses in cobol?

706


How to get the last record in vsam file in cluster? And how can you get the ksds file records into cobol program?

704


What kind of error is trapped by on size error option?

738


how to move the records from file to array table. give with code example

2216