egdb3_14_1
.search
Tables
(current)
Columns
Constraints
Relationships
Orphan Tables
Anomalies
Routines
symspell_transfer_casing(withcase text, withoutcase text)
Parameters
Name
Type
Mode
withcase
text
IN
withoutcase
text
IN
Definition
DECLARE woChars TEXT[]; curr TEXT; ind INT := 1; BEGIN woChars := regexp_split_to_array(withoutCase,''); FOR curr IN SELECT x FROM regexp_split_to_table(withCase, '') x LOOP IF curr = evergreen.uppercase(curr) THEN woChars[ind] := evergreen.uppercase(woChars[ind]); END IF; ind := ind + 1; END LOOP; RETURN ARRAY_TO_STRING(woChars,''); END;