Description
Properties
| Name | Value |
|---|---|
| ANSI Nulls ON | True |
| Quoted Identifier ON | True |
| Encrypted | False |
| Execute As | |
| Assembly |
SQL Script
Copy
SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
CREATE OR ALTER PROCEDURE dbo.carga_clientes_new
AS
BEGIN
SET NOCOUNT ON;
DECLARE @p_cli_codigo int
DECLARE @p_cliente int
DECLARE @ok char(1)
DECLARE cursor_1 CURSOR FOR
SELECT cli_codigo from clientes_11
OPEN cursor_1
FETCH cursor_1 INTO @p_cli_codigo
WHILE (@@FETCH_STATUS = 0)
BEGIN
if (select count(*) from clientes where cli_codigo = @p_cli_codigo) > 0
begin
set @p_cliente = (select cliente from clientes where cli_codigo = @p_cli_codigo)
end
else
begin
set @ok = 'N'
WHILE (@ok = 'N')
BEGIN
set @p_cliente = ROUND(((999999999 - 1) * RAND() + 1), 0)
if (select count(*) from clientes where cliente = @p_cliente) = 0
begin
set @ok = 'S'
end
END
end
insert into clientes_new (cliente,cli_codigo,nombre_cliente,cuit,telefonos,contacto,contacto_2,domicilio_pagos,loc_codigo,cp_pagos,prv_codigo,pai_codigo,cli_resiva,ram_codigo,sra_codigo,ven_codigo,e_mail_factura)
select @p_cliente, cli_codigo,nombre_cliente,cuit,telefonos,contacto,contacto_2,domicilio_pagos,loc_codigo,cp_pagos,prv_codigo,pai_codigo,cli_resiva,ram_codigo,sra_codigo,ven_codigo,e_mail_factura
from clientes_11
where cli_codigo = @p_cli_codigo
delete from clientes_11
where cli_codigo = @p_cli_codigo
FETCH cursor_1 INTO @p_cli_codigo
END
CLOSE cursor_1
DEALLOCATE cursor_1
END
GO
GO
CREATE OR ALTER PROCEDURE dbo.carga_clientes_new
AS
BEGIN
SET NOCOUNT ON;
DECLARE @p_cli_codigo int
DECLARE @p_cliente int
DECLARE @ok char(1)
DECLARE cursor_1 CURSOR FOR
SELECT cli_codigo from clientes_11
OPEN cursor_1
FETCH cursor_1 INTO @p_cli_codigo
WHILE (@@FETCH_STATUS = 0)
BEGIN
if (select count(*) from clientes where cli_codigo = @p_cli_codigo) > 0
begin
set @p_cliente = (select cliente from clientes where cli_codigo = @p_cli_codigo)
end
else
begin
set @ok = 'N'
WHILE (@ok = 'N')
BEGIN
set @p_cliente = ROUND(((999999999 - 1) * RAND() + 1), 0)
if (select count(*) from clientes where cliente = @p_cliente) = 0
begin
set @ok = 'S'
end
END
end
insert into clientes_new (cliente,cli_codigo,nombre_cliente,cuit,telefonos,contacto,contacto_2,domicilio_pagos,loc_codigo,cp_pagos,prv_codigo,pai_codigo,cli_resiva,ram_codigo,sra_codigo,ven_codigo,e_mail_factura)
select @p_cliente, cli_codigo,nombre_cliente,cuit,telefonos,contacto,contacto_2,domicilio_pagos,loc_codigo,cp_pagos,prv_codigo,pai_codigo,cli_resiva,ram_codigo,sra_codigo,ven_codigo,e_mail_factura
from clientes_11
where cli_codigo = @p_cli_codigo
delete from clientes_11
where cli_codigo = @p_cli_codigo
FETCH cursor_1 INTO @p_cli_codigo
END
CLOSE cursor_1
DEALLOCATE cursor_1
END
GO
Depends On
1Used By
No items found