Из ORACLE в PostgreSQL

FUNCTION execute_sql ( p_sql_block varchar2, p_par varchar2 DEFAULT NULL ) RETURN INTEGER IS 
    v_status     INTEGER;
    v_cursor     INTEGER;
    v_count      INTEGER := 0;
    v_param varchar2(2000) := p_par;
    v_par   BOOLEAN := NOT p_par IS NULL;
BEGIN
    v_cursor := dbms_sql.open_cursor;
    v_status := dbms_sql.last_sql_function_code;
    IF NOT dbms_sql.is_open(v_cursor) THEN
        error('EXEC_ERROR','DBMS_SQL.OPEN_CURSOR: Can not open cursor, status = ' || to_char(v_status));
    END IF;
    dbms_sql.parse(v_cursor, p_sql_block, dbms_sql.native);
    IF v_par THEN
        dbms_sql.bind_variable(v_cursor,':RES', v_param, 2000);
    END IF;
    v_count := dbms_sql.execute(v_cursor);
    IF v_par THEN
        dbms_sql.variable_value(v_cursor,':RES', v_param);
        v_count := v_param;
    END IF;
    v_status := dbms_sql.last_sql_function_code;
    dbms_sql.close_cursor(v_cursor);
    RETURN v_count;
  exception WHEN others THEN
    IF dbms_sql.is_open( v_cursor ) THEN
        dbms_sql.close_cursor( v_cursor );
    END IF;
RETURN NULL;
END execute_sql;