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...


i have a requrement in A as viswa!@#$%&^**reddy i need to
move viswareddy in B without junk values pls say how to do
ths reply fast

Answers were Sorted based on User's Feedback



i have a requrement in A as viswa!@#$%&^**reddy i need to move viswareddy in B without junk val..

Answer / vinod

01 a pic x(19) value 'viswa!@#$%&^**reddy'.
01 b pix x(11).
procedure division.
move a(1:5) to b(1:5).
move a(15:5) to b(6:5).
display b.

Is This Answer Correct ?    17 Yes 1 No

i have a requrement in A as viswa!@#$%&^**reddy i need to move viswareddy in B without junk val..

Answer / priyanka

declare an 88 level with valid values as 'a' to 'z' and '0'
to '9'.
value = viswa!@#$%&^**reddy
move 0 to Y
move length of value to ws-value-length
Perform varying X from 1 by 1 until X > ws-value-length
move value (X:1) to 88-level-variable
if valid-value
add +1 to Y
move value(X:1) to out-value(Y:1)
else
continue
end-if
end-perform

out-value will be your output.

Is This Answer Correct ?    5 Yes 1 No

i have a requrement in A as viswa!@#$%&^**reddy i need to move viswareddy in B without junk val..

Answer / raghu

01 a pic x(19) value 'viswa!@#$%&^**reddy'.
01 b pix x(11).
procedure division.
perform a until ws-eof-str
if a is alphabetic
move a to b
display b
end-if
end-perform

Is This Answer Correct ?    0 Yes 0 No

i have a requrement in A as viswa!@#$%&^**reddy i need to move viswareddy in B without junk val..

Answer / guest

move a(1:5,15:5) to b

Is This Answer Correct ?    0 Yes 1 No

Post New Answer

More COBOL Interview Questions

How many times the loop runs here 01 a pic 9(2) value 10. perform para1 a times stop run. para1: move 20 to a.

3 Answers  


TYPES OF SORTINGS. which is more prefarable.

2 Answers   Syntel, TCS,


wirte a pgm in using files in which we hav 10 ,20,30 40...100 records in inputfile and i want them to be send to outputfile in reverse order. PLZ HELP ME OUT .........THIS IS A RECENT QUESTION IN IGATE..

5 Answers   iGate,


how to create temporary data set in jcl? what is the use?

3 Answers   Cap Gemini, Temenos,


What is the Purpose of POINTER Phrase in STRING command in COBOL?

0 Answers   Winsol Solutions,


Can we access the a[0] in the array ?

6 Answers   DCL, IBM,


What will happen if we move SPACES to numeric field and ZEROES to alphabetic field?

2 Answers  


if a>b continue display x. dispaly y. end-if display 1 display 2. display 3. what should be my output ?

3 Answers  


What are the different rules of SORT operation?

0 Answers  


how do u list the abended jobs?

1 Answers   IBM,


whn do i get soc7 abend while moving alphanumeric to numeric or while moving numeric to aplhanumeric please reply ASAP?

9 Answers  


how to transfer the file from pc to mainframe??

3 Answers  


Categories