FUNCTION RecursiveTransform RETURNS CHARACTER
(INPUT ip-string AS CHAR):
IF ip-string EQ "" THEN
RETURN "".
RETURN CHR(ASC(SUBSTRING(ip-string,1,1)) + 1) + RecursiveTransform(SUBSTRING(ip-string,2)).
END.
MESSAGE RecursiveTransform("abcde")
VIEW-AS ALERT-BOX INFO BUTTONS OK.