Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / Подскажите пожалуйста.... / 8 сообщений из 8, страница 1 из 1
29.09.2008, 10:59
    #35564644
LcF
LcF
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите пожалуйста....
Добрый день, товарищи кашевары.
Подскажите плиз, как передать параметры в программу (*.mac) значения из текстбокса на csp странице.
Код программы -
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
znaxe 
  s ^axe= 0 ,i= 0 
   s IP=$P(^["WORK"]S69( 213 ,"TCP"),"|", 1 ),PORT= 4002 ,MODE="",DEV="|TCP|"_PORT
   Open DEV:(IP:PORT:MODE): 5  E  s err= 1  q     ;"Не открывается канал"
  s line=""
  f  {
	  q:^axe= 1 
	    i ^axe= 1  C DEV q
	  r line: 90 
	  i '$T s ^axe=$p($h,",", 2 ) 
	   ; d ^znaxe1
	  s i=i+ 1 ,^res(i)=line
  }

Т.е. я хочу чтобы запускалась программа, где вместо
Код: plaintext
$P(^["WORK"]S69( 213 ,"TCP"),"|", 1 ),PORT= 4002 ,MODE="",DEV="|TCP|"_PORT
были данные из текстбоксов.


Заранее благодарен за ответы
...
Рейтинг: 0 / 0
29.09.2008, 11:21
    #35564719
AlexKB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите пожалуйста....
Из ZENа делаю так:
JS метод собирает из редактируемых компонентов значения и вызывает метод класса, передавая ему значения как параметры. Метод класса перезаписывает в глобале параметры запуска TCP-задачи запускает по JOB метку мас программы. Та в свою очередь выбирает из глобала параметры запуска и стартует обмен.
Почему все так запутано, много параметров нужно передавать + обмен должен жить своей жизнью, при этом клиентская страница не должна ничего дожидаться.
...
Рейтинг: 0 / 0
29.09.2008, 11:23
    #35564728
krvsa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите пожалуйста....
Не совсем понимаю что есть "текстбоксы"... Но как вариант можно:
- Использовать некое событие на csp-странице
- По его выполнению вызывать некую JS-функцию, которая будет считывать нужные вам данные "из csp-страницы"
- Передавать их в кащейское гипперсобытие
- А то, в свою очередь, может передать их в mac-программу

Но такой маленький код можно реализовать в самом гипперсобытии...
----------
Cache for Windows (x86-32) 2007.1.3 (Build 607) Wed Oct 17 2007 02:12:09 EDT
...
Рейтинг: 0 / 0
29.09.2008, 11:27
    #35564738
LcF
LcF
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите пожалуйста....
Спасибо за ответ. А как допустим будет вести себя программа, если я при запущеной проге начну менять значения глобалов, и запускать эту же прогу несколько раз с разными параметрами?
(прошу простить за столь простые вопросы, но в каше я полнуй нуб)
...
Рейтинг: 0 / 0
29.09.2008, 11:28
    #35564740
LcF
LcF
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите пожалуйста....
В гиперсобытии его реализовать непроблема, уважаемый krvsa. Просто хотел узнать как передавать параметры в пргу(а вдруг набудущее пригодиться?)
...
Рейтинг: 0 / 0
30.09.2008, 08:47
    #35566680
krvsa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите пожалуйста....
LcFкак допустим будет вести себя программа, если я при запущеной проге начну менять значения глобалов, и запускать эту же прогу несколько раз с разными параметрами?
Это уже как напишеш саму программу.
Можно например:
- Вычитывать все сразу при входе в программу
- Защитить считывание блокировкой
- Перед записью в глобал проверять блокировку
...
Рейтинг: 0 / 0
30.09.2008, 08:55
    #35566692
krvsa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите пожалуйста....
LcFВ гиперсобытии его реализовать непроблема
Ну и фик нанее.
LcFхотел узнать как передавать параметры в пргу
Из гипперсобытия - как в обычную процедуру/функцию...

Код: plaintext
1.
2.
3.
4.
5.
...
<csp:method name="cTest" arguments="Prm:%String" returntype="%String">  
   d START^TEST(Prm)
   q  1 
</csp:method>
...

Вот программка TEST

Код: plaintext
1.
2.
START(Prm)
 // Текст программки
 q
LcFвдруг набудущее пригодиться?
Надеюсь что и не раз!
...
Рейтинг: 0 / 0
30.09.2008, 10:12
    #35566835
LcF
LcF
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите пожалуйста....
Спасибо всем за участие...
Пшел я дальше грызть гранит каше
...
Рейтинг: 0 / 0
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / Подскажите пожалуйста.... / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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