Hi malian,
you have to build your own routine(s) similar to these:
-- >:toupper_c --> integer representation of the character "up"
ROUTINE toupper_c(icode_CHAR: INTEGER): STRING
BEGIN
IF (icode_CHAR > 96) AND (icode_CHAR < 123) THEN
icode_CHAR = icode_CHAR - 32
ENDIF
RETURN (CHR(icode_CHAR))
END toupper_c
-- > : toupper_s --> String "up"
ROUTINE toupper_s(str: STRING): STRING
VAR
r_string:STRING[128]
indx:INTEGER
BEGIN
r_string = ''
FOR indx = 1 TO STR_LEN(str) DO
r_string = r_string + toupper_c(ORD(str, indx))
ENDFOR
RETURN(r_string)
END toupper_s
--> CHR Built-In Function
Purpose: Returns the character that corresponds to a numeric code
--> ORD Built-In Function
Purpose: Returns the numeric ASCII code corresponding to the character in the STRING argument that is referenced by the index argument
