RU/2: Форум. Общение пользователей и разработчиков OS/2 (eCS). : Опять про In-Joy.Вопрос к знатокам Rexx

From	:	Andrew
To	:	All
Subj	:	Опять про In-Joy.Вопрос к знатокам Rexx

Вопрос к знатокам Rexx...

в чем облажался?

при выполнении ошибка:

REX0040: Error 40 running add_ip.cmd, line 19: Incorrect call to routine

запуск: pmrexx add_ip.cmd

3 *-* Call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs';
>>> "1"
+++ Interactive trace. "Trace Off" to end debug, ENTER to Continue.
4 *-* Call SysLoadFuncs;
>>> ""
6 *-* configfile = 'add_ip.cfg';
>>> "add_ip.cfg"
7 *-* Call stream configfile, 'command', 'open read';
>>> "READY:"
8 *-* injoy_home = linein(configfile);
>>> "D:\in-joy\"
9 *-* datafiles_home = linein(configfile);
>>> "D:\usr\www\add_ip"
10 *-* Call stream configfile, 'command', 'close';
>>> "READY:"
12 *-* userfile = datafiles_home'\users.lst';
>>> "D:\usr\www\add_ip\users.lst"
14 *-* Parse Arg userinfo;
>>> ""
17 *-* nextpos1 = pos('=', userinfo);
>>> "0"
18 *-* nextpos2 = pos('username=', userinfo);
>>> "0"
19 *-* user_IP = substr(userinfo, nextpos1 + 1, nextpos2 - nextpos1 - 1);
19 +++ user_IP = substr(userinfo, nextpos1 + 1, nextpos2 - nextpos1 - 1);

Thu 18 Apr 2002 11:20

Mozilla/4.61 [en] (OS/2; U)

Опять про In-Joy.Вопрос к знатокам Rexx (Andrew, 18.04.02 11:20)
- Опять про ... Rexx (Andrey Mitrofanov, 18.04.02 12:36)

Список сообщений \| Написать новое \| Ответить на сообщение \| Домой	Поиск:
Предыдущее сообщение \| Следующее сообщение