Anasayfa > Metin Fonksiyonları, SQL Genel Bilgiler ve Eğitim bilgileri, T-SQL Komutları > T-SQL ile Metinleri Parçalarına Ayrıştırmak

T-SQL ile Metinleri Parçalarına Ayrıştırmak

set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
Go
 
/*************************************************************************************************/
/* Bu fonksiyon, verilen bir metni kelimelerine ayrıştırır ve sonucu bir tablo olarak kullancıya sunar.  */
/*************************************************************************************************/
 
ALTER FUNCTION [dbo].[FN_TBL_KelimeListesi] (
                     @Parametre VARCHAR(MAX)
,                    @Ayraclar VARCHAR(100)
)
          RETURNS @Sonuc TABLE (
                       [Sıra] INT IDENTITY(1,1)
,                             [Boy] INT                                DEFAULT((0))
,                             [Ayrac] VARCHAR(1)           DEFAULT()
,                             [Kelime] VARCHAR(MAXDEFAULT()
)
AS BEGIN
DECLARE @Basamak INT
,                   @Boy           INT
,                   @Ayrac      VARCHAR(1)
,                   @Kelime     VARCHAR(MAX)
,                   @Paragraf VARCHAR(MAX)
 
SELECT @Basamak = 1
,               @Ayraclar =ISNULL(@Ayraclar,‘%[ ,.:; ‘
                                      +CHAR(10)+CHAR(13)
                                      +‘!?”()<&>={}\/*+`_-]%’)
,               @Paragraf = ISNULL(@Parametre,)
WHILE  @Basamak <> 0 BEGIN
 
/* En soldan başlayıp ilk ayracımızın hangi basamakta olduğunu buluyoruz */
/* Ardından bu haltı hangi ayraç yemiş onu buluyoruz */
SELECT @Basamak = PATINDEX(@Ayraclar, @Paragraf)
,               @Ayrac       = SUBSTRING(@Paragraf, @Basamak, 1)
 
/* Kelimeyi Soldan ayraca kadar alyoruz */
IF(@Basamak <> 0SELECT @Kelime =RTRIM(LTRIM(LEFT(@Paragraf, @Basamak 1)))
ELSE                              SELECT @Kelime =RTRIM(LTRIM(@Paragraf))
 
/* Kelimenin boyunu posunu lyoruz */
SET @Boy =LEN(@Kelime)
 
IF(@Boy > 0) BEGIN
           /* Kelimemizi ve boyunu posunu tablomuza yazyoruz */
INSERT INTO
@Sonuc ( Kelime
                      , Boy
                      , Ayrac
                      )
VALUES     ( @Kelime
                     , @Boy
                     , @Ayrac
                     )
END
/* Aldımız kelimeyi paragraftan siliyoruz */
SELECT @Paragraf =RIGHT(@Paragraf,LEN(@Paragraf) @Basamak)
/* Paragrafta kelime kalmadıysa döngüden kaçıyoruz */
IF LEN(@Paragraf)= 0 BREAK
END
RETURN
END
 
Bu kodu kullanabilmek için ise şöyle bir SQL cümlesi kullanmamız yeterli;
 
SELECT  * FROM dbo.FN_TBL_KelimeListesi(‘Test,amaçli!deneysel&veriler.’,NULL)
 
  1. Henüz yorum yapılmamış.
  1. No trackbacks yet.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: