-1

我是新手PostgreSQL，我需要有人为我指明如何将函数结果写入文本文件的正确方向。PL/pgSQL 是否可以在 PostgreSQL语言中做到这一点？我在Oracle使用UTL_FILE命令之前已经这样做了，我希望它PostgreSQL具有类似的功能。提前感谢您提供的任何帮助。

请提供一些文件操作的示例。

        CREATE OR REPLACE FUNCTION NP_AC015_FETCH.proc_log (P_MSG text, P_MODE integer default 1) RETURNS VOID AS $body$
    DECLARE

        V_F_IS_OPEN boolean;      --IF LOG FILE IS ALREADY OPEN THIS IS SET TO TRUE
        V_LOG_MSG varchar(32767); --LOG FILE NAME
        V_LOG_DIR varchar(30) := 'ND_GANJIS_LOG_DIR'; --LOG DIRECOTY

        vTemp UTL_FILE.FILE_TYPE;
    BEGIN
        select get_var('GM_LOG_FILE') INTO vTemp;

        V_F_IS_OPEN := utl_file.is_open(vTemp);

        if not V_F_IS_OPEN then

          -- Log File Open
          -- 32767 IS THE MAXIMUM NUMBER OF CHARACTERS PER LINE, INCLUDING THE NEWLINE CHARACTER, FOR THIS FILE.
          vTemp := UTL_FILE.FOPEN(V_LOG_DIR, 'NIA_PLSQL_'||to_char(clock_timestamp(), 'yyyymmdd')||'.log', 'A', 32767);

        end if;

        -- LOG MSG TO BE WRITTEN TO THE LOG FILE
        V_LOG_MSG := TO_CHAR(CURRENT_TIMESTAMP, 'yyyy/mm/dd hh24:mi:ss:ff3') ||' '|| P_MSG;

        --Output messages to a file
        UTL_FILE.PUT_LINE(vTemp, V_LOG_MSG);

    --Closing Log File
    if P_MODE = current_setting('NP_AC015_FETCH.PV_LOG_CLOSE_MODE')::pls_integer and utl_file.is_open(vTemp) then

          utl_file.fclose(vTemp);

    end if;

    --HERE THE EXCEPTION PART IS NOT INCLUDED,
    --Reason： PROGRAM WILL GO ON INFINITE LOOP IF SOME ERROR OCCURS HERE, BECAUSE, EACH EXCEPTION WRITES INTO
    --LOG FILE, USING THIS PROCEDURE.
   exception

    when others then

      RAISE EXCEPTION '%', dbms_utility.format_error_backtrace||chr(10)||dbms_utility.format_error_stack||chr(10)||dbms_utility.format_call_stack, true;

    END;
$body$
LANGUAGE PLPGSQL;
4

1 回答 1

0

您可以安装adminpackcontrib 模块并使用该功能pg_file_write(filename text, data text, append boolean)。

请注意，此功能仅限于超级用户，但您可以创建一个SECURITY DEFINER由超级用户拥有的功能，为您选择的用户提供必要的功能。

于 2017-04-20T10:10:17.440 回答