Answer / jai

01 rec1.
02 a pic x(6) == 6
02 b redefines a. == 6
03 c occus 6 times pic 9. == 6
02 d occurs 6 times.
03 e pic x(5) ==30
03 f pic 999. ==18
------
66

Answer / jayaprabhu

01 rec1.

02 a pic x(6)-------------------- 6 bytes
02 b redefines a.
03 c occurs 6 times pic 9.------ 6*1(pic 9 ie why we
have mul with 1 )------------------- 6 bytes
02 d occurs 6 times pic 9.------- (6*1) 6 bytes
03 e pic x(05)------------------- 5*6 =30 bytes
03 f pic 999. --------------------- 3*6=18

6
6
6
30
18

66

if you remove e f

18

Can we move X(9) to 9(9). If yes what are the ways for doing this?

3 Answers  

---

What are the different open modes available in cobol?

0 Answers  

---

what is the difference between COBOL2 AND COBOL390?

0 Answers   L&T,

---

can we use 77 level no for Redefines?if we use give an example?

3 Answers   Mphasis,

---

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,

---

What are the different ways to run a COBOL DB2 program using JCL?

2 Answers  

---

what if any ,is the syntex error in the following piece of code 01 B PIC A(7) 02 C PIC 9(4) ........ IF(B NUMERIC) ADD 10 TO C a.the condition in the if statement is wrong b.noting is wrong c.because C is initialised.ADD 10 TO C is wrong d.both B and C shoud have same size.

5 Answers   TCS,

---

What will happen if you code GO BACK instead of STOP RUN in a stand-alone COBOL program i.e. a program which is not calling any other program ?

3 Answers  

---

Explain the configuration section of a cobol program with examples of syntax.

0 Answers  

---

1)what is the maximum limit for occurs? Eg: 01 A PIC X(10) OCCURS N TIME. What is the max value for N?

11 Answers   Wipro,

---

wht is the use of evalute verb ? how do u declare recfm in cobol and jcl ?

2 Answers   EDS,

---

How does IDMS communicate with CICS?

1 Answers   Covansys, Satyam,

---