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

when iam reading a flat file which has 100 records through cobol program when iam reading 50th records it gets abends .. so when i run the program again it should read from 50th record .where it got abened ? how it is possible

1 Answers   Patni,


I hav vari declaration like..... 77 a pic s9(9).99. 77 b pic s9(9).99 comp. 77 c pic s9(9).99 comp-3. if i use MOVE 123456789.99 to a,b,c what happen every one working fine ?

1 Answers   Mphasis,


what is difference between cobol and cobol/400

1 Answers   HCL,


Name some of the examples of COBOl 11?

0 Answers   CSC,


I have two sequential files, FILE-1 and FILE-2. FILE-1 contains 2 columns(A,B) and FILE-2 contains 3 columns (C,D,E).I want an output file, FILE-3 which has all five columns with duplicates eliminated from column A.

3 Answers  


What is the difference between CONTINUE & NEXT SENTENCE ?

2 Answers  


When the working storage variables get allocated? a.At Compile time b.At starting of the run time c.At end of the run time. d.None of these

6 Answers   Wipro,


what is the use of outrecord?

0 Answers  


diffrence between renames and redifnes with examples

3 Answers   IBM,


what r the types of perform statement

4 Answers  


Discuss about changing dataset name in proc.

0 Answers  


Define in-line perform?

1 Answers  


Categories