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

what is call by value and call by reference ?

3 Answers   Infosys, ITC Indian Tobacco Company,

If we put three reads in COBOL in the same para one after the other, to read a PS file,will it read the same record thrice or it will read three records sequentially? For example : Input File 01 02 03 Para 900 Read infile Display Infile rec Read infile Display infile rec Read infile Display infile rec. What will be the output?

2 Answers  

i was faced one question- i have value -00001234.56 Suppress the zeroes and the output should be -1234.56 But Not - 1234.56 spaces should not be available after suppressing the zeroes. logic in jcl and cobol?

0 Answers  

what is difference between cobol and cobol/400

1 Answers   HCL,

How is sign stored in Packed Decimal fields and Zoned Decimal fields?

6 Answers   ABC, HCL, TCS,

how would find total records in files using seqientional

1 Answers   HSBC,

In my table having 3000 Records. How can I delete the 500th row? (we don't know what is data inside the table)

3 Answers   Keane India Ltd,

)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?

0 Answers   IBM,

how to check whether the open command of a sequential file is successful? or not?

2 Answers   CSC, IBM,

s9(18) comp-3:: What is the size of memory it takes internally?

4 Answers  

how to change picture class of copy book variable inside program?

2 Answers  

Using string statement.Is coding three destination string from one source string possible in one code?or three codes for every destination string of one source string.?thank you

1 Answers   BPL,