RosettaCodeData/Task/String-case/HicEst/string-case.hicest

5 lines
126 B
Text
Raw Permalink Normal View History

2013-04-11 01:07:29 -07:00
CHARACTER str = "alphaBETA"
EDIT(Text=str, UpperCase=LEN(str))
EDIT(Text=str, LowerCase=LEN(str))
EDIT(Text=str, UpperCase=1)