Answer Posted / supreethi

Code:
//*******************************************************
//STEP001 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD *
AAAAAAAAA
VVVVVVVVV
GGGGGGGG
AAAAAAAAA
HHHHHHHHH
AAAAAAAAA
GGGGGGGG
VVVVVVVVV
/*
//TMP1 DD DSN=&&TEMP1,DISP=(MOD,PASS),SPACE=(TRK,(5,5)),UNIT=SYSDA
//OCCUR1 DD SYSOUT=*
//OCCUR2 DD SYSOUT=*
//OCCUR3 DD SYSOUT=*
//TOOLIN DD *
OCCUR FROM(IN1) LIST(OCCUR1) EQUAL(1)-
ON(1,9,CH) ON(VALCNT,N04)
OCCUR FROM(IN1) LIST(OCCUR2) EQUAL(2)-
ON(1,9,CH) ON(VALCNT,N04)
OCCUR FROM(IN1) LIST(OCCUR3) EQUAL(3)-
ON(1,9,CH) ON(VALCNT,N04)
/*


OCCUR1 contains:

Code:
---+----1----+----2----+
(1,9,CH) VALUE COUNT
HHHHHHHHH 1

OCCUR2 contains:

Code:
---+----1----+----2----+
(1,9,CH) VALUE COUNT
GGGGGGGG 2
VVVVVVVVV 2

OCCUR3 conatains:

Code:
---+----1----+----2----+
(1,9,CH) VALUE COUNT
AAAAAAAAA 3

In COBOL, what is the different between index and subscript?

1282

---

Explain what you understand by passing by value.

1202

---

What is link edit in cobol?

1269

---

What is the difference between Global and External Variables?

1440

---

What is redefines clause in COBOL?

1351

---

How do you reference the following file formats from cobol programs?

1206

---

How do get the result of your program directly on your pc?

2396

---

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

1147

---

how we sort two input files based on a common column and giving one o/p file please send me the coding logic?

2189

---

What is the problem of ordered sequential files access?

1207

---

What rules are to be followed while using the corresponding options?

1125

---

if we display var1 then what will b displayed in below condition. 77 var1 pic s9(2) value -10. 77 var1 pic s9(2) value -11. " " " -12. " " " -13. -14 ... ... -19.

6669

---

What is perform what is varying?

1224

---

What is cobol?

1291

---

Describe the cobol database components?

1219

---