Question

我在SYSTEM模式下成功编译了一个过程。

create or replace procedure get_file_list as

    ns      varchar2(1024);
    cursor c_my_directory is
        select directory_name, directory_path from all_directories where directory_path like '/home/oracle/EDI%';
begin

    -- before generating the file list, the temporary table is deleted
    delete from edi.temp_EDI_file_list;

    for each_directory in c_my_directory loop
        -- it reads the contents of my_directory into a table called X$FRBMSFT
        sys.dbms_backup_restore.searchfiles (each_directory.directory_path, ns);

        for each_file in (select fname_krbmsft as name from X$KRBMSFT) loop
            insert into edi.temp_edi_file_list
            values (each_directory.directory_name, each_file.name);
        end loop;
    end loop;

    commit;

    exception
        when others then 
            raise_application_error (-20001,sqlcode || ' ' || sqlerrm);

end get_file_list;

[..它是在SYSTEM模式下创建的，因为不允许我将X $ FRBMSFT上的选择授予用户“ edi”]。

我在此过程中授予用户“ edi”执行特权。 [..作为SYSTEM连接，角色为SYSDBA，我执行了grant execute on system.get_file_list to EDI;]

当我尝试与用户“ edi”执行过程（execute system.get_file_list;）时，返回错误

PLS-00905：对象SYSTEM.GET_FILE_LIST无效

请问有人可以告诉我我在做什么错吗？

谢谢

Answer 1

最后，在@APC提供的link的帮助下，我设法创建了该过程。

...选择为SYSTEM

create or replace view file_list as select fname_krbmsft from X$KRBMSFT readonly;

create or replace procedure searchfiles (pattern in out nocopy varchar2, ns in out nocopy varchar2) authid definer as
begin
    dbms_backup_restore.searchfiles(pattern, ns);
end searchfiles;

GRANT SELECT ON FILE_LIST TO EDI;
GRANT EXECUTE ON SEARCHFILES TO EDI;

...选择为EDI

create or replace procedure get_file_list as

    ns      varchar2(1024);
    cursor c_my_directory is
        select directory_name, directory_path from all_directories where directory_path like '/home/oracle/EDI%';
begin

    -- before generating the file list, the temporary table is deleted
    delete from edi.temp_EDI_file_list;

    for each_directory in c_my_directory loop
        -- it reads the contents of all directories into a table called X$FRBMSFT via procedure SEARCHFILES
        sys.SEARCHFILES (each_directory.directory_path, ns);

        -- it interogate the X$FRBMSFT via file_list view
        for each_file in (select fname_krbmsft as name from sys.file_list) loop
            insert into temp_edi_file_list
            values (each_directory.directory_name, each_file.name);
        end loop;
    end loop;

    commit;

    exception
        when others then 
            raise_application_error (-20001,sqlcode || ' ' || sqlerrm);

end get_file_list;

区别在于它们被称为由用户SYSTEM创建的对象的方式。它们是用SYS.xxx而不是SYSTEM.xxx调用的。

SYSTEM下的过程无效

1 个答案: