d lcase pr 32787 varying d FromString 32787 varying const
LCASE_KR le code
c*=------------------------------------------------------------------------ p lcase b d lcase pi 32787 varying d FromString 32787 varying const * table des minuscules d lo c const('abcdefghijklmnopqrst- d uvwxyzéèçàùäâëêïîöôü- d û') * table des majuscules D UP C CONST('ABCDEFGHIJKLMNOPQRST- D UVWXYZÉÈÇÀÙÄÂËÊÏÎÖÔÜ- D Û') c return %xlate(up:lo:fromString) p lcase e
