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
Answer Posted / 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 |
Post New Answer View All Answers
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
What are all the divisions of a COBOL program?
What are the different data types in cobol?
HOw can I get the negative sign while deduct high value from low value
I have a File that has duplicate records. I need only those records that occur more than thrice.?
How did the release of cobol/370 version 1.3 improve the performance of release 1.1?
How you can read the file from bottom?
Whats the difference between search & search ALL?
Why did you choose to work with ibm mainframe cobol programming?
What is static and dynamic call in cobol?
how to move the records from file to array table. give with code example
What is rmode(any) ?
Define static linking and dynamic linking.
How to get the last record in vsam file in cluster? And how can you get the ksds file records into cobol program?
How can i load all the data from a file to Table (array) in cobol.How i manage the occurs clause with out reading the file.Any options avilable ? Please can any one help me it is urgent?