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

Как можно чтобы значения системной переменной
$I из Cache:

Код: plaintext
1.
2.
CHILD>W $I
|TNT|mdevelop: 1443 | 552 
CHILD>

соответствовала $I из MSM:

Код: plaintext
1.
2.
>W $I
 5 
>
Везде программы запичканы конструкциями типа:
Код: plaintext
1.
K @("^EKR"_$I),@("^EKRAN"_$I)
I KOD= 21  S $P(VEK($P(@("^EKRAN"_$I_"(1"_","_K_")"),"\", 1 )),"*", 9 )= 2 ,$P(^ZNU(TN,+$P(@("^EKRAN"_$I_"(1"_","_K_")"),"\", 1 ), 3 ),"\", 3 )=""
и т. д.

Явно что 5 не одно и тоже что |TNT|mdevelop:1443|552

Соответствует ли такая замена $I ?

Код: plaintext
$P($I,"|", 4 )
...
Рейтинг: 0 / 0
Правильная такая замена ???
    #33708678
Sergei Obrastsov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Valeriu
Как можно чтобы значения системной переменной
$I из Cache:

Код: plaintext
1.
2.
CHILD>W $I
|TNT|mdevelop: 1443 | 552 
CHILD>
соответствовала $I из MSM:
Код: plaintext
1.
2.
>W $I
 5 
>

встречный вопрос - а зачем тебе внутреннее соответствие? ты пользуешься
ее логическим содержанием, то есть, "в переменной $I содержится номер
текущего устройства", и все. а уж как оно выглядит, "xxx|yyy", 55 или
"abc:ddd", imho, пофигу. :)


Везде программы запичканы конструкциями типа:
Код: plaintext
1.
K @("^EKR"_$I),@("^EKRAN"_$I)
I KOD= 21  S $P(VEK($P(@("^EKRAN"_$I_"(1"_","_K_")"),"\", 1 )),"*", 9 )= 2 ,$P(^ZNU(TN,+$P(@("^EKRAN"_$I_"(1"_","_K_")"),"\", 1 ), 3 ),"\", 3 )=""
и т. д.

сочувствую, очень мрачная строчка. какой-то терминальный интерфейс?


Явно что 5 не одно и тоже что |TNT|mdevelop:1443|552
Соответствует ли такая замена $I ?
Код: plaintext
$P($I,"|", 4 )

ну почему же, оба терминалы.
я думаю вообще ничего менять не надо.
хотя этот "ужас" стоило бы переписать.

С уважением. Сергей
...
Рейтинг: 0 / 0
Правильная такая замена ???
    #33708883
Valeriu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да, это старый ДИАМС-й терминальный интерфейс.
В наше время настоящая экзотика !!!
Согласен что переписывать эту муть сложно.
Вроде что после замены (как я и предположил) $I НА $P($I,"|",4)
все стало на своих местах...

Посмотрим дальше.
Спасибо.
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / Правильная такая замена ???
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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