Interested to Buy Any Domain ? << Click Here >> for more details...
01 text-data pic x(100).
move 'xyzdbfrjjg u' to text-data.
how to find the value of last index of text-data?
- 3 Answers
- 8245 Views
- Mind Tree, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / 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 |
cana ny one post a code for that ,
thanks in advance
krishna
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / 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 |
Program A (Normal COBBAT) calling a B Program (DB2COBOL, COBBATDB which is using a VSAM file. its a dynamic call. How we will handle VSAM file decleration in our from JCL from where we are running A PGM. And should we have PLAN for A pGM also. if possible can some one post a sample JCL. Thanks for help in advance.
I want to declare a field with data type Double in my COBOL program. how shall i do that ?
WHY LRECL NEEDS TO BE 4 EXTRA THEN THE COBOL FILE LENGTH & WHAT IT CONTAIN IN THAT LENGTH
in cobol perform stmt whether it first checks the condition or not
Difference between lrecl, blksize among PS, PDS issues? i.e in jcl at dcb
What is the difference between comp and comp-3 usage?
What are the access modes of START statement?
Which mode is used to operate the sequential file?
What is the difference between Structured COBOL Programming and Object Oriented COBOL programming?
0 Answers TryTechnicals Pvt Ltd,
What is reference modification? What is UNION in sql and syntax? What is the difference between GDGS and VSAM? Which is prefer one? What is processing groups in endevor?
a. Can the OPTIONAL clause in COBOL only be coded for input files? b. If it is coded for files opened in OUTPUT, I-O or EXTEND mode, will it give a compilation error? c. If there are no compilation errors and if such files are not coded in the JCL, will the OPEN statement run fine when these files are opened? d. How will a WRITE statement work for the above files?
What is the use of LINKAGE SECTION?
COBOL 
