Starting the function from the menu and immediately

[Eugene Lutsenko]

Somehow, when you run the function from the menu or buttons (ACTION {|| F3_5 (.T.)}), it works fine, but when you start from the program (F3_5 (.T.)) produces an error

[rdonnay]

I do not understand your question. Please clarify.

[Eugene Lutsenko]

When I run F3_5() function from the menu:

Code: Select all

DCMENUITEM '3.5. Синтез и верификация заданных из 10 моделей' PARENT oMenu3 ACTION {||F3_5()} MESSAGE 'Оценивается достоверность (адекватность) заданных стат.моделей и моделей знаний. Для этого осуществляется синтез заданных моделей, обучающая выборка копируется в распознаваемую и в каждой заданной модели проводится распознавание с использованием двух интегральных критериев, подсчитывается количество верно идентифицированных и не идентифицированных, ошибочно идентифицированных и не идентифицированных объектов (ошибки 1-го и 2-го рода)'

or buttons

Code: Select all

DCADDBUTTON CAPTION 'Сортировка' ;
SIZE K+LEN("Сортировка") ;
ACTION {||F3_5(), DC_GetRefresh(GetList)} ;
PARENT oToolBar ;
TOOLTIP 'Сортировка по режиму 1.2'

or

Code: Select all

@ DCGUI_ROW, DCGUI_COL + 30 DCPUSHBUTTON CAPTION 'Создать класс.шкалы и градации' ;
SIZE 2+LEN("Создать класс.шкалы и градации"), 1.5 ;
ACTION {||А3_5(), DC_GetRefresh(GetList)} ;
PARENT oToolBar ;
TOOLTIP 'Создать класс.шкалы и градации'

then everything works just fine. But if you run the same 3_5() function straight from the text, like this, for example:

Code: Select all

IF FILE("_2_3_2_2.arx")

aSoftInt = DC_ARestore(Disk_dir +"\_2_3_2_2.arx")
aSoftInt[27] = 3
DC_ASave(aSoftInt , Disk_dir +"\_2_3_2_2.arx")

ENDIF

****************************
***** Запустить 2.3.2.2, 3.5
****************************

F2_3_2_2("") // Запуск универсального программного интерфейса с внешними базами данных

F3_5() // Синтез и верификация моделей

it causes a mistake

[rdonnay]

What is the error?