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.

Will the variable POS in the following code have a value of 2 or not? 01 POS PIC S9(4) COMP VALUE 2. 01 FIRST-NAME PIC X(10) VALUE 'ABC'. 01 LAST-NAME PIC X(10) VALUE 'XYZ'. 01 NAME PIC X(20) VALUE SPACES. STRING FIRST-NAME DELIMITED BY SPACES ' ' DELIMITED BY SIZE LAST-NAME DELIMITED BY SPACES INTO NAME WITH POINTER POS

2 Answers  

---

can any one help -s806

6 Answers  

---

what is call by value and call by reference ?

3 Answers   Infosys, ITC Indian Tobacco Company,

---

what are the limitations of Inline Perform?

3 Answers   Zensar,

---

What are decleratives in COBOL ?

1 Answers   Xansa,

---

what is a zoned decimal data type and how it will be stored?

2 Answers   IBM,

---

Can anyone tell me how to handle the array beyond the limit. If we have an array or a table which can handle 5000 records but now we have to compensate 20000 records with the same array? how to handle the situation.

2 Answers  

---

S9(5)V9(2) occupies how many bytes memory ?

6 Answers   Cap Gemini,

---

I have File 1 occurs 5 times with Employee-ID,Employee-Name,Employee-Dept (EEE and MECH). I have File 2 occurs 10 times with Employee-ID,Employee-Name,Employee-Dept (EEE,CIVIL,CHEMICAL and MECH). In FIle 1 and FIle 2 , for matching Employee-DEPT (Only MECH) , we need to move entire records from file1 to file 2. We should not use 2D array. Your help is needed here.

0 Answers   Steria,

---

how will u code parm parameter and where pls ?

3 Answers   DELL,

---

what is label record is standard or omitted in file description of data division?

3 Answers   IBM, TCS,

---

What is Control Break processing ?

1 Answers   iGate,

---