01 text-data pic x(100).
move 'xyzdbfrjjg u' to text-data.
how to find the value of last index of text-data?

Answer Posted / kumar

By using UNSTRING Verb we can do

UNSTRING text-data DELIMITED BY ' ' INTO ws-f1 (o/p varible)

Is This Answer Correct ?    0 Yes 1 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

HOw can I get the negative sign while deduct high value from low value

1779


What are the access modes of START statement?

706


What is the difference between structured cobol programming and object alternativelyiented cobol programming?

699


How are the next sentence and continue different from each other?

753


What is a scope terminator give example?

650






What is static and dynamic call in cobol?

586


State the various causes of s0c1, s0c5 and s0c7.

655


i want a program using by if, evaluate , string, unstring, perform, occurs?

4034


What are various search techniques in cobol? Explain.

639


What is the difference between structured cobol programming and object alternativelyiented cobol?

746


How do you reference the following file formats from cobol programs?

688


I need to compare 3 variables(dates) and do some processing based on the earliest date. There could be more then 1 date record in any of the 3 fields. What is the best way to code this?

1796


What are literals?

622


What are the different open modes available in cobol?

713


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

1916