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 / billyboyo

Presumably you mean the last character? Redefine the field
as OCCURS 100 PIC X. Start your subscript/index at
the "end" and work backwards to find the first non-blank
character. Careful if the whole field is blank, or if there
are no blanks.

Is This Answer Correct ?    3 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Name the sections present in data division.

691


Describe the cobol database components?

668


explain sorting techniques in cobol program?

679


What are the different rules of SORT operation?

689


System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..

1578






What is the difference between binary search and sequential search?

631


Whats the difference between search & search ALL?

5234


What is the default value(s) for an initialize and what keyword allows for an override of the default?

682


Name the divisions, which are available in a cobol program?

674


How to print 10 to 1 if the input have only 10 digit number?

802


Have you used the sort in your project?for this type of questions any working on real time project give the eg. with real time scenario.

2045


what is amode(24), amode(31), rmode(24) and rmode(any)?

686


Explain how to differentiate call by context by comparing it to other calls?

678


which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad

1013


What is the use of intialize verb?

735