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
- 7686 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
System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..
What are the different rules to perform a Search?
Write a program to explain size error.
What is the LINKAGE SECTION used in COBOL?
What do you understand by psb and acb?
How can we find that module can be called – whether DYNAMICALLY or STATICALLY?
how to refer the data field?
Which is not true about evaluate statement
How to find out the closest prime number of an input number? I believe it has something to do with SEARCH and COBOL Linear Array.
What rules are followed by the search verb.
How did the release of cobol/370 version 1.3 improve the performance of release 1.1?
What is a report item?
Name the sections present in data division.
how do you reference the esds vsam file formats from cobol programs
INREC AND OUTREC? HOW TO SPLIT 5K RECORDS TO DIFFERENT FILES IN A FILE IN COBOL? RESTART IN COBOL-DB2? ISOLATION LEVELS?
