× 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.


  1.  Home
  2. MIDRANGE-L
  3. August 2004

Re: CL - convert to uppercase?

Here you go...

/* variables for QDCXLATE */
   DCL &TBLNAM   *CHAR LEN(10) VALUE('QSYSTRNTBL')
   DCL &TBLLIB   *CHAR LEN(10) VALUE('QSYS      ')
   DCL &FLDLEN   *DEC  LEN(5 0)

    /* translate DATA "a-z" to uppercase "A-Z" */
       CHGVAR     VAR(&DATA) VALUE(&WHATEVER)
       CHGVAR     VAR(&FLDLEN) VALUE(128) /* max size of DATA */
       CALL       PGM(QDCXLATE) PARM(&FLDLEN &PAT &TBLNAM &TBLLIB)


----- Original Message -----
> From: "Condon, Mike" <M1C@xxxxxxxxxxxxxxxxx>
> To: "'Midrange Systems Technical Discussion'" <midrange-l@xxxxxxxxxxxx>
> Sent: Tuesday, August 31, 2004 2:46 PM
> Subject: CL - convert to uppercase?
>

> Is there a way to convert lower to uppercase in a CL program, or do I need
> to do an RPG thing?

As an Amazon Associate we earn from qualifying purchases.

This thread ...
Replies:
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.