UPPER-CASE
The UPPER-CASE function returns the upper-case version of a text string.
Syntax 1
function upper-case (arg-1) |
Syntax 2
Arguments
• arg-1 must be a alphanumeric data item or literal.
Result
The function returns returns the upper-case version of arg-1.
Examples
Example - Test if the provided user name is "admin" in a case-insensitive way.
working-storage section. 77 w-user pic x(32). ... procedure division. ... if function upper-case(w-user) = "ADMIN" |do something else |do something else end-if. |