как получить 2-ую и последнюю строку файла, используя UTL_FILE - PullRequest
Новая
       8

как получить 2-ую и последнюю строку файла, используя UTL_FILE

0 голосов
/ 24 января 2019

У меня есть файл, который состоит из тысяч строк, и мне нужно получить часть 2-й строки (около 50 символов) и последнюю строку файла. Пожалуйста, порекомендуйте. Спасибо.

Я пытаюсь сделать что-то вроде UTL_FILE.READLINE (fileloc, filename, nrow, lastrow).

SAMPLE: Имя файла: CLOSED_SO_20190124.txt 

DATA in the FILE:
    0246608377|22795124004|
    650930363|1-8IGO3S82920|
    0245563264|22669075004|
    0245563264|22669075004|
    164260364|1-2DFE-6573219|
    650821459|1-6HWQUF11209|

EXPECTED OUTPUT:

    650930363|1-8IGO3S82920|
    650821459|1-6HWQUF11209|

Ответы [ 2 ]

0 голосов
/ 25 января 2019

Вот пример.

Имя каталога и его местонахождение, а также пример файла содержимого: 

SQL> select directory_name, directory_path from all_directories;

DIRECTORY_NAME                 DIRECTORY_PATH
------------------------------ --------------------
EXT_DIR                        c:\temp

SQL> $type c:\temp\sofile.txt
0246608377|22795124004|
650930363|1-8IGO3S82920|
0245563264|22669075004|
0245563264|22669075004|
164260364|1-2DFE-6573219|
650821459|1-6HWQUF11209|
SQL>

Процедура: локальный счетчик (l_cnt) знает номер строки; если оно равно 2, отобразите эту строку. Кроме того, когда ничего не найдено (поэтому выполняется раздел обработчика исключений), я достиг конца файла, поэтому я также отображаю последнюю строку. 

SQL> set serveroutput on
SQL>
SQL> declare
  2    l_file utl_file.file_type;
  3    l_dir  varchar2(20) := 'EXT_DIR';
  4    l_name varchar2(20) := 'sofile.txt';
  5    l_line varchar2(50);
  6    l_cnt  number := 0;
  7  begin
  8    l_file := utl_file.fopen (l_dir, l_name, 'R');
  9    loop
 10      begin
 11        utl_file.get_line(l_file, l_line);
 12        l_cnt := l_cnt + 1;
 13        if l_cnt = 2 then
 14           dbms_output.put_line('2nd : ' || l_line);
 15        end if;
 16      exception
 17        when no_data_found then
 18          dbms_output.put_line('last: ' || l_line);
 19          exit;
 20      end;
 21    end loop;
 22    utl_file.fclose(l_file);
 23  end;
 24  /
2nd : 650930363|1-8IGO3S82920|
last: 650821459|1-6HWQUF11209|

PL/SQL procedure successfully completed.

SQL>
0 голосов
/ 24 января 2019

В Oracle 11g 

select col 
from 
(
  select 
    rownum AS rnum, 
    LEFT(myCol, 50) col
  from Table1
  where Rownum < 3
)
WHERE rnum = 2

В Oracle 12c 

select LEFT(mycol, 50) col
from Table1
ORDER BY val
OFFSET 2 ROWS FETCH NEXT 1 ROWS ONLY;

Для последнего ряда 

select LEFT(mycol, 50) col
from my_table
where pk = ( select max(pk) from my_table )

тогда вы можете объединить их

...