PG_CONTEXT как аргумент

@MConst · Регистрация: 16.04.2022

Студворк — интернет-сервис помощи студентам

Здравствуйте!

Есть такой код с записью в лог-таблицу.

Кликните здесь для просмотра всего текста

SQL
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
--Лог-таблица
DROP TABLE IF EXISTS test1.logTable1;
CREATE TABLE test1.logTable1 ("datetime" TIMESTAMP, "nameProcedure" VARCHAR(200));
 
--Процедура, которая непосредственно записывает в лог-таблицу
DROP PROCEDURE IF EXISTS test1.recordLog(text);
CREATE PROCEDURE test1.recordLog("@stack" text)
LANGUAGE plpgsql
AS $procedure$
DECLARE
    "v_fcesig" text = SUBSTRING("@stack" FROM '(\S+)\(');
    "v_datetime" TIMESTAMP = clock_timestamp();
BEGIN   
    INSERT INTO test1.logTable1 ("datetime", "nameProcedure")
    SELECT
        "v_datetime",
        "v_fcesig"
    ;   
END;
$procedure$
 
DROP PROCEDURE IF EXISTS test1.myProcedure1();
CREATE PROCEDURE test1.myProcedure1()
LANGUAGE plpgsql
AS $procedure$
DECLARE
    "v_stack" text;
BEGIN
    GET DIAGNOSTICS "v_stack" = PG_CONTEXT;
    CALL test1.recordLog("v_stack");
END;
$procedure$;
 
CALL test1.myProcedure1();
SELECT * FROM test1.logTable1;

Скажите, возможно ли написать короче, так чтобы в каждой процедуре не писать такую запись

SQL
1
2
3
4
5
6
...
DECLARE
    "v_stack" text;
...
    GET DIAGNOSTICS "v_stack" = PG_CONTEXT;
...

и при вызываемой процедуры test1.recordLog в аргументе сразу написать типа PG_CONTEXT?

@Swa111 · 24.01.2024, 12:15

Оберните в функцию, при извлечении пропустите одну строку.

@MConst · 24.01.2024, 12:36 **[ТС]**

Кликните здесь для просмотра всего текста

SQL
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
--Лог-таблица
DROP TABLE IF EXISTS test1.logTable1;
CREATE TABLE test1.logTable1 ("datetime" TIMESTAMP, "nameProcedure" VARCHAR(200));
 
DROP FUNCTION IF EXISTS test1.myFunction1();
CREATE FUNCTION test1.myFunction1()
RETURNS text
LANGUAGE plpgsql
AS $function$
DECLARE
    "v_stack" text;
BEGIN
    GET DIAGNOSTICS "v_stack" = PG_CONTEXT;
    RETURN "v_stack";
END;
$function$;
 
--Процедура, которая непосредственно записывает в лог-таблицу
DROP PROCEDURE IF EXISTS test1.recordLog(text);
CREATE PROCEDURE test1.recordLog("@stack" text)
LANGUAGE plpgsql
AS $procedure$
DECLARE
    "v_fcesig" text = SUBSTRING("@stack" FROM '(\S+)\(');
    "v_datetime" TIMESTAMP = clock_timestamp();
BEGIN   
    INSERT INTO test1.logTable1 ("datetime", "nameProcedure")
    SELECT
        "v_datetime",
        "v_fcesig"
    ;   
END;
$procedure$;
 
DROP PROCEDURE IF EXISTS test1.myProcedure1();
CREATE PROCEDURE test1.myProcedure1()
LANGUAGE plpgsql
AS $procedure$
BEGIN
    CALL test1.recordLog(test1.myFunction1());
END;
$procedure$;
 
 
CALL test1.myProcedure1();
SELECT * FROM test1.logTable1;

Обвернул в функцию, но возвращает не название процедуры, а название функции.

@Swa111 · 24.01.2024, 13:24

Oracle 11 SQL
1
2
3
4
5
6
7
8
9
10
11
CREATE FUNCTION test1.myFunction1()
RETURNS text
LANGUAGE plpgsql
AS $function$
DECLARE
    "v_stack" text;
BEGIN
    GET DIAGNOSTICS "v_stack" = PG_CONTEXT;
    RETURN substring("v_stack" FROM '\n.+?(\S+)\(');
END;
$function$;

@MConst · 24.01.2024, 14:18 **[ТС]**

Подскажите, как в выражении '\n.+?(\S+)\(' пропустить еще строку?

@Swa111 · 24.01.2024, 15:12

Code
1
\n.+\n.+?(\S+)\(

@MConst · 24.01.2024, 15:26 **[ТС]**

Получился такой код

Кликните здесь для просмотра всего текста

SQL
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
--Лог-таблица
CREATE TABLE test1.logTable1 ("datetime" TIMESTAMP, "nameProcedure" VARCHAR(200));
 
CREATE FUNCTION test1.myFunction1()
RETURNS text
LANGUAGE plpgsql
AS $function$
DECLARE
    "v_stack" text;
BEGIN
    GET DIAGNOSTICS "v_stack" = PG_CONTEXT;
    raise notice 'Вызвана функция test1.myFunction1';
    RETURN SUBSTRING("v_stack" FROM '\n.+?\n.+?(\S+)\(');
END;
$function$;
 
--Процедура, которая непосредственно записывает в лог-таблицу
CREATE PROCEDURE test1.recordLog("@nameProcedure" text)
LANGUAGE plpgsql
AS $procedure$
DECLARE
    "v_datetime" TIMESTAMP = clock_timestamp();
BEGIN   
    INSERT INTO test1.logTable1 ("datetime", "nameProcedure")
    SELECT
        "v_datetime",
        "@nameProcedure"
    ;   
END;
$procedure$;
 
CREATE PROCEDURE test1.myProcedure1()
LANGUAGE plpgsql
AS $procedure$
BEGIN
    CALL test1.recordLog(test1.myFunction1());
END;
$procedure$;
 
 
CALL test1.myProcedure1();
SELECT * FROM test1.logTable1;

Выводит
Вызвана функция test1.myFunction1
Вызвана функция test1.myFunction1

Почему при вызове процедуры test1.myProcedure1 функция test1.myFunction1 вызывается два раза?

@Swa111 · 24.01.2024, 15:35

Может быть Вы дважды запустили код?

@MConst · 25.01.2024, 10:03 **[ТС]**

А если вызывать главную процедуру, которая вызывает субпроцедуру, в которой определяется название.

SQL
1
2
3
4
5
6
7
8
9
10
CREATE PROCEDURE test1.mainProcedure()
LANGUAGE plpgsql
AS $procedure$
BEGIN
    CALL test1.myProcedure1();
END;
$procedure$;
 
CALL test1.mainProcedure();
SELECT * FROM test1.logTable1;

То выдает не как test1.myProcedure1, а как test1.mainProcedure. Возможно даже такое, что главная процедура вызывает субпроцедуру, которая вызывает субсубпроцедуру, в которой определяется название.

Скажите, этот фактор возможно учесть в регулярном выражении '\n.+\n.+?(\S+)\('?

@Swa111 · 25.01.2024, 10:55

Не понятно какого уровня имя Вам нужно?

Code
1
2
3
4
4. Процедура_определяющая_название()
3. СубПроцедура2()
2. СубПроцедура1()
1. ОсновнаяПроцедура()

@MConst · 25.01.2024, 11:07 **[ТС]**

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Если процедура ОсновнаяПроцедура() вызывает Функция_определяющая_название()
2. Функция_определяющая_название()
1. ОсновнаяПроцедура()
 
Если процедура СубПроцедура() вызывает Функция_определяющая_название()
3. Функция_определяющая_название()
2. СубПроцедура()
1. ОсновнаяПроцедура()
 
Если процедура СубСубПроцедура() вызывает Функция_определяющая_название()
4. Функция_определяющая_название()
3. СубСубПроцедура()
2. СубПроцедура()
1. ОсновнаяПроцедура()

@Swa111 · 25.01.2024, 11:25

т.е. имя pl/pgsql функции, которая вызвала Функция_определяющая_название()?

Зачем тогда Вы просили пропустить еще одну строку в ней как раз и должно быть имя процедуры

@MConst · 01.02.2024, 09:53 **[ТС]**

Другой вариант определения названия процедуры - с помощью current_query().

Кликните здесь для просмотра всего текста

SQL
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
CREATE FUNCTION test1.getNameCurrentProcedure("@current_query" text)
RETURNS VARCHAR(200)
LANGUAGE plpgsql
AS $function$
DECLARE
    "v_nameProcedure" VARCHAR(200);
BEGIN
    "v_nameProcedure" := SUBSTRING("@current_query" FROM '(\S+)\('); --Вытаскивает название схемы с процедурой 
    "v_nameProcedure" := regexp_replace("v_nameProcedure", '[^.]*[.]', ''); --Убирает название схемы
    RETURN "v_nameProcedure";    
END;
$function$; 
 
CREATE PROCEDURE test1.myProcedure1("@parameter1" INTEGER, "@parameter2" VARCHAR(20), "@parameter3" text DEFAULT NULL)
LANGUAGE plpgsql
AS $procedure$
BEGIN
    raise notice '%', (SELECT test1.getNameCurrentProcedure(current_query())); 
END;
$procedure$;
 
CREATE PROCEDURE test1.mainProcedure()
LANGUAGE plpgsql
AS $procedure$
BEGIN
    CALL test1.myProcedure1(1, 'Текст 2.');
END;
$procedure$;
 
--Запускаем и проверяем
CALL test1.myProcedure1(1, 'Текст 2.'); --возращает "myProcedure1". ОК
CALL test1.mainProcedure(); --возвращает "mainProcedure", вместо "myProcedure1". Не ОК

@avm71 · 18.04.2025, 17:09

Тоже интересует...

Видел обсуждение похожей темы здесь

Новые блоги и статьи Все статьи Все блоги /
PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .

@Swa111 912 / 286 / 57 Регистрация: 01.06.2023 Сообщений: 808
	24.01.2024, 12:15
	Оберните в функцию, при извлечении пропустите одну строку. 0

@MConst 2 / 2 / 1 Регистрация: 16.04.2022 Сообщений: 1,011
	24.01.2024, 14:18 [ТС]
	Подскажите, как в выражении '\n.+?(\S+)\(' пропустить еще строку? 0

@Swa111 912 / 286 / 57 Регистрация: 01.06.2023 Сообщений: 808
	24.01.2024, 15:35
	Может быть Вы дважды запустили код? 0

@Swa111 912 / 286 / 57 Регистрация: 01.06.2023 Сообщений: 808
	25.01.2024, 11:25
	т.е. имя pl/pgsql функции, которая вызвала Функция_определяющая_название()? Зачем тогда Вы просили пропустить еще одну строку в ней как раз и должно быть имя процедуры 0

@avm71 0 / 0 / 0 Регистрация: 18.02.2019 Сообщений: 32
	18.04.2025, 17:09
	Тоже интересует... Видел обсуждение похожей темы здесь 0