Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: Vor- und Nachnamen splitten
28. Apr 2012, 01: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)
|
|
Zitat
|