Спасибо всем за советы.
Задача абсурдна изначально. Логи будут смотреть не админы, а те, кто запускает процессы, таких людей тут называют оперэйшенс и они часто далеки от программирования. Поиском пользоваться НЕ будут 99%, оставшийся 1% устраивает браузерный поиск.
В логах максимальная длина строки строго ограничена, поэтому подогнать ширину окна к ограничению и обойтись без горизонтальной прокрутки показалось очевидным решением.
Ширину окна подогнала через теплейт. Там есть параметр Dialog Width.
Для красоты отображения пришлось преобразовать перевод каретки и знаки > и < к HTML формату. Для замены символов использовала функцию из блога Т.Кайта.
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
create or replace function f_lob_replace(
in_clob IN CLOB, in_replace_string IN VARCHAR2, in_replace_with IN VARCHAR2)
/**
* Replaces all Occurrences of a String with another within a CLOB
* Original Source see: http://66.221.222.85/reference/dbms_lob.html
* @AUTHOR: AM, 20101021,
* @PARAM: in_clob IN CLOB,
* in_replace_string IN VARCHAR2,
* in_replace_with IN VARCHAR2
* @RETURN: CLOB
* @EXCEPTION:
* @SEE:
*/
RETURN CLOB
IS
lc_this_unit_name CONSTANT VARCHAR2 (30) := 'REPLACE4';
--
lv_buffer VARCHAR2 (32767);
lv_amount BINARY_INTEGER := 16000;
lv_pos PLS_INTEGER := 1;
lv_clob_len PLS_INTEGER;
lv_retval CLOB := EMPTY_CLOB;
BEGIN
-- initalize the new clob (lv_retval)
DBMS_LOB.createtemporary (lv_retval, TRUE);
lv_clob_len := DBMS_LOB.getlength (in_clob);
WHILE lv_pos <= lv_clob_len
LOOP
DBMS_LOB.read (in_clob,
lv_amount,
lv_pos,
lv_buffer);
IF lv_buffer IS NOT NULL
THEN
-- replace the text
loop
exit when instr(lv_buffer,in_replace_string) = 0;
lv_buffer := REPLACE (lv_buffer, in_replace_string, in_replace_with);
end loop;
-- write it to the new clob (lv_retval)
DBMS_LOB.writeappend (lv_retval, LENGTH (lv_buffer), lv_buffer);
END IF;
lv_pos := lv_pos + lv_amount;
END LOOP;
RETURN lv_retval;
--
EXCEPTION
WHEN OTHERS
THEN
RAISE;
END ;
