Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Stored Procedure mit IN (https://www.delphipraxis.net/170598-stored-procedure-mit.html)

Andidreas 25. Sep 2012 12:18

Datenbank: MSSQL • Version: 2008 • Zugriff über: ADO

Stored Procedure mit IN
 
Hallo zusammen...

ich versuch mich gerade an meinen ersten Stored Procedures...

Ich habe folgenden SQL Befehl:
Code:
Select * From [database1].[dbo].[database1.country]
Where CountryName IN ('Germany', 'Austria')
Wie kann ich diesen SQL Befehl in eine Stored Procedure packen? Ich scheitere gerade an meiner Where IN Klausel...

Bummi 25. Sep 2012 12:34

AW: Stored Procedure mit IN
 
Wenn Du eine Stringlist als Parameter verwenden willst ....

Code:
CREATE Procedure P_GetCountrysByList(@List nvarchar(3800)) as
Declare @SQL nvarchar(4000)
Select @SQL='Select * From [dbo].[country] Where CountryName IN (' + 
'''' + Replace(Replace(@List,Char(10),''),Char(13),''',''') +''''+')'
Exec (@SQL)

shmia 25. Sep 2012 12:37

AW: Stored Procedure mit IN
 
Bei der IN-Klausel versagen die normalen Parameter, weil Parameter nur einfache Datentypen sind.
Du könntest die Länder aber nach Gruppen zusammenfassen und diese Info in einer weiteren Tabelle speichern.
Code:
Tabelle CountryGroups
CGroup  | Country
==================
EU      | DE
EU      | FR
Non-EU  | CA
Non-EU  | US
Non-EU  | BR
BeNELux | NL
...
Anstelle einer Liste von Ländern übergibst du deiner Store-Proc die Ländergruppe (CGroup).
SQL-Code:
Select country.* From [country]
INNER JOIN CountryGroups
WHERE CountryGroups.CGroup = @Parameter

Andidreas 25. Sep 2012 13:18

AW: Stored Procedure mit IN
 
Danke für Eure Anregungen... Ich hab bei meiner Internet Suche aber auch noch eine atraktive Lösung gefunden die auch Funktioniert...

Die fnSplit Funktion habe ich im Internet gefunden, über die kann ich die Werte auf Teile damit ich Sie wieder in einer IN Klausel verwenden kann...
Anbei die fnSplit Funktion und meine Stored Procedure, funktioniert wunderbar :-D

SQL-Code:
/* Step 1 --> Create Split Function for WHERE IN Clause */
USE [inventory_test]
GO

CREATE FUNCTION fnSplit(@text nvarchar(max), @delimiter char(1) = ' ')

RETURNS @Strings TABLE

position int IDENTITY PRIMARY KEY,
value nvarchar(max)
)

AS
BEGIN

DECLARE @index int
SET @index = -1

WHILE (LEN(@text) > 0)
BEGIN
SET @index = CHARINDEX(@delimiter , @text)
IF (@index = 0) AND (LEN(@text) > 0)
BEGIN
INSERT INTO @Strings VALUES (@text)
BREAK
END
IF (@index > 1)
BEGIN
INSERT INTO @Strings VALUES (LEFT(@text, @index - 1))
SET @text = RIGHT(@text, (LEN(@text) - @index))
END
ELSE
SET @text = RIGHT(@text, (LEN(@text) - @index))
END
RETURN
END

/* Step 2 --> Create Procedure with WHERE IN Clause */
USE [inventory_test]
GO

CREATE PROCEDURE prGetCountryTable @Country varchar(255)
AS
Select * From [inventory_test].[dbo].[inventory_test.country]
Where COUNTRY In (SELECT value FROM [inventory_test].[dbo].[fnSplit](@Country, ';'))

GO

/* Step 3 --> Execute Procedure */
EXEC [inventory_test].[dbo].[prGetCountryTable] @Country = 'Austria;Australia'


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:22 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz