Answer / vivek c

Use ICETOOL utility as below.

//TOOLIN DD *
COPY FROM(IN1) USING(CTL1)
/*
//CTL1CNTL DD *
OUTFIL FNAMES=OUT,REMOVECC,NODETAIL,
TRAILER1=('FILE1',5X,COUNT=(M10,LENGTH=5))
/*

Answer / varsha

//SYSIN DD *
INREC FIELDS=(1,4,C'00001')
SORT FIELDS=(01,04,CH,A)
SUM FIELDS=(05,05,ZD,A)
OUTREC FIELDS=(01,04,05,05)
/*
Briefly, I'm adding a numeric 00001 to each record and
sorting them on the numeric field and summing all such
records, which will give you the desired output.

Answer / roger caviness

fileaid

File status must be checked both while opening and reading the file or only while reading the file?

2 Answers  

---

I have a sequential file of 100 records. How do I load the records into a two dimensional array ?

3 Answers   IBM, Xansa,

---

how many subpgms we can use in a main pgm ? how do u link sub pgm to main pgm ? how can i use the parameters declared in main pgm to sub pgm ?

2 Answers   TCS,

---

Hi All, Can anyone tell me how we can MOVE value of a X(19) variable to a S9(17) COMP-3 variable? Answer with an Example will be of great help.

6 Answers   EDS,

---

how do you define single dimensional array and multidimensional array in your cobol?

0 Answers  

---

how to code in cobol while using variable block file?

1 Answers  

---

I want to declare a field with data type Double in my COBOL program. how shall i do that ?

5 Answers  

---

01 var1 pic x(10) 01 var2 redefines var1 pic 9(10). then in procedure division move 'abcde' to var1 then waht is the value of var1 and var2

9 Answers   HSBC,

---

i am a btech cs 2009 passout. i am opting for mainframe course. is it good to do this course? pls. anyone suggest me

4 Answers  

---

What is the meaning of 'Eject' verb in cobol?

2 Answers   TCS, Wipro,

---

What is the difference between PIC 9.99 and 9v99 in COBOL?

0 Answers   SwanSoft Technologies,

---

) How do u handle errors in BMS macro?

0 Answers   IBM,

---