Answer / santosh khot

Reference modification is retrieving or Modifying substring
of a string. if Reference modification has a negative value
then Abend Code is soc4, So be care full while using
reference modification
Syntex is Move String(First position, Length) to Var-1.

Answer / ts nithiyanandan

Reference modification is nothing but moving the part of
value of dataname to other dataname.

01 a pic 9(10).
01 b pic 9(10).

move a(4:5) to b.

i.e., moving from 4th byte to 9th byte to dataname b.
from 4th to 9th is length of 5 bytes.

consider the following FD FILE-1 01 REC-1 PIC X(80) ...... WORKING-STORAGE SECTION 01 W-REC PIC X(90) ........ PROCEDURE DIVISION FIRST-PARA ....... READ FILE-1 INTO W-REC AT END MOVE 1 TO EOF-FLAG which of the following is true with respect to the above? a.REC-1 will contain nothing and W-REC will contain the contains of the record read b.REC-1 and W-REC contain the same data c.syntex is invalid and error will occur d.REC-1 and W-REC must be of same size

1 Answers   TCS,

---

What is an in-line perform ?

4 Answers   Accenture,

---

level number 77 is used to define a)group data b)elementary data c)redefine d)none

8 Answers   TCS,

---

how many bytes does s9(15) occupy in comp1 comp2 and comp3 ?

4 Answers   TCS,

---

Identify the invalid dataname from the following: (A) savings-account (B) annual-allocation-for-overhead (C) samount250 (D) 12demand

4 Answers   TCS,

---

What is the difference between Global and External Variables?

0 Answers  

---

Write the syntax of a two dimensional array?

8 Answers   Honeywell, Xansa,

---

What is the default value of DISP for temp datasets

5 Answers   IBM,

---

I have the file which is having the extension no as records. sample file will look like below. 2310 3410 3256 4350 3781 5408 I need to replace the record which is starting with 3 to 5 (i.e) 3410 to 5410. How can we do it through cobol and cobol-db2 program? I need the possible logic?

5 Answers   RBS,

---

Consider the following COBOL entries: 05 X PIC 99 VALUE 10. SUBTRACT 20 FROM X. The resultant value of X wil be

7 Answers   TCS,

---

consider the following progrm statements MOVE 0 TO SW.NO.OF.REC PERFORM PRI-OUT UNTIL SW=1 DISPALY NO.OF.REC STOP RUN PRE-OUT READ IN-FILE AT END MOVE 1 TO SW WRITE OUO-REC FROM IN-REC ADD 1 TO NO.OF REC if the IN-FILE contains 1000 records what value will be displayedafter the PERFORM is over?assume that N0.OF.REC has PIC 9(4) a.1000 b.1001 c.1 d.none of the above since there is a syntex error

4 Answers   TCS,

---

What do you understand by psb and acb?

0 Answers  

---