Cette fonction :
- "Cas propres" tous les mots en "MAJUSCULES" délimités par un espace blanc
- laisse les "mots en minuscules" seuls
- fonctionne correctement même pour les alphabets non anglais
- est portable en ce sens qu'il n'utilise pas les fonctionnalités sophistiquées des versions récentes du serveur SQL
- peut être facilement modifié pour utiliser NCHAR et NVARCHAR pour la prise en charge d'Unicode, ainsi que toute longueur de paramètre que vous jugez appropriée
- la définition des espaces blancs peut être configurée
CREATE FUNCTION ToProperCase(@string VARCHAR(255)) RETURNS VARCHAR(255)
AS
BEGIN
DECLARE @i INT -- index
DECLARE @l INT -- input length
DECLARE @c NCHAR(1) -- current char
DECLARE @f INT -- first letter flag (1/0)
DECLARE @o VARCHAR(255) -- output string
DECLARE @w VARCHAR(10) -- characters considered as white space
SET @w = '[' + CHAR(13) + CHAR(10) + CHAR(9) + CHAR(160) + ' ' + ']'
SET @i = 1
SET @l = LEN(@string)
SET @f = 1
SET @o = ''
WHILE @i <= @l
BEGIN
SET @c = SUBSTRING(@string, @i, 1)
IF @f = 1
BEGIN
SET @o = @o + @c
SET @f = 0
END
ELSE
BEGIN
SET @o = @o + LOWER(@c)
END
IF @c LIKE @w SET @f = 1
SET @i = @i + 1
END
RETURN @o
END
Résultat :
dbo.ToProperCase('ALL UPPER CASE and SOME lower ÄÄ ÖÖ ÜÜ ÉÉ ØØ ĈĈ ÆÆ')
-----------------------------------------------------------------
All Upper Case and Some lower Ää Öö Üü Éé Øø Cc Ææ