USE DAGAZ	
	IF OBJECT_ID('NET_INSERT_UNIDADE') IS NOT NULL
		DROP PROC NET_INSERT_UNIDADE

	GO
		CREATE PROC NET_INSERT_UNIDADE
	(
			  @pCodUnidade INT = NULL
			,@pUnidade VARCHAR(255) =  NULL 
			,@pStatus INT = NULL
			,@pCodUsuario INT = NULL
			,@pDataCadastro DATETIME = NULL
			,@PMessageErr VARCHAR(150) =  NULL OUTPUT
	)
	AS 
		
		BEGIN
			SET NOCOUNT ON
			
			IF @pCodUnidade = 0 OR @pCodUnidade IS NULL 
				BEGIN

	IF NOT EXISTS(SELECT CodUnidade FROM NET_UNIDADE WHERE Unidade= @pUnidade )
		INSERT INTO NET_UNIDADE
							(      
								 Unidade
								,Status
								,CodUsuario
								,DataCadastro
							)VALUES
							(
								  @pUnidade
								,@pStatus
								,@pCodUsuario
								,@pDataCadastro
							)
					ELSE 
								SET @PMessageErr = 'Esta unidade  ja existe.Verifique!' ;
			END
		ELSE
	IF NOT EXISTS(SELECT CodUnidade FROM NET_UNIDADE WHERE Unidade= @pUnidade  And CodUnidade <> @pCodUnidade )
						UPDATE    NET_UNIDADE
									SET               
											  Unidade = @pUnidade
											,Status = @pStatus
											,CodUsuario = @pCodUsuario
											,DataCadastro = @pDataCadastro
									WHERE     
														CodUnidade = @pCodUnidade
						ELSE
								SET @PMessageErr = 'Esta unidade  ja existe.Verifique!' ;


					SELECT @PMessageErr  As MessageReturn;
			SET NOCOUNT OFF 
	END 
