Answer / kk

Hi,

just use count variable in working storage.then when read
the file add 1 to count.after that u give if statement if
count = 9 display rec.

Answer / ramesh

IDENTIFICATION DIVISION.
PROGRAM-ID. RAMESH.
ENVIRONMANT DIVISION.
DATA DIVISION.
FILE-SECTION.
FD INFILE.
01 IN-REC
05 NAME
05 AGE
WORKING-STORAGE SECTION.
01 WS-COUNT PIC 99.
PROCEDURE DIVISION.
ACC-PARA.
accept ws-num
move 0 to ws-count
ADD-PARA.
read infile
add 1 to ws-count.
perform add-para until ws-count = ws-num

display in-rec.

Note: as per ur requirementprovide ws-num=9
COMPILE IT .PASS WS-NUM THRU RUN JCL SYSIN AS 9 .You will
get the 9th record.

Answer / shan

If you are sure that ur file will always have 10 records,
then move high-values to record format and read prior twice.

what is difference between the sysabend and userabend?

2 Answers  

---

what are the isolation levels and where we use it in the db2 program

3 Answers   TCS,

---

what is the difference between Plan & package

3 Answers   IBM,

---

Write the syntax of a two dimensional array?

8 Answers   Honeywell, Xansa,

---

in cobol perform stmt whether it first checks the condition or not

9 Answers  

---

Hi, My interviewer ask A calls B and C calls B, a and b are static c and b are dynamic.what happens if they compile and execute at same time.

3 Answers   iGate,

---

how do you reference the ksds vsam file formats from cobol programs

0 Answers  

---

diffrence between renames and redifnes with examples

3 Answers   IBM,

---

I HAVE FOLLOWING DECLARATION. 02. A PIC X(10) VALUE 'XXXXXXXXXX'. 02. B REDEFINES A. 05. C PIC X(3). 05. D PIC X(3). 05. E PIC 9(3). IN MY PROG, I HAVE MOVE 1 TO E. DISPLAY A. WHAT WILL BE DISPLAYED AS A RESULT OF THIS? PLEASE EXPLAIN THE ANSWER. THANKS.

7 Answers   Amdocs,

---

IF I mention stop run in CICS what happens?

0 Answers   IBM,

---

Name the sections present in data division.

0 Answers  

---

if a=b how the flow will complete??? perform test through test-exit. perform activa through activa-exit. test. if a=b then next sentence else move a to c. test-exit. exit. activa. -- -- activa-exit. exit.

1 Answers   IBM,

---