×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
Not sure how you would define Text-Len in OPM (DEC 3 0)
but this should be translateable from COBOL:
01 Text-Value pic x(50) value spaces.
01 Text-Len pic s9(5) value 50 comp-3.
01 Table-Name pic x(10) value 'QCASE256 '.
Call 'QDCXLATE' In library 'QSYS'
Using Text-Len
Text-Value
Table-Name
End-Call
-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf Of James H. H. Lampert
Sent: Wednesday, May 22, 2019 12:07 PM
To: Midrange Systems Technical Discussion
Subject: [EXTERNAL] Monocase a character string in OPM CL?
Ladies and Gentlemen:
There is, of course, a very easy way to monocase a character string in
RPG: just use an XLATE statement or %XLATE function call.
But I can't remember whether there's anything analogous that can be used
in an OPM CL program. Does anybody know of anything?
It seems that I'm retrieving a value from a data area, and on a number
of occasions, I've made typos when manually setting the value of that
data area, using lowercase instead of uppercase.
--
JHHL
As an Amazon Associate we earn from qualifying purchases.
This thread ...
Re: Monocase a character string in OPM CL?, (continued)
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact
[javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
