Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
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).

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


Please Help Members By Posting Answers For Below Questions

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

1355


how to access the file from prodution from changeman tool and to submit a file to production

7549


how do you reference the rrds file formats from cobol programs

1575


How do you get the data to code the BMS macro?

1966


IF I mention stop run in CICS what happens?

2379


Which Search verb is equivalent to PERFORM…VARYING?

1041


Can we redefine the field of x(200) to less than 200?

1371


Explain how you can characterize tables in cobol?

1063


What is the difference between goback, stop run and exit program in cobol?

1588


Explain what you understand by passing by value.

1154


if we display var1 then what will b displayed in below condition. 77 var1 pic s9(2) value -10. 77 var1 pic s9(2) value -11. " " " -12. " " " -13. -14 ... ... -19.

6588


Whats the difference between search & search ALL?

6531


What is the difference between external and global variables in COBOL?

1462


Explain about different table spaces.

1097


what are decleratives in cobol?

2260