CREATE OR REPLACE FUNCTION ShowUnitOfMeasure() RETURNS SETOF UnitOfMeasure AS 
	$$
	SELECT UnitOfMeasureID, UnitOfMeasureName
	FROM UnitOfMeasure 
	$$ 
LANGUAGE SQL;

CREATE OR REPLACE FUNCTION InsUnitOfMeasure (InUnitOfMeasureName varchar( 50 ),
         OUT textError text, OUT codeError int) RETURNS record AS $$ 

	BEGIN
		IF ($ 1  ISNULL) THEN
			RAISE EXCEPTION 'Отсутствует входное значение!';		
		END IF;
		INSERT INTO UnitOfMeasure (UnitOfMeasureName)
		VALUES ($ 1 );
		codeError =  0 ;

	EXCEPTION
		WHEN OTHERS THEN
			IF sqlstate = 'P0001' THEN
				textError := sqlerrm ;
				codeError :=  1 ;
			ELSE 
				textError := sqlerrm || '  ' || sqlstate;
				codeError :=  2 ;			
			END IF;			
	END;
$$ LANGUAGE plpgsql;

CREATE PROC ShowObject 
AS
SELECT ObjectID, ObjectName 
FROM Object
RETURN( 0 )
GO