UCASE Subroutine

Usage:

s = UCASE(s)

Description:

Returns an upper case version of a string.