Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...

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 / madeshh

1st of all it will give an error because of pic clause with
group item in occurs.
a.if we remove pic clause from there it will take 66 bytes.
01 rec1.
02 a pic x(6) == 6
02 b redefines a. == 0
03 c occus 6 times pic 9. == 0
02 d occurs 6 times.
03 e pic x(5) ==30
03 f pic 999. ==24
------
60
b.if we remove e,f
01 rec1.
02 a pic x(6) ==6
02 b redefines a. ==0
03 c occus 6 times pic 9. ==0
02 d occurs 6 times pic 9. ==6
----
12

Is This Answer Correct ?    0 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What is the difference between PIC 9.99 and PIC9v99?

1296


What happens when we move a comp-3 field to an edited (say z (9). Zz-)?

1346


How did the release of cobol/370 version 1.3 improve the performance of release 1.1?

1039


What is the utilization of copybook in cobol?

1136


how can we apply for HSBC exam(Mainframe) in India??? i went to their site and was told to submit my CV ,. etc..( totally confusing...)

2352


What are various search techniques in cobol? Explain.

1035


how do you reference the printer file formats from cobol programs

1165


What are the rules of the move verb?

1215


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

3197


how do you reference the variable block file formats from cobol programs

1199


how to refer the data field?

2226


what happens if parmparameter passes zero bytes to the program

2095


Write the code to count the sum of n natural numbers.

1165


Which is not true about evaluate statement

2408


Explain sorting techniques in cobol program? Provide the sort file definition, the sort statement, its syntax and meaning

1054