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.

Answers were Sorted based on User's Feedback



Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefi..

Answer / guest

It should be 54. (ie 6 + 8*6)

Is This Answer Correct ?    8 Yes 0 No

Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefi..

Answer / guest

01 rec1.
02 a pic x(6)
02 b redefines a.
03 c occus 6 times pic 9.----------- 6 bytes
02 d occurs 6 times.
03 e pic x(5)-----------------------30 bytes
03 f pic 999.-----------------------18 bytes
________
54 bytes
scenario 2:If we remove e and f

01 rec1.
02 a pic x(6)-------------------------------6 bytes
02 b redefines a.
03 c occus 6 times pic 9.
02 d occurs 6 times pic 9.-------------------6 bytes
___________
12 bytes

Is This Answer Correct ?    5 Yes 0 No

Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefi..

Answer / sri

It has to be 54 (6 + (8*6)) if we remove PIC clause from d.

Is This Answer Correct ?    2 Yes 0 No

Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefi..

Answer / milan kumar

a PIC X(6)-------------6B
b REDEFINES A ---------0B
IF WE REMOVE PIC CLUSE
D=( E PIC X(5)+F PIC 999)
D=(8B OCCURS 6 TIMES)
D----------------------48B
----------
TOTAL OF 54B

Is This Answer Correct ?    1 Yes 0 No

Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefi..

Answer / imran ahmad

FIRST YOU HAVE TO REMOVE PIC CLAUSE FROM GROUP ITEM D

ANSWER IS 56

Is This Answer Correct ?    0 Yes 0 No

Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefi..

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

Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefi..

Answer / vineet pasricha

nice ques.

remove pic clause from d
it will take 54 bytes

Is This Answer Correct ?    0 Yes 0 No

Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefi..

Answer / ram.g

54 is the right answer!

Is This Answer Correct ?    0 Yes 0 No

Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefi..

Answer / v@m$i

first u r syntax is wrong.
6
6
6
6
30
18
---
72

Is This Answer Correct ?    0 Yes 0 No

Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefi..

Answer / madesh

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. == 6
03 c occus 6 times pic 9. == 0
02 d occurs 6 times.
03 e pic x(5) ==30
03 f pic 999. ==24
------
66
b.if we remove e,f
01 rec1.
02 a pic x(6) ==6
02 b redefines a. ==6
03 c occus 6 times pic 9. ==0
02 d occurs 6 times pic 9. ==6
----
18

Is This Answer Correct ?    1 Yes 2 No

Post New Answer

More COBOL Interview Questions

Under which scenario you would go for a static call as opposed to dynamic call?

5 Answers   TCS,


Hi, My interviewer ask A calls B and C calls B, a and b are static c and b are dynamic.what happens if they compile and execute at same time.

3 Answers   iGate,


I had 100 records and i want to execute last three records by using cobol programming?what will be coding?

4 Answers   IBM,


what is rediffine clause?in what situation it can use?give me real time example?

1 Answers   IBM,


What is Control Break processing ?

1 Answers   iGate,


In a COBOL II PERFORM statement, when is the conditional tested, before or after the perform execution?

3 Answers  


what is MSGLEVEL?

1 Answers   IBM,


what is internal sort and external sort ? which is preferable ?

2 Answers   TCS,


if you give cylinder(1,1)how many cylinders it will be allocate?

3 Answers   Hewitt,


What is the difference between a DYNAMIC and STATIC call in COBOL?

2 Answers  


Name the divisions in a COBOL program ?

7 Answers  


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

0 Answers   ADP, Syntel,


Categories