function toTitleCaseWord(word) {
  return %StringToUpperCase(%_Call(StringSubstr, word, 0, 1)) +
         %StringToLowerCase(%_Call(StringSubstr, word, 1));
}
function toTitleCaseWord(word) {
  return %StringToUpperCase(%_Call(StringSubstr, word, 0, 1)) +
         %StringToLowerCase(%_Call(StringSubstr, word, 1));
}
function toTitleCaseWord ( word ) { return % StringToUpperCase ( % _Call ( StringSubstr , word , 0 , 1 ) ) + % StringToLowerCase ( % _Call ( StringSubstr , word , 1 ) ) ; }
Returns titlecased word, aMeRricA -> America.
Returns titlecased word aMeRricA - > America .