Answer / snehatechm

for using SEARCH ALL your table must be defined with KEY IS
along with the OCCURS caluse and INDEXED BY.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 XXX-TABLE.
03 XXX-TEXT PIC X OCCURS 10 TIMES
ASCENDING KEY IS XXX-TEXT
INDEXED BY AXIDX.

In the above case my table is ordered in ascending sequence.
i can order my table in descending sequence also.

01 SRCHXXX PIC X.
01 XXXPOS PIC 99.

PROCEDURE DIVISION.
Begin.
ACCEPT SRCHXXX
SET AXIDX TO 1
SEARCH ALL XXX-TEXT
AT END DISPLAY "NO LETTER FOUND"
WHEN XXX-TEXT(AXIDX) = SRCHXXX
SET XXXPOS TO AXIDX
DISPLAY SRCHXX " IS IN " XXXPOS
END-SEARCH
STOP RUN.

If data input in non ascending order, the ASC KEY will not
automatically sort the data

What is comp-1 and comp-2?

0 Answers  

---

What COBOL construct is the COBOL II EVALUATE meant to replace?

1 Answers  

---

file status 00 is checked after opening the file or reading the file

4 Answers   John Deere,

---

Why occurs can not be used in 01 level ?

2 Answers   TCS,

---

Hi Guys, I have faced one interview question if I have requirement to add 5 new columns to existing table what are prerequisite do i need to take.

1 Answers  

---

Write a program that uses move corresponding.

0 Answers  

---

Explain call by context by comparing it to other calls.

1 Answers  

---

how many bytes do SPPPP999 will store?

18 Answers  

---

How can we find out wether to declare the data items like Integer, Char,Comp? If comp types how can we decide wether it is Comp and Comp3.How it is? Please Explain... Cheers.

1 Answers   Syntel,

---

01 b pic +9(4) How many bytes it will take for storage???

2 Answers  

---

i Want All cobol ERROR codes?

4 Answers   HCL, IBM,

---

WHY LRECL NEEDS TO BE 4 EXTRA THEN THE COBOL FILE LENGTH & WHAT IT CONTAIN IN THAT LENGTH

2 Answers   Cap Gemini,

---