powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / Kak сохранить все переменные которие использовались в процедуре?
6 сообщений из 6, страница 1 из 1
Kak сохранить все переменные которие использовались в процедуре?
    #36377617
Alex Bizi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Пример:

Kuku(x,y,z) [k,l,m] public
{
s $ze="",$zt="kukuZT"
s a=x
s b=yy // error!!!
q
kukuZT
что надо написть здесь чтоб сохранить все переменные которие использовались в процедуре?
q
}

Спасибо!
...
Рейтинг: 0 / 0
Kak сохранить все переменные которие использовались в процедуре?
    #36377725
servit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Kak сохранить все переменные которие использовались в процедуре?
    #36377887
Alex Bizi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Дает только значение глобальных перемнных, котоые пришли через квадратные скобки
...
Рейтинг: 0 / 0
Kak сохранить все переменные которие использовались в процедуре?
    #36378216
Alexey Maslov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Alex Bizi, это "by design". Хорошо известный метод, опубликованный на "кашевар", расчитан на использование обычных подпрограмм и функций, либо методов классов, помеченных как [ Not ProcedureBlock ]. Может быть, чем-то поможет системный перехватчик BACK^%ETN? никогда не пробовал его с процедурами.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Kuku(x,y,z) [k,l,m] public
{
 s $ze="",$zt="kukuZT"
 s a=x
 s b=yy // error!!!
 q
kukuZT
 d BACK^%ETN
 q
}
Переменные потом попадают в ^ERRORS, можно просматривать в Портале, либо через do ^%ER, либо своими средствами.
...
Рейтинг: 0 / 0
Kak сохранить все переменные которие использовались в процедуре?
    #36378239
visius
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Где-то так:
S A="" For X "S A=$O("_A_")" Q:A="" If A'="A" X "M ^ERSTK($J,A)="_A

отправляет все локальные переменные, за исключением A в глобаль ^ERSTK под номером процесса
...
Рейтинг: 0 / 0
Kak сохранить все переменные которие использовались в процедуре?
    #36379272
L
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
L
Гость
Alexey Maslov,
Спасибо, ето именно то 4то мне надо...
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / Kak сохранить все переменные которие использовались в процедуре?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]