Answer / suersh ramaiyan

Use REDEFINE.

Example:

01 NUMBER-X PIC X(10).
01 NUMBER-N REDEFINES NUMBER-X
PIC 9(10).

COMPUTE A = NUMBER-N + B

This will surely work.

Answer / anonymous

You cant perform any arithmetic operationon alphabetic and
alphanumeric data items . If u try to perform u ll get SOC7.

what is Reentrancy and Quasi-reentrancy?

1 Answers  

---

How to replace the GOTO statement in COBOL without changing the structure of program. e.g. consider following code... I.D. E.D. D.D. P.D. compute C = A + B. GOTO para 100-display. compute D = C - D. GOTO 200-display. some other logic...... ........ GOTO 300-para. ...... ...... GOTO 400-para. Now I want to replacce all GOTO statements without changing the structure and otput of program.

6 Answers   Accenture,

---

In file1 have 80 records are like d1,d2,d3......D80. File2 have 1000records are like a1d1,a1d2,a3d3.....Etc. I want matching records in file3 ? Plse tell me the matching logic???I want answer only in cobol ?Not using any tool or jcl?

1 Answers   CSC,

---

wht do u mean by (*,intrdr) wht is * used for ?

2 Answers  

---

how to transfer the file from pc to mainframe??

5 Answers   TCS,

---

what will happen if i give program name and member name as different? program runs successful or w'll abend?

5 Answers   CTS,

---

What are the differences between COBOL and COBOL II?

1 Answers   CSC,

---

Why we need to use redefine clause when we can define the variable seperately... what is actual need....

5 Answers   Accenture,

---

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

2 Answers  

---

What are the divisions in a cobol program? Which one is the mandatory division among them?

1 Answers  

---

I have a field with data type X(10). I want to perform arithmetic operation on this field? I tried doing it by moving the value into a numeric field. but it didn't work out. I am getting a S0C7 abend. Pls let me know if there is any way of getting this done?

1 Answers  

---

There is a production file which has millions of records in it.The program that uses it ends up with an SOC7 abend.It is sure that the abend is due to some invalid data in the file.Is there any way to debugg the SOC7 abend with out giving displays? I need the record which is cause for the abend.

8 Answers   Danske, iGate,

---