Answer / guest

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

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

Answer / sri

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

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

Answer / imran ahmad

FIRST YOU HAVE TO REMOVE PIC CLAUSE FROM GROUP ITEM D

ANSWER IS 56

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

Answer / vineet pasricha

nice ques.

remove pic clause from d
it will take 54 bytes

Answer / ram.g

54 is the right answer!

Answer / v@m$i

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

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

In COBOL programming, what is PERFORM? What is VARYING?

0 Answers   CDC,

What is perform what is varying?

0 Answers  

How to remove the spaces at end of each record in the output file Via COBOL program? note: The file has a VB length

3 Answers   TCS,

DATAONLY, MAPONLY functionality?

1 Answers   IBM,

Explain complete concept of table handling in COBOL with an example?

2 Answers   IBM, TCS, Wipro,

How to delete a front spaces in a data-name/variable in cobol Example:- 01 data-name-1 PIC x(20) value " cobol language". 01 data-name-2 PIC x(20). MOVE data-name-1 to data-name-2. would like the value of data-name-2 is "cobol language".

3 Answers  

WE HAVE 5 DIFFERENT RECORDING MODE IN COBOL.FIXED, FIXEDBLOCK, VARIABLE, VARIABLEBLOCK AND UNDEFINED. WHAT IS THE DIFFERENCE AMONG ALL AND WHICH TYPE OF FORMAT SHOULD BE USED WHEN

3 Answers   Infosys,

How to concatenation one or more string?

4 Answers   Temenos,

how we rectify soc4 and soc7 error in project(need real time answer)? please reply

3 Answers   HCL, Wipro,

How to find out the closest prime number of an input number? I believe it has something to do with SEARCH and COBOL Linear Array.

0 Answers   Infosys,

How to remove the spaces at end of each record in the output file Via COBOL program? note: The file has a VB length

2 Answers   IBM, Wipro,

What is COMP SYNC?

3 Answers