How To Separate The Numerics From An Alphanumric Data Item Which Contains Both

How To Separate The Numerics From An Alphanumric Data Item
Which Contains Both Alphabates And Numerics ?

Question Posted / ananth

4 Answers
11501 Views
I also Faced
E-Mail Answers

Answers were Sorted based on User's Feedback

How To Separate The Numerics From An Alphanumric Data Item Which Contains Both Alphabates And Nume..

Answer / shriram supalwar, dharmabad

01 A pic x(10) value 'a1b2c34d5e'.
01 B pic x(5).
(You want to move only numeric data from a to b)

PERFORM PARA1 VARYING I FROM 1 BY 1 UNTIL I>10
PARA1.
IF A(I:1) IS NUMERIC
MOVE A(I:1) TO B(I:1)
END-IF
END-PERFORM.
DISPLAY "NUMERIC DATA IS:" B(I).

Is This Answer Correct ?

12 Yes

0 No

How To Separate The Numerics From An Alphanumric Data Item Which Contains Both Alphabates And Nume..

Answer / harsha

Use COBOL program and check byte by byte.

Is This Answer Correct ?

9 Yes

0 No

How To Separate The Numerics From An Alphanumric Data Item Which Contains Both Alphabates And Nume..

Answer / kingmanish

Use the COBOL keyword ISNUMERIC.

This would be evaluated to true if the value stored is
numeric and you can separate the numeric values

Is This Answer Correct ?

2 Yes

1 No

How To Separate The Numerics From An Alphanumric Data Item Which Contains Both Alphabates And Nume..

Answer / reddy

use Function NUMVAL

Is This Answer Correct ?

4 Yes

8 No

Post New Answer

More COBOL Interview Questions

period is missing in the cobol program which error we getting

5 Answers TCS, Tesco,

Suppose, file A has 100 records and file B has 500 records. We want to write records common to both A and B into file C and records which are present only in either A or B into another file D. What should be the logic of Cobol program to achieve this?

7 Answers Bank Of America, Mind Tree,

How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?

0 Answers

IDENTIFICATION DIVISION. PROGRAM-ID. MOVEPGM. DATA DIVISION. WORKING-STORAGE SECTION. 01 WS-I PIC 9(2). PROCEDURE DIVISION. A1000-MAIN-PARA. PERFORM PARA-X WITH TEST BEFORE UNTIL WS-I= 5 STOP RUN. PARA-X. DISPLAY "BEST2". I m getting error s722,while executing the program, seems getting in loop, can anybody tell me why

3 Answers

How to concatenation one or more string?

4 Answers Temenos,

Can you REWRITE a record in an ESDS file? Can you DELETE a record from it?

6 Answers ABC, IBM, Mphasis, Wipro,

How to define a array dynamically.....

5 Answers Fidelity,

If a sub program is called from mainprogram.I have opened cursor in main program and Fetch the result in subprogram ,Is it possible ?If yes please tell me the reason.

1 Answers

How can we find out wether to declare the data items like Integer, Char,Comp? If comp types how can we decide wether it is Comp and Comp3.How it is? Please Explain... Cheers.

1 Answers Syntel,

I know my query will return more than one row but I don't want cursor what should I do?

1 Answers

How can you get the ksds file records into your cobol program?

0 Answers

where did you see the information regarding abend codes in jcl?

1 Answers Hewitt,

For more COBOL Interview Questions Click Here