Início / dba / Perguntas / 88740
Accepted
Dzyann
Asked: 2015-01-08 06:55:34 +0800 CST

Como criar arquivo de script com PL/SQL?

  • 772

Eu tenho que atualizar vários objetos em muitas instâncias. Para conseguir isso, estou usando DBMS_METADATA para criar as instruções DDL.

Até agora, tenho as instruções DDL e as salvo em uma TABLE. Gostaria de salvar as referidas instruções DDL em um arquivo .sql para cada objeto.

Sei que posso fazer isso com C#, mas até agora consegui fazer tudo o que precisava com PL/SQL. Existe uma maneira de criar os arquivos .sql com PL/SQL?

oracle plsql

1 respostas

  1. Best Answer

    Isso é relativamente fácil. Usando o pacote UTL_FILE no Oracle, você pode criar um arquivo no sistema de arquivos do servidor e gravar a saída de qualquer instrução PL/SQL nele. Na verdade, você também pode usá-lo para ler dados de um arquivo. http://psoug.org/reference/utl_file.html

    Você também pode querer ler um pouco sobre o tipo de objeto Directory, já que é um pré-requisito para usar o pacote UTL_FILE; http://psoug.org/reference/directories.html

    -- Aqui está um exemplo de um procedimento que grava dados ascii em um objeto de diretório Oracle existente. O usuário que executa o código precisa ter acesso de leitura/gravação ao objeto Oracle Directory.

    CREATE PROCEDURE put_local_ascii_data (p_data  IN  CLOB,
                                    p_dir   IN  VARCHAR2,
                                    p_file  IN  VARCHAR2) IS
    -- --------------------------------------------------------------------------
      l_out_file  UTL_FILE.file_type;
      l_buffer    VARCHAR2(32767);
      l_amount    BINARY_INTEGER := 32767;
      l_pos       INTEGER := 1;
      l_clob_len  INTEGER;
    BEGIN
      l_clob_len := DBMS_LOB.getlength(p_data);

      l_out_file := UTL_FILE.fopen(p_dir, p_file, 'w', 32767);

      WHILE l_pos <= l_clob_len LOOP
        DBMS_LOB.read (p_data, l_amount, l_pos, l_buffer);
        IF g_convert_crlf THEN
          l_buffer := REPLACE(l_buffer, CHR(13), NULL);
        END IF;

        UTL_FILE.put(l_out_file, l_buffer);
        UTL_FILE.fflush(l_out_file);
        l_pos := l_pos + l_amount;
      END LOOP;

      UTL_FILE.fclose(l_out_file);
    EXCEPTION
      WHEN OTHERS THEN
        IF UTL_FILE.is_open(l_out_file) THEN
          UTL_FILE.fclose(l_out_file);
        END IF;
        RAISE;
    END;

    O parâmetro p_data é um CLOB que (neste caso) conteria todos os dados ASCII sendo gravados no diretório p_dir e o nome do p_file (que é criado em tempo de execução). Pode ser necessário fazer algumas conversões clob em seus dados, dependendo dos tipos de dados nos resultados da consulta que você usaria para preencher o objeto clob.

    • 1

relate perguntas