[SOLUCIONADO] Separar cadena de caracteres con Store procedure

juanes033 · #1 (**permalink**) 09/10/2014, 09:32

Buenos dias amig@s foristas, necesito de su gran colaboracion, soy nuevo en el mundo de SQL, deseo saber como crear un SP para separa en esta cadena de caracteres que solo me quede los correos:
'[email protected]##Receive;vlizarralde@argos .com.co##Receive;[email protected]##Receive;ja [email protected]##Receive;[email protected]## Receive;[email protected]##Receive, Deliver;[email protected]##Receive, Deliver;[email protected]'

tengo este SP que he creado pero no me sale como quiero:

Código SQL:

Ver originalCREATE PROCEDURE SepararEmail @Parametros VARCHAR(1000)
AS
CREATE TABLE #parametros (parametro VARCHAR(1000))
SET NOCOUNT ON
DECLARE @Posicion INT
DECLARE @Parametro VARCHAR(1000)
SET @Parametros = @Parametros + '##Receive'
WHILE patindex('%##Receive%' , @Parametros) <> 0
BEGIN
  SELECT @Posicion =  patindex('%##Receive%' , @Parametros)
  SELECT @Parametro = LEFT(@Parametros, @Posicion - 1)
  INSERT INTO #parametros VALUES (@Parametro)
  SELECT @Parametros = stuff(@Parametros, 1, @Posicion, '')
END
SELECT * FROM #parametros
SET NOCOUNT OFF
GO

Ageadeceria de su gran colaboracion, es muy importante para mi aprender bastante de los que saben...

iislas · #2 (**permalink**) 09/10/2014, 09:39

¿Y como viene la cadena?, digo, que datos contiene

juanes033 · #3 (**permalink**) 09/10/2014, 09:48

Cita:

Iniciado por iislas

¿Y como viene la cadena?, digo, que datos contiene

Islas hola;
Este es el registro que viene del archivo al cual se debe separar:

Código:

[email protected]##Receive;vlizarralde@argos .com.co##Receive;[email protected]##Receive;ja [email protected]##Receive;[email protected]## Receive;[email protected]##Receive, Deliver;[email protected]##Receive, Deliver;[email protected]

debe quedar en una tabla en una columna cada correo que hay en este regsitro

Libras · #4 (**permalink**) 09/10/2014, 10:05

Código SQL:

Ver original/****** Object:  UserDefinedFunction [dbo].[SplitApplication]    Script Date: 10/19/2010 15:12:35 ******/
SET ANSI_NULLS ON
GO
 
SET QUOTED_IDENTIFIER ON
GO
 
CREATE FUNCTION [dbo].[SplitApplication](@applicationid VARCHAR(2000))
 
RETURNS @RtnValue TABLE 
(
Id INT IDENTITY(1,1),
DATA nvarchar(100)
) 
AS 
BEGIN 
DECLARE @Cnt INT, @SplitOn nvarchar(5)
SET @SplitOn = '##'
SET @Cnt = 1
 
While (Charindex(@SplitOn,@applicationid)>0)
BEGIN
INSERT INTO @RtnValue (DATA)
SELECT 
DATA = ltrim(rtrim(SUBSTRING(@applicationid,1,Charindex(@SplitOn,@applicationid)-1)))
 
SET @applicationid = SUBSTRING(@applicationid,Charindex(@SplitOn,@applicationid)+1,len(@applicationid))
SET @Cnt = @Cnt + 1
END
 
INSERT INTO @RtnValue (DATA)
SELECT DATA = ltrim(rtrim(@applicationid))
 
RETURN
END
 
GO
 
 
how TO USE :
 
SELECT * FROM TABLE WHERE DATA IN (
 
SELECT * FROM SplitApplication('[email protected]##Receive;vlizarralde@argos .com.co##Receive;[email protected]##Receive;ja [email protected]##Receive;[email protected]## Receive;[email protected]##Receive, Deliver;[email protected]##Receive, Deliver;[email protected]')
)

quizas esto te sirva

juanes033 · #5 (**permalink**) 09/10/2014, 10:24

Hola Libras; realice la funcion que me envias y me da el mismo resultado del SP que cree:
Id DATA
1 [email protected]
2 #Receive;vlizarralde@argos .com.co
3 #Receive;[email protected]
4 #Receive;ja [email protected]
5 #Receive;[email protected]
6 # Receive;[email protected]
7 #Receive, Deliver;[email protected]
8 #Receive, Deliver;[email protected]

el registro 1 esta bien pero los otrso no se deberia cortar del ";" para que quedara bien todo. no he podido con eso. Gracias

juanes033 · #6 (**permalink**) 09/10/2014, 10:25

Hola libras; realice la función que me envías y me da el mismo resultado del SP que cree:
Id DATA
1 [email protected]
2 #Receive;vlizarralde@argos .com.co
3 #Receive;[email protected]
4 #Receive;ja [email protected]
5 #Receive;[email protected]
6 # Receive;[email protected]
7 #Receive, Deliver;[email protected]
8 #Receive, Deliver;[email protected]

el registro 1 esta bien pero los otrso no se deberia cortar del ";" para que quedara bien todo. no he podido con eso. Gracias

Libras · #7 (**permalink**) 09/10/2014, 10:34

Código SQL:

Ver original/****** Object:  UserDefinedFunction [dbo].[SplitApplication]    Script Date: 10/19/2010 15:12:35 ******/
SET ANSI_NULLS ON
GO
 
SET QUOTED_IDENTIFIER ON
GO
 
ALTER FUNCTION [dbo].[SplitApplication](@applicationid VARCHAR(MAX))
 
RETURNS @RtnValue TABLE 
(
Id INT IDENTITY(1,1),
DATA nvarchar(MAX)
) 
AS 
BEGIN 
DECLARE @Cnt INT, @SplitOn nvarchar(20)
--SET @SplitOn = '##Receive;'
SET @SplitOn = ';'
SET @Cnt = 1
 
While (Charindex(@SplitOn,@applicationid)>0)
BEGIN
INSERT INTO @RtnValue (DATA)
SELECT 
DATA = ltrim(rtrim(SUBSTRING(@applicationid,1,Charindex(@SplitOn,@applicationid)-(len(@SplitOn)))))
 
SET @applicationid = SUBSTRING(@applicationid,Charindex(@SplitOn,@applicationid)+(len(@SplitOn)),len(@applicationid))
SET @Cnt = @Cnt + 1
END
 
INSERT INTO @RtnValue (DATA)
SELECT DATA = ltrim(rtrim(@applicationid))
 
RETURN
END
 
GO
 
 
how TO USE :
 
 
SELECT 
CASE WHEN charindex('##',DATA)>=1 THEN SUBSTRING([DATA],1,charindex('##',DATA)-1) ELSE DATA END AS dato FROM
SplitApplication('[email protected]##Receive;vlizarralde@argos .com.co##Receive;[email protected]##Receive;ja [email protected]##Receive;[email protected]##Receive;[email protected]##Receive Deliver;[email protected]##Receive, Deliver;[email protected]')

Resultado final:

[email protected]
vlizarralde@argos .com.co
[email protected]
ja [email protected]
[email protected]
[email protected]
[email protected]
[email protected]

saludos!

juanes033 · #8 (**permalink**) 09/10/2014, 10:51

Cita:

Iniciado por Libras

Código SQL:

Ver original/****** Object:  UserDefinedFunction [dbo].[SplitApplication]    Script Date: 10/19/2010 15:12:35 ******/
SET ANSI_NULLS ON
GO
 
SET QUOTED_IDENTIFIER ON
GO
 
ALTER FUNCTION [dbo].[SplitApplication](@applicationid VARCHAR(MAX))
 
RETURNS @RtnValue TABLE 
(
Id INT IDENTITY(1,1),
DATA nvarchar(MAX)
) 
AS 
BEGIN 
DECLARE @Cnt INT, @SplitOn nvarchar(20)
--SET @SplitOn = '##Receive;'
SET @SplitOn = ';'
SET @Cnt = 1
 
While (Charindex(@SplitOn,@applicationid)>0)
BEGIN
INSERT INTO @RtnValue (DATA)
SELECT 
DATA = ltrim(rtrim(SUBSTRING(@applicationid,1,Charindex(@SplitOn,@applicationid)-(len(@SplitOn)))))
 
SET @applicationid = SUBSTRING(@applicationid,Charindex(@SplitOn,@applicationid)+(len(@SplitOn)),len(@applicationid))
SET @Cnt = @Cnt + 1
END
 
INSERT INTO @RtnValue (DATA)
SELECT DATA = ltrim(rtrim(@applicationid))
 
RETURN
END
 
GO
 
 
how TO USE :
 
 
SELECT 
CASE WHEN charindex('##',DATA)>=1 THEN SUBSTRING([DATA],1,charindex('##',DATA)-1) ELSE DATA END AS dato FROM
SplitApplication('[email protected]##Receive;vlizarralde@argos .com.co##Receive;[email protected]##Receive;ja [email protected]##Receive;[email protected]##Receive;[email protected]##Receive Deliver;[email protected]##Receive, Deliver;[email protected]')

Resultado final:

[email][email protected][/email]
vlizarralde@argos .com.co
[email][email protected][/email]
ja [email][email protected][/email]
[email][email protected][/email]
[email][email protected][/email]
[email][email protected][/email]
[email][email protected][/email]

saludos!

Muchisimas gracias Libras, ya me voy a acondicionar la funcion para que funcione de la tabla de donde sale la informacion, si tengo algun problema te estare molestando, ya que como te dije anteriormente soy nuevo en este mundo, pero con toda la disposicion del mundo para aprender

iislas · #9 (**permalink**) 10/10/2014, 12:43

En mi caso, limpiaría la cadena inicial, quitando

Receiver;
Receiver,
Deliver;

Y espacios en blanco

Substituir la cadena de ## por |

iislas · #10 (**permalink**) 10/10/2014, 12:44

En mi caso, limpiaría la cadena inicial, quitando

Receiver;
Receiver,
Deliver;

Y espacios en blanco

Substituir la cadena de ## por |