Interested to Buy Any Domain ? << Click Here >> for more details...
how do you move only numeric data from A to B
01 A pic x(10) value 'a1b2c34d5e'.
01 B pic x(5).
- 2 Answers
- 7621 Views
- DELL, Mind Tree, I also Faced
- E-Mail Answers
Answer Posted / 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.
| Is This Answer Correct ? | 20 Yes | 1 No |
Post New Answer View All Answers
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
What are INPUT PROCEDURE and OUTPUT PROCEDURE?
What is perform what is varying?
What is the local-storage section?
how do you reference the printer file formats from cobol programs
What are different data types in cobol?
What is the difference between PIC 9.99 and PIC9v99?
i want a program using by if, evaluate , string, unstring, perform, occurs?
What are the different types of condition in cobol and write their forms.
How do u write test cases?
What is the difference between binary search and sequential search?
What is rmode(24)
How did the release of cobol/370 version 1.3 improve the performance of release 1.1?
please..could u give an example about USAGE IS POINTER ..and explain why and when we use it ?
Explain how to differentiate call by context by comparing it to other calls?
