Einzelnen Beitrag anzeigen

Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#16

AW: Vor- und Nachnamen splitten

  Alt 28. Apr 2012, 00:02
Code:
Create FUNCTION [dbo].[F_SplitCity](@All Varchar(50))
--201204 by Thomas Wassermann
RETURNS
@tab TABLE
(
City Varchar(50),
State Varchar(50),
ZIP Varchar(50)
)
AS
BEGIN
   Declare @tmp varchar(50)
   Declare @zip varchar(50)
   Declare @State varchar(50)
   
    Set @tmp =RTRIM(LTRIM(REVERSE(@ALL)))
    SET @zip=RTRIM(SUBSTRING(@tmp,1,CharIndex(' ',@tmp)))
    SET @tmp=LTRIM(RTRIM(REPLACE(@tmp,@zip,'')))
    SET @zip=REVERSE(@Zip)
    Set @State=RTRIM(SUBSTRING(@tmp,1,CharIndex(' ',@tmp)))
    SET @tmp=REPLACE(@tmp,@State,'') -- hier gegf. etwas anderes einbauen als Replace
    SET @State=REVERSE(@State)
    Insert into @tab Select Reverse(@tmp),@State,@Zip
   RETURN
END
Verwendung
Code:
Select *
from CST Cross Apply [dbo].[F_SplitCity](CST.[ALL])
bei CST = bestehende Adresstabelle und ALL = das Sumpffeld mit City-State-Zip
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat