WITH
        --q AS (SELECT 'Машина упаковочная пневматическая ПМУ-002' NAME FROM dual),
        --q AS (SELECT 'Комплекс отладочный ПРТХ 656141.074' NAME FROM dual),
        --q AS (SELECT 'Коммутатор Zyxel IES-1000 EE в комплекте' NAME FROM dual),
        q AS (SELECT TRANSLATE_PKG.get_true_word(p_name) NAME FROM dual),
        --q AS (SELECT 'Диван кожаный' NAME FROM dual),



        T AS (SELECT NAME, LENGTH(NAME) l FROM q)
        --SELECT * FROM t;
        ,
        t1 AS
        (
        SELECT SUBSTR(NAME, LEVEL, 1) b, LEVEL l, NAME
          FROM T
        connect BY LEVEL <= l
        )
        --SELECT * FROM t1;
        ,
        words AS
        (
        SELECT listagg(b) WITHIN GROUP(ORDER BY l) rus,
               DENSE_RANK() OVER(ORDER BY MIN(l)) dr, MIN(l) min_l
        FROM
            (
            SELECT 
                   CASE
                        WHEN is_russian_lead = 1 AND is_russian_lag=1 THEN
                            CASE WHEN LOWER(B) IN 'p' THEN 'р'
                                 WHEN LOWER(B) IN 'o' THEN 'о'
                                 WHEN LOWER(B) IN 'a' THEN 'а'
                                 ELSE b
                            END
                        ELSE b
                   END b,
                   l, is_letter, SUM(is_letter) OVER(ORDER BY L) grp
              FROM(
                SELECT b, l,
                       CASE
                            WHEN b BETWEEN '0' AND '9' THEN 0
                            WHEN LOWER(b) BETWEEN 'a' AND 'z' THEN 0
                            WHEN LOWER(b) BETWEEN 'а' AND 'я' THEN 0
                            ELSE 1
                       END IS_LETTER,
                       lead(CASE WHEN LOWER(b) BETWEEN 'а' AND 'я' THEN 1 END) OVER(ORDER BY l) is_russian_lead,
                       lag (CASE WHEN LOWER(b) BETWEEN 'а' AND 'я' THEN 1 END) OVER(ORDER BY l) is_russian_lag,
                       CASE WHEN LOWER(b) BETWEEN 'а' AND 'я' THEN 1 END is_russian
                  FROM t1
                  )
            )
        GROUP BY is_letter, grp
        ),
        DATA AS
        (
        SELECT DUMP(w.rus), w.*,
               CASE
                    WHEN w.rus = INITCAP(w.rus) THEN INITCAP(d.UKR)
                    WHEN w.rus = UPPER  (w.rus) THEN UPPER  (d.UKR)
                    ELSE LOWER(d.UKR)
               END UKR,
               MAX(dr) OVER() dr_max,
               CASE WHEN d.UKR IS NULL THEN
                    CASE
                        WHEN LENGTH(' '||TRANSLATE(LOWER(w.rus), 'ф-xх1234567890*()[],.+/=#№?&@', 'ф'))<=3 THEN w.rus
                    END
               END skipped,
               skp.rus skipped_spr,
               -- если есть несколько вариантов расшифровки, возьмём тот, который совпалдает по номеру группы)
               DENSE_RANK() OVER(PARTITION BY dr ORDER BY d.group_mater) dr_group 
          FROM words w,
               (SELECT * FROM DICTIONARY_RUS_UKR d WHERE D.GROUP_MATER IS NULL OR D.GROUP_MATER = p_group_mater) d,
               DICTIONARY_RUS_UKR_SKIPPED skp
         WHERE d.rus_lower  (+) = LOWER(w.rus)
           AND skp.rus_lower(+) = LOWER(w.rus)
         ORDER BY
               w.dr
        )
        --SELECT *   FROM DATA;

        SELECT DISTINCT
               rus, UKR, LEVEL,
               -- из-за того, что разделителем в SYS_CONNECT_BY_PATH не может быть спецсимвол, а разделитель нужен обязательно,
               -- мы букву 'а' меняем на CHR(1) и эту букву 'а' уже используем в SYS_CONNECT_BY_PATH в качестве разделителя,
               -- потом ее удаляем как ненужную, а затем меняем CHR(1) назад на 'а'
               REPLACE(REPLACE(SYS_CONNECT_BY_PATH(REPLACE(NVL(UKR, rus)        , 'а', CHR(1)), 'а'), 'а', ''), CHR(1), 'а') UKR_result,
               REPLACE(REPLACE(SYS_CONNECT_BY_PATH(REPLACE(CASE WHEN UKR||skipped||skipped_spr IS NULL THEN rus||' ' END
                                                                                , 'а', CHR(1)), 'а'), 'а', ''), CHR(1), 'а') not_found,
               REPLACE(REPLACE(SYS_CONNECT_BY_PATH(REPLACE(skipped    ||' '     , 'а', CHR(1)), 'а'), 'а', ''), CHR(1), 'а') skipped,
               REPLACE(REPLACE(SYS_CONNECT_BY_PATH(REPLACE(skipped_spr||' '     , 'а', CHR(1)), 'а'), 'а', ''), CHR(1), 'а') skipped_spr
          FROM (SELECT * FROM DATA WHERE dr_group=1)
        WHERE dr = dr_max
        start WITH dr=1
        connect BY PRIOR dr = dr-1