COBOL Manual for TNS and TNS/R Programs

Intrinsic Functions

HP COBOL Manual for TNS and TNS/R Programs—522555-006

14-61

UPPER-CASE Function

UPPER-CASE, an alphanumeric function, returns a character-string that is the same

as its argument, except that each lowercase letter is replaced by the corresponding

uppercase letter.

string

is an alphabetic or alphanumeric string at least one character in length.

The returned value is the same as the value of string, except that each lowercase

letter is replaced by the corresponding uppercase letter. If the value of string

contains no lowercase letters, or if the ALPHABET clause specifies a collating

sequence that contains no uppercase letters, the returned value is the same as the

value of string.

Example 14-42. UPPER-CASE Function

Code:

DISPLAY FUNCTION UPPER-CASE ("HEWLETT-PACKARD COMPANY 2003")

DISPLAY FUNCTION UPPER-CASE ("Hewlett-packard Company 2003")

DISPLAY FUNCTION UPPER-CASE ("hewlett-packard company 2003")

Output:

HEWLETT-PACKARD COMPANY 2003

( )

UPPER-CASEFUNCTION string

VST465.vsd