USP_AgregaCuentaContablq.sql

USE [ZGastosInversion]
GO
/****** Object:  StoredProcedure [dbo].[usp_Gastos05_AgregarCuentaC]    Script Date: 07/19/2018 10:27:25 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER Procedure [dbo].[usp_Gastos05_AgregarCuentaC] 
(
	@UCI varchar(20),
	@Name varchar(100),
	@strPerfil varchar(20),
	@intStatus bit,
	@intAccion int	
)
AS

Begin 
DECLARE @strPwd varchar(10)

	
	IF @intAccion = 1  --ALTA
	BEGIN
		IF (Select COUNT(*) FROM Tbl001_Usuarios WHERE Usuario = @strUser) = 0
		BEGIN
			IF @strPerfil = 'ADM' 
			BEGIN
				SET @strPerfil = 'XXXXXXX'				
			END
			IF @strPerfil <> 'ADM' 
			BEGIN
				SET @strPerfil = 'OM9999'
			END
				SET @strPwd = 'Oxiteno1$'
				
				Insert Into Tbl001_Usuarios Values (@strUser, @strPwd, @Name, @strPerfil, @intStatus)
		END
	END


	IF @intAccion = 2  --Baja
	BEGIN
	
		Update Tbl001_Usuarios
		   SET Status = 0
		Where Usuario =  @strUser
		  
	END


	IF @intAccion = 3  --CAMBIO
	BEGIN
		SET @strPwd = 'Oxiteno1$'
		Update Tbl001_Usuarios
		   SET Status = 1,
			   Password =  @strPwd
		Where Usuario =  @strUser	
	
	END
	               
End