Abrir Arquivo do Servidor via Forms

[djoq]

Olá, pessoal! Tenho uma tela em Forms 6, onde fiz o código abaixo para abrir um arquivo que está no servidor.
Porém o arquivo abre vazio, como se não lesse o conteúdo. Alguém sabe me dizer o que fiz errado?
Obrigada

Selecionar tudo

DECLARE    
    
   V_SAIDA                  TEXT_IO.FILE_TYPE;
   V_ARQUIVO                VARCHAR2(500);
   
BEGIN    
   
   V_ARQUIVO := GET_FILE_NAME('I:\', :FAT20141.NM_ARQUIVO, NULL , NULL, OPEN_FILE, TRUE);


   BEGIN
        V_SAIDA := TEXT_IO.FOPEN(V_ARQUIVO, 'W');
          TEXT_IO.FCLOSE (V_SAIDA);
     EXCEPTION
          WHEN OTHERS THEN
             NULL;
     END;    

     OPEN_EXT_FILE(V_ARQUIVO);

   EXCEPTION
        WHEN OTHERS THEN
           IF SQLCODE <> -100501 THEN
              MESSAGE('Erro ao abrir o arquivo: '||SQLERRM);
              MESSAGE(' ');
           END IF;               
END;

[djoq]

O código estava errado, de tantas tentativas não percebi que ficou uma parte desnecessária. Esse é o código:

Selecionar tudo

DECLARE   
   
   V_SAIDA                  TEXT_IO.FILE_TYPE;
   V_ARQUIVO                VARCHAR2(500);
   
BEGIN   
   
   V_ARQUIVO := GET_FILE_NAME('I:\', :FAT20141.NM_ARQUIVO, NULL , NULL, OPEN_FILE, TRUE);

   OPEN_EXT_FILE(V_ARQUIVO);

   EXCEPTION
        WHEN OTHERS THEN
           IF SQLCODE <> -100501 THEN
              MESSAGE('Erro ao abrir o arquivo: '||SQLERRM);
              MESSAGE(' ');
           END IF;               
END;

Agora funcionou perfeitamente para abrir arquivos xls e txt. Mas eml e doc não abre, aparece a seguinte mensagem:
O nome do documento ou caminho não é válido.

Alguma sugestão??

[Renato Menezes Viana]

Amigo: dá uma olhada na sugestão do link abaixo:

http://glufke.net/oracle/viewtopic.php? ... ra+arquivo

Abs