-- Создание таблицы логирования ошибок для таблицы employees
EXEC DBMS_ERRLOG.CREATE_ERROR_LOG('employees', 'err_employees');

-- Выполнение массовой вставки с логированием ошибок
INSERT INTO employees (id, name, salary)
SELECT emp_id, emp_name, emp_salary FROM source_data
LOG ERRORS INTO err_employees REJECT LIMIT UNLIMITED;

-- Вычисление хэша для строкового значения
DECLARE
    v_hash RAW(16);
BEGIN
    v_hash := DBMS_HASH.MD5('Hello, Digital Q.DataBase');
    DBMS_OUTPUT.PUT_LINE(RAWTOHEX(v_hash));
END;

-- Обновление статистики по указанной таблице
UPDATE STATISTICS employees;

-- Обновление статистики по конкретному индексу или статистическому объекту
UPDATE STATISTICS employees (ix_employees_name);

-- Обновление статистики с полным сканированием таблицы
UPDATE STATISTICS employees WITH FULLSCAN;

-- Обновление статистики с указанием процента выборки
UPDATE STATISTICS employees WITH SAMPLE 10 PERCENT;

-- Типовой скрипт обслуживания из MS SQL Server
EXEC sp_updatestats;  -- Вызов хранимой процедуры обновления статистики по всей БД

-- Или прямая команда
UPDATE STATISTICS sales.orders WITH FULLSCAN;

DECLARE
    v_doc DBMS_XMLDOM.DOMDocument;
    v_root DBMS_XMLDOM.DOMNode;
    v_elem DBMS_XMLDOM.DOMNode;
BEGIN
    -- Создание нового документа
    v_doc := DBMS_XMLDOM.newDOMDocument;
    v_root := DBMS_XMLDOM.makeNode(v_doc);
    
    -- Создание корневого элемента
    v_elem := DBMS_XMLDOM.createElement(v_doc, 'employees');
    v_root := DBMS_XMLDOM.appendChild(v_root, v_elem);
    
    -- Вывод документа
    DBMS_OUTPUT.PUT_LINE(DBMS_XMLDOM.getXMLType(v_doc).getClobVal);
END;

-- Простейшая генерация XML из результата запроса
DECLARE
    v_ctx DBMS_XMLGEN.ctxHandle;
    v_xml XMLType;
BEGIN
    v_ctx := DBMS_XMLGEN.newContext('SELECT id, name, salary FROM employees');
    v_xml := DBMS_XMLGEN.getXML(v_ctx);
    DBMS_OUTPUT.PUT_LINE(v_xml.getClobVal);
    DBMS_XMLGEN.closeContext(v_ctx);
END;

-- Генерация XML с настройкой формата
DECLARE
    v_ctx DBMS_XMLGEN.ctxHandle;
    v_xml CLOB;
BEGIN
    v_ctx := DBMS_XMLGEN.newContext('SELECT id, name FROM employees');
    DBMS_XMLGEN.setRowSetTag(v_ctx, 'employees_list');
    DBMS_XMLGEN.setRowTag(v_ctx, 'employee');
    v_xml := DBMS_XMLGEN.getXML(v_ctx);
    DBMS_OUTPUT.PUT_LINE(v_xml);
    DBMS_XMLGEN.closeContext(v_ctx);
END;

-- Вычисление MD5-хэша для строки
DECLARE
    v_hash RAW(16);
BEGIN
    v_hash := DBMS_CRYPTO.HASH(
        UTL_I18N.STRING_TO_RAW('Hello, Digital Q.DataBase', 'AL32UTF8'),
        DBMS_CRYPTO.HASH_MD5
    );
    DBMS_OUTPUT.PUT_LINE(RAWTOHEX(v_hash));
END;

-- Вычисление SHA-256 для проверки целостности данных
SELECT DBMS_CRYPTO.HASH(
    UTL_I18N.STRING_TO_RAW(data_column, 'AL32UTF8'),
    DBMS_CRYPTO.HASH_SH256
) AS data_hash
FROM my_table;

-- Преобразование JSON в текстовый вид
DECLARE
    v_json CLOB := '{"employees":[{"id":1,"name":"Иванов"},{"id":2,"name":"Петров"}]}';
    v_text CLOB;
BEGIN
    v_text := DBMS_REPORT.JSON_TO_TEXT(v_json);
    DBMS_OUTPUT.PUT_LINE(v_text);
END;

-- Декодирование и распаковка сжатых данных
DECLARE
    v_compressed_base64 VARCHAR2(32767); -- сжатые и закодированные данные
    v_decompressed CLOB;
BEGIN
    v_decompressed := DBMS_REPORT.ZLIB2BASE64_CLOB(v_compressed_base64);
    DBMS_OUTPUT.PUT_LINE(v_decompressed);
END;

-- Извлечение значения из XML-столбца
SELECT 
    id,
    xml_data.value('(/employee/name)[1]', 'varchar(100)') AS employee_name
FROM employees_xml;

-- Использование в условиях WHERE
SELECT *
FROM orders_xml
WHERE orders_xml.value('(/order/amount)[1]', 'decimal(10,2)') > 10000;

-- Извлечение поддерева XML
SELECT 
    id,
    xml_data.query('/employee/address') AS address_xml
FROM employees_xml;

-- Получение нескольких узлов
SELECT 
    xml_data.query('/order/items/item[@quantity > 1]') AS important_items
FROM orders_xml;

-- Развертывание списка сотрудников в строки
SELECT 
    id AS parent_id,
    node.value('(name)[1]', 'varchar(100)') AS name,
    node.value('(salary)[1]', 'int') AS salary
FROM departments_xml
CROSS APPLY xml_data.nodes('/department/employees/employee') AS ref(node);

-- Развертывание с фильтрацией
SELECT 
    node.value('(@id)[1]', 'int') AS product_id,
    node.value('(price)[1]', 'decimal(10,2)') AS price
FROM products_xml
CROSS APPLY xml_data.nodes('/catalog/product[price > 1000]') AS ref(node);

INSERT INTO documents (id, title, content_vector) 
VALUES (1, 'Заголовок документа', TXT2VEC('Содержимое документа...'));

SELECT title FROM documents
ORDER BY VECTOR_DISTANCE(content_vector, TXT2VEC('как предложить доработку в продукт?'))
LIMIT 5;

SELECT * FROM documents
WHERE doc_type = 'audio' AND date > '2026-01-01'
ORDER BY VECTOR_DISTANCE(content_vector, TXT2VEC('что делать, если появилась идея по развитию продукта'))
LIMIT 10;