how do you move only numeric data from A to B
01 A pic x(10) value 'a1b2c34d5e'.
01 B pic x(5).
Answers were Sorted based on User's Feedback
Answer / 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 ? | 19 Yes | 1 No |
Mention the guidelines to write a structured cobol program?
i have two file one is ksds another one is esds i want store matching records in flat file how to you matching.
Hi , I am posting some questons which are asked at interview. These may help u for ur interview... what is static and dynamic call?
maximum of how many screens we can open in emulator
Discuss about changing dataset name in proc.
How to increase the logical record length of existing PS file?
What is Pic 9v99 Indicates in COBOL?
0 Answers SwanSoft Technologies,
What is the difference between comp and comp-3 usage?
in a indexed file what is procedure for read the records from 12 to 18. please give the code example
How do define dynamic array in cobol. how do you define single dimensional array and multidimensional array in your cobol?
can you declare redefine in level 01?
what is S04E error in jcl?
11 Answers IBM, L&T,