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

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

Спасибо!
...
Рейтинг: 0 / 0
21.12.2009, 15:21
    #36377725
servit
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kak сохранить все переменные которие использовались в процедуре?
...
Рейтинг: 0 / 0
21.12.2009, 16:13
    #36377887
Alex Bizi
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kak сохранить все переменные которие использовались в процедуре?
Дает только значение глобальных перемнных, котоые пришли через квадратные скобки
...
Рейтинг: 0 / 0
21.12.2009, 18:02
    #36378216
Alexey Maslov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kak сохранить все переменные которие использовались в процедуре?
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
21.12.2009, 18:10
    #36378239
visius
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kak сохранить все переменные которие использовались в процедуре?
Где-то так:
S A="" For X "S A=$O("_A_")" Q:A="" If A'="A" X "M ^ERSTK($J,A)="_A

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


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