Answer / ravi krian j

using reference modification move & isnumeric


PERFORM VARYING I FROM 1 BY 1 UNTIL I>10

IF A(I:1) IS NUMERIC
MOVE A(I:1) TO B(I:1)
END-IF
END-PERFORM.

Answer / mr.s

using inspect command

What do you do to resolve SOC-7 error?

2 Answers   Sun Life, Wipro,

---

s9(18) comp-3:: What is the size of memory it takes internally?

4 Answers  

---

how do you reference the variable block file formats from cobol programs

0 Answers  

---

how to check whether the open command of a sequential file is successful? or not?

2 Answers   CSC, IBM,

---

How did the release of cobol/370 version 1.3 improve the performance of release 1.1?

0 Answers  

---

How many times the loop runs here 01 a pic 9(2) value 1. perform para1 until a=10 move 1 to a. stop run. para1: move 10 to a.

5 Answers  

---

What is the maximum length of a field you can define using COMP-3?

4 Answers   Complex System, Infosys,

---

how to transfer the file from pc to mainframe??

4 Answers  

---

COBOL program to read the string ' BOMBAY' in reverse order as 'YABMOB'

8 Answers   Barclays, IBM,

---

I have a seq file with different fields one field is address with pic x(50) as input in a cobol program. In address there is 'PUNE' at any different positions in the address field ( form 1 t0 50) . My requirement is select the fields with address 'PUNE' by using cobol. Please suggest

2 Answers   IBM,

---

In EBCDIC, how would the number 1234 be stored?

2 Answers   TCS,

---

How does IDMS communicate with CICS?

1 Answers   Covansys, Satyam,

---