REXX – CHANGE UPPER TO LOWER CASE

In REXX you do not have a direct function to change UPPER case characters to LOWER case or Vice versa.

To achieve this you can make use of TRANSLATE function.

/*** REXX ***/

SAY ‘PLEASE ENTER A STRING’

PULL STRING

UPPER = ‘ABCDEFGHIJKLMNOPQRSTUVWXYZ’

lower = ‘abcdefghijklmnopqrstuvwxyz’

FINAL = TRANSLATE(STRING,LOWER,UPPER)

SAY FINAL

The above REXX would convert all UPPER CASE to LOWER case.

And to convert LOWER CASE to UPPER CASE change the TRANSLATE function as below.

FINAL = TRANSLATE(STRING,UPPER,LOWER)

Important SQL CODES and ABEND CODES
SORT JOIN – TO JOIN TWO FILES BASED ON A KEY
KNOW YOUR MAINFRAME
REXX – INITIAL SETUP
EASYTRIEVE – A023 ABEND
EASYTRIEVE – SORT and FILE COMPARISION
EASYTRIEVE – Special-name Report Procedures
EASYTRIEVE – REPORT STAEMENT
EASYTRIEVE – Sample Program – Table And Search
EASYTRIEVE – Sample Program – Display Totals and Summary
EASYTRIEVE – Sample Program – Display Employee Data
CA-Easytrieve/Plus – Basics
REXX TOOL # 02 – FSAVE – Save member opened in VIEW mode
REXX TOOL # 01 – O – Open Any Mainframe Element from any ISPF Screen
REXX – INDEX, POS, SUBSTR, COMPARE
REXX – READ THE DSN PROVIDED AS DD IN JCL
REXX – SEND MULTIPLE ARGUMENTS THROUGH JCL
REXX – HOW TO COMPILE YOUR REXX EXEC
REXX – CHANGE UPPER TO LOWER CASE
REXX – GET LAST 4 DAYS FROM GIVEN DATE
REXX – PANEL Definition
REXX – READ, CREATE AND WRITE DATA TO A DATASET
REXX TOOL TO SUBSTITUTE SYMBOLICS IN A PROC
Advertisements