Answer Posted / vaneesh

Here I am considering INPUT to COBOL working storage
variable and not from file. (If it is input from file then
answer above by Adithya is right).

01 WS-INPUT PIC X(52) VALUE 'AABBCCDDEFGHIIJ.....ZZ'
05 WS-ALPHABET-INP PIC X OCCOURS 52 TIMES.

01 WS-OUPUT PIC X(26).
05 WS-ALPHABET-OUT PIC X OCCOURS 26 TIMES.

01 SUBSRIPTS
05 WS-SUBA PIC 9(2).
05 WS-SUBB PIC 9(2) VALUE 1.

PROCEDURE DIVISION.

PERFORM VARYING WS-SUBA FROM 2 BY 2 UNTIL WS-SUBA > 52

MOVE WS-ALPHABET(WS-SUBA) TO WS-ALPHABET-OUT(WS-SUBB)

ADD +1 TO WS-SUBB

END-PERFORM.

DISPLAY WS-OUPUT

STOP RUN.

example for sub strings ? and refernce modifications whit output pls

2317

---

can you please let me know if there is any walkins for COBOL/PLI/DB2/IMS/JCL in pune other than IBM and ITC infotech

2432

---

How do define dynamic array in cobol.

1142

---

What type of SDLC u followed? Why?

1999

---

What is the difference between Call and a Link?

1198

---

What are the different rules to perform a Search?

1098

---

Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?

1358

---

Define cobol?

1408

---

What kind of error is trapped by on size error option?

1245

---

What do you understand by psb and acb?

1125

---

What are the rules of the move verb?

1270

---

Explain what you understand by passing by value.

1157

---

If you are current on the owner of a set, what is the difference between an obtain next and obtain first? Actually in which topic will we use dis???Plz explain it clearly

3164

---

What are 77 levels used for?

1108

---

What are the cobol coding sheets?

1275

---