usp_OXIEMP_Exp_PreAnalisis_Actualiza_registro.sql

USE [ZOXIMPEXP]
GO
/****** Object:  StoredProcedure [dbo].[usp_OXIEMP_Exp_PreAnalisis_Actualiza_registro]    Script Date: 10/25/2018 09:08:30 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- =============================================
-- Author:		Alfonso Mosco Herrera
-- Create date: 23-10-2018
-- Description:	Actualiza un registro especifico en la tabla Pre analisis exportaciones a demanda de usuario desde sitio web
-- =============================================
ALTER PROCEDURE [dbo].[usp_OXIEMP_Exp_PreAnalisis_Actualiza_registro] 
(
	@STR_IMP_EXP VARCHAR(100),
	@INT_ID INT,
	@PAIS VARCHAR(50),
	@EXPORTADORH VARCHAR(100),
	@PRODUCTOS VARCHAR(100),
	@FAMILIA VARCHAR(100),
	@CLASIFICACION VARCHAR(150),
	@DESCRIP_QUIM VARCHAR(100),
	@COMPRADOR VARCHAR(100)
)
AS
BEGIN 
	IF @STR_IMP_EXP = 'OXEXP004_FraccionPreAnalisis' 
	BEGIN TRY
		IF (SELECT COUNT(*) FROM OXEXP004_FraccionPreAnalisis WHERE OXEXP004_ID_IN = @INT_ID) = 1
		BEGIN TRANSACTION UPDATE_EXP_PA;
			UPDATE OXEXP004_FraccionPreAnalisis
			SET
			[OXEXP004_PaisH_ST] = @PAIS
			,[OXEXP004_ExportadorH_ST] = @EXPORTADORH
			,[OXEXP004_ProductoIdentificados_ST] = @PRODUCTOS
			,[OXEXP004_Familia_ST] = @FAMILIA
			,[OXEXP004_Clasificacion_ST] = @CLASIFICACION
			,[OXEXP004_DescripcionQuimica_ST] = @DESCRIP_QUIM
			,[OXEXP004_CompradorH_ST] = @COMPRADOR
			WHERE OXEXP004_ID_IN = @INT_ID
			--BT PAIS
			IF @PAIS <> 'INFORMACIÓN INSUFICIENTE'
			BEGIN 
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_PaisH_BT] = 1
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			ELSE 
			BEGIN
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_PaisH_BT] = 0
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			--BT EXPORTADOR
			IF @EXPORTADORH <> 'INFORMACIÓN INSUFICIENTE'
			BEGIN 
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_ExportadorH_BT] = 1
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			ELSE 
			BEGIN
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_ExportadorH_BT] = 0
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			-- BT PRODUCTOS IDENTIFICADOS 
			IF @PRODUCTOS <> 'INFORMACIÓN INSUFICIENTE'
			BEGIN 
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_ProductoIdentificados_BT] = 1
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			ELSE 
			BEGIN
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_ProductoIdentificados_BT] = 0
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			-- BT FAMILIA 
			IF @FAMILIA <> 'INFORMACIÓN INSUFICIENTE'
			BEGIN 
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_Familia_BT] = 1
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			ELSE 
			BEGIN
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_Familia_BT] = 0
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			-- BT CALSIFICACION
			IF @CLASIFICACION <> 'INFORMACIÓN INSUFICIENTE'
			BEGIN 
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_Clasificacion_BT] = 1
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			ELSE 
			BEGIN
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_Clasificacion_BT] = 0
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			-- BT DESCRIP_QUIM
			IF @DESCRIP_QUIM <> 'INFORMACIÓN INSUFICIENTE'
			BEGIN 
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_DescripcionQuimica_BT] = 1
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			ELSE 
			BEGIN
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_DescripcionQuimica_BT] = 0
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			-- BT COMPRADOR
			IF @COMPRADOR <> 'INFORMACIÓN INSUFICIENTE'
			BEGIN 
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_CompradorH_BT] = 1
				WHERE OXEXP004_ID_IN = @INT_ID
			END
			ELSE 
			BEGIN
				UPDATE OXEXP004_FraccionPreAnalisis
				SET [OXEXP004_CompradorH_BT] = 0
				WHERE OXEXP004_ID_IN = @INT_ID
			END
		END
		COMMIT TRANSACTION UPDATE_EXP_PA;
	END TRY
	--Control de errores
	BEGIN CATCH 
       --SELECT 
       --	ERROR_MESSAGE() AS errMessage
       ROLLBACK TRANSACTION UPDATE_EXP_PA;
	END CATCH
END	
GO