Code: Select all
PRIVATE bCBlockAll:={|| iif(VerModClsIT->F_mera=M_MaxValAll,{GRA_CLR_RED,nil},iif(VerModClsIT->F_mera=0,{GRA_CLR_BLACK,nil},{GRA_CLR_BLACK,nil})) } // Клиффорд
PRIVATE bCBlockCls:={|| iif(VerModCls->F_mera=M_MaxValCls,{GRA_CLR_RED,nil},iif(VerModCls->F_mera=0,{GRA_CLR_BLACK,nil},{GRA_CLR_BLACK,nil})) } // Клиффорд
/* ----- Create browse-1 ----- *//**************************************************************************************************************************
bScale := {|| VerModCls->(DC_SetScope(0,VerModClsIT->ModIntKrit)), ;
VerModCls->(DC_SetScope(1,VerModClsIT->ModIntKrit)), ;
VerModCls->(DC_DbGoTop()), ;
oBrowGrSc:refreshAll() }
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,8.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
ITEMMARKED {|| Eval(bScale), ;
DC_GetRefresh(GetList,, ;
DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
WNF = 9 // Ширина числового поля
* Структура базы данных N°=74: VerModClsIT.dbf
* ============================================================================
* | N | Имя поля | Тип | Ширина | Дес. | Примечание |
* ============================================================================
* | 1 | MODINTKRIT | C | 9 | 0 | 1. ModIntKrit Код: ##_####_#, где: ##-числовой номер модели и инт.критерия {1-20}, ####-модель {Abs,Prc1,Prc2,Inf1,Inf2,Inf3,Inf4,Inf5,Inf6,Inf7}, #-инт.крит.: {k,i}
* | 2 | NAME_MOD | C | 250 | 0 | 2. Код класса
* | 3 | INT_KRIT | C | 40 | 0 | 3. Наименование класса
* | 4 | DIFVALMOD | N | 15 | 7 | 4. DifValMod Достоверность идентификации класса (с учетом всех верно и ошибочно идентифицированных и неидентифицированных логических объектов))
* | 5 | AVRURSX_T | N | 15 | 7 | 5. AvrUrSx_T Средний модуль уровней сходства ВЕРНО идентифицированных и неидентифицированных объектов
* | 6 | AVRURSX_F | N | 15 | 7 | 6. AvrUrSx_F Средний модуль уровней сходства ОШИБОЧНО идентифицированных и неидентифицированных объектов
* | 7 | DIFAVRURSX | N | 15 | 7 | 7. DifAvrUrSx Разность средних модулей уровней сходства ВЕРНО и ОШИБОЧНО идентифицированных и неидентифицированных объектов
* | 8 | N_LOGOBJ | N | 15 | 0 | 8. N_LogObj Количество объектов расп.выборки, фактически относящихся к классу
* | 9 | N_T_IDENT | N | 15 | 0 | 9. N_T_Ident Количество верно идентифицированных объектов расп.выборки (TP - истино-положительное решение)
* | 10 | N_F_NIDENT | N | 15 | 0 | 10. N_F_NIdent Количество ошибочно неидентифицированных объектов расп.выборки (FN - ложно-отрицательное решение)
* | 11 | N_F_IDENT | N | 15 | 0 | 11. N_F_Ident Количество ошибочно идентифицированных объектов расп.выборки (FP - ложно-положительное решение)
* | 12 | N_T_NIDENT | N | 15 | 0 | 12. N_T_NIdent Количество верно неидентифицированных объектов расп.выборки (TN - истино-отрицательное решение)
* | 13 | DVMOD | N | 15 | 7 | 13. M_DVMod = (NT-NF)/(NT+NF)*100 Дифференциальная валидность (достоверность) модели (по классу) (в знаменателе: "всего объектов"). NT = N_T_id+N_T_nid: Количество ВЕРНО идентифицированных и неидентифицированных объектов, NF = N_F_id+N_F_nid: Количество ОШИБОЧНО идентифицированных и неидентифицированных объектов
* | 14 | PRECISION | N | 15 | 7 | 14. Precision = TP/(TP+FP) - точность
* | 15 | RECALL | N | 15 | 7 | 15. Recall = TP/(TP+FN) - полнота
* | 16 | F_MERA | N | 15 | 7 | 16. F-mera = 2*(Precision*Recall)/(Precision+Recall) (мультиклассовый вариант)
* | 17 | P_T_IDENT | N | 15 | 7 | 17. P_T_Ident Вероятность верной идентификации объекта с классом с использованием модели
* | 18 | P_T_NIDENT | N | 15 | 7 | 18. P_T_NIdent Вероятность верной не идентификации объекта с классом с использованием модели
* | 19 | P_F_IDENT | N | 15 | 7 | 19. P_F_Ident Вероятность ошибочной идентификации объекта с классом с использованием модели
* | 20 | P_F_NIDENT | N | 15 | 7 | 20. P_F_NIdent Вероятность ошибочной не идентификации объекта с классом с использованием модели
* | 21 | P_SLUG_ID | N | 15 | 7 | 21. P_SlUg_Id Вероятность случайного угадывания принадлежности объектов к классам
* | 22 | P_SLUG_NID | N | 15 | 7 | 22. P_SlUg_NId Вероятность случайного угадывания непринадлежности объектов к классам
* | 23 | EFFMOD_ID | N | 15 | 7 | 23. EffMod_Id Эффективность модели при идентификации: отношение вероятности верной идентификации при использовании модели к вероятности случайного угадывания принадлежности объекта к классу
* | 24 | EFFMOD_NID | N | 15 | 7 | 24. EffMod_NId Эффективность модели при неидентификации: отношение вероятности верной неидентификации при использовании модели к вероятности случайного угадывания непринадлежности объекта к классу
* | 25 | AVR_EFFMOD | N | 15 | 7 | 25. Avr_EffMod Средняя эффективность модели: (EffMod_Id+EffMod_NId)/2
* | 26 | S_T_IDENT | N | 15 | 7 | 26. Сумма модулей уровней сходства верно идентифицированных объектов расп.выборки (STP - истино-положительное решение)
* | 27 | S_F_NIDENT | N | 15 | 7 | 27. Сумма модулей уровней сходства ошибочно неидентифицированных объектов расп.выборки (SFN - ложно-отрицательное решение)
* | 28 | S_F_IDENT | N | 15 | 7 | 28. Сумма модулей уровней сходства ошибочно идентифицированных объектов расп.выборки (SFP - ложно-положительное решение)
* | 29 | S_T_NIDENT | N | 15 | 7 | 29. Сумма модулей уровней сходства верно неидентифицированных объектов расп.выборки (STN - истино-отрицательное решение)
* | 30 | SPRECISION | N | 15 | 7 | 30. SPrecision = STP/(STP+SFP) - точность с учетом уровней сходства
* | 31 | SRECALL | N | 15 | 7 | 31. SRecall = STP/(STP+SFN) - полнота с учетом уровней сходства
* | 32 | L_MERA | N | 15 | 7 | 32. L-mera = 2*(SPrecision*SRecall)/(SPrecision+SRecall) (L-мера проф.Е.В.Луценко - нечеткое мультиклассовое обобщение
* | 33 | DATE | C | 10 | 0 | 33. Date Дата формирования записи БД
* | 34 | TIME | C | 8 | 0 | 34. Time Время формирования записи БД
* ============================================================================
* В С Е Г О длина записи: 753 байтов. |
* ============================================================================
DCSETPARENT oBrowScale
DCBROWSECOL FIELD VerModClsIT->Name_Mod HEADER "Наименование модели;и частного критерия" PARENT oBrowScale FONT "9.Courier" COLOR bCBlockAll WIDTH 95
DCBROWSECOL FIELD VerModClsIT->Int_Krit HEADER "Наименование;интегрального критерия" PARENT oBrowScale FONT "9.Courier" COLOR bCBlockAll WIDTH 44
* | 14 | PRECISION | N | 15 | 7 | 14. Precision = TP/(TP+FP) - точность
* | 15 | RECALL | N | 15 | 7 | 15. Recall = TP/(TP+FN) - полнота
* | 16 | F_MERA | N | 15 | 7 | 16. F-mera = 2*(Precision*Recall)/(Precision+Recall) (мультиклассовый вариант)
DCBROWSECOL DATA FieldAnchorA(14,"VerModClsIT",9,3) HEADER "Точность;модели" PARENT oBrowScale FONT "9.Courier" COLOR bCBlockAll WIDTH 10
DCBROWSECOL DATA FieldAnchorA(15,"VerModClsIT",9,3) HEADER "Полнота;модели" PARENT oBrowScale FONT "9.Courier" COLOR bCBlockAll WIDTH 10
DCBROWSECOL DATA FieldAnchorA(16,"VerModClsIT",9,3) HEADER "F-мера;Ван Ризбергена" PARENT oBrowScale FONT "9.Courier" COLOR bCBlockAll WIDTH 15
* | 30 | SPRECISION | N | 15 | 7 | 30. SPrecision = STP/(STP+SFP) - точность с учетом уровней сходства
* | 31 | SRECALL | N | 15 | 7 | 31. SRecall = STP/(STP+SFN) - полнота с учетом уровней сходства
* | 32 | L_MERA | N | 15 | 7 | 32. L-mera = 2*(SPrecision*SRecall)/(SPrecision+SRecall) (L-мера проф.Е.В.Луценко - нечеткое мультиклассовое обобщение F-меры Ван Ризбергена)
DCBROWSECOL DATA FieldAnchorA(30,"VerModClsIT",9,3) HEADER "S-Точность;модели" PARENT oBrowScale FONT "10.Courier Bold" COLOR bCBlockAll WIDTH 10
DCBROWSECOL DATA FieldAnchorA(31,"VerModClsIT",9,3) HEADER "S-Полнота;модели" PARENT oBrowScale FONT "10.Courier Bold" COLOR bCBlockAll WIDTH 10
DCBROWSECOL DATA FieldAnchorA(32,"VerModClsIT",9,3) HEADER "L-мера;проф.Е.В.Луценко" PARENT oBrowScale FONT "10.Courier Bold" COLOR bCBlockAll WIDTH 15
/* ----- Create browse-2 ----- */***************************************************************************************************************************
DCSETPARENT TO
@10, 0 DCBROWSE oBrowGrSc ALIAS 'VerModCls' SIZE 217,27 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД
HEADLINES 8 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
ITEMMARKED bItems
DCSETPARENT oBrowGrSc
WNF = 9
DCBROWSECOL FIELD VerModCls->Kod_cls HEADER "Код;класса" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH 5
DCBROWSECOL FIELD VerModCls->Name_cls HEADER "Наименование;класса" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH 25
* | 4 | DIFVALMOD | N | 15 | 7 | 4. DifValMod Достоверность идентификации класса (с учетом всех верно и ошибочно идентифицированных и неидентифицированных логических объектов))
DCBROWSECOL DATA FieldAnchor( 4,9,3) HEADER "Дифферен-;циальная;досто-;верность;модели;{-1, +1}" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
* | 8 | N_LOGOBJ | N | 15 | 0 | 8. N_LogObj Количество объектов расп.выборки, фактически относящихся к классу
DCBROWSECOL DATA FieldAnchor( 8,9,0) HEADER "Кол-во;логических;объектов;выборки" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
* | 9 | N_T_IDENT | N | 15 | 0 | 9. N_T_Ident Количество верно идентифицированных объектов расп.выборки (TP - истино-положительное решение)
* | 10 | N_F_NIDENT | N | 15 | 0 | 10. N_F_NIdent Количество ошибочно неидентифицированных объектов расп.выборки (FN - ложно-отрицательное решение)
* | 11 | N_F_IDENT | N | 15 | 0 | 11. N_F_Ident Количество ошибочно идентифицированных объектов расп.выборки (FP - ложно-положительное решение)
* | 12 | N_T_NIDENT | N | 15 | 0 | 12. N_T_NIdent Количество верно неидентифицированных объектов расп.выборки (TN - истино-отрицательное решение)
DCBROWSECOL DATA FieldAnchor( 9,9,0) HEADER "Число истино-;положительных;решений (TP)" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(12,9,0) HEADER "Число истино-;отрицательных;решений (TN)" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(11,9,0) HEADER "Число ложно- ;положительных;решений (FP)" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(10,9,0) HEADER "Число ложно- ;отрицательных;решений (FN)" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
* | 14 | PRECISION | N | 15 | 7 | 14. Precision = TP/(TP+FP) - точность
* | 15 | RECALL | N | 15 | 7 | 15. Recall = TP/(TP+FN) - полнота
* | 16 | F_MERA | N | 15 | 7 | 16. F-mera = 2*(Precision*Recall)/(Precision+Recall) (мультиклассовый вариант)
DCBROWSECOL DATA FieldAnchor(14,9,3) HEADER "Точность;модели" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(15,9,3) HEADER "Полнота ;модели" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(16,9,3) HEADER "F-мера ;Ван;Ризбергена" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
* | 26 | S_T_IDENT | N | 15 | 7 | 26. Сумма модулей уровней сходства верно идентифицированных объектов расп.выборки (STP - истино-положительное решение)
* | 27 | S_F_NIDENT | N | 15 | 7 | 27. Сумма модулей уровней сходства ошибочно неидентифицированных объектов расп.выборки (SFN - ложно-отрицательное решение)
* | 28 | S_F_IDENT | N | 15 | 7 | 28. Сумма модулей уровней сходства ошибочно идентифицированных объектов расп.выборки (SFP - ложно-положительное решение)
* | 29 | S_T_NIDENT | N | 15 | 7 | 29. Сумма модулей уровней сходства верно неидентифицированных объектов расп.выборки (STN - истино-отрицательное решение)
DCBROWSECOL DATA FieldAnchor(26,9,3) HEADER "Сумма модулей;уровней сходства;истино-положит.;решений (STP)" PARENT oBrowGrSc FONT "10.Courier Bold" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(29,9,3) HEADER "Сумма модулей;уровней сходства;истино-отрицат.;решений (STN)" PARENT oBrowGrSc FONT "10.Courier Bold" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(28,9,3) HEADER "Сумма модулей;уровней сходства;ложно-положит.;решений (SFP)" PARENT oBrowGrSc FONT "10.Courier Bold" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(27,9,3) HEADER "Сумма модулей;уровней сходства;ложно-отрицат.;решений (SFN)" PARENT oBrowGrSc FONT "10.Courier Bold" COLOR bCBlockCls WIDTH WNF
* | 30 | SPRECISION | N | 15 | 7 | 30. SPrecision = STP/(STP+SFP) - точность с учетом уровней сходства
* | 31 | SRECALL | N | 15 | 7 | 31. SRecall = STP/(STP+SFN) - полнота с учетом уровней сходства
* | 32 | L_MERA | N | 15 | 7 | 32. L-mera = 2*(SPrecision*SRecall)/(SPrecision+SRecall) (L-мера проф.Е.В.Луценко - нечеткое мультиклассовое обобщение F-меры Ван Ризбергена
DCBROWSECOL DATA FieldAnchor(30,9,3) HEADER "S-Точность;модели" PARENT oBrowGrSc FONT "10.Courier Bold" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(31,9,3) HEADER "S-Полнота ;модели" PARENT oBrowGrSc FONT "10.Courier Bold" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(32,9,3) HEADER "L-мера ;проф.;Е.В.Луценко" PARENT oBrowGrSc FONT "10.Courier Bold" COLOR bCBlockCls WIDTH WNF
* | 5 | AVRURSX_T | N | 15 | 7 | 5. AvrUrSx_T Средний модуль уровней сходства ВЕРНО идентифицированных и неидентифицированных объектов
* | 6 | AVRURSX_F | N | 15 | 7 | 6. AvrUrSx_F Средний модуль уровней сходства ОШИБОЧНО идентифицированных и неидентифицированных объектов
* | 7 | DIFAVRURSX | N | 15 | 7 | 7. DifAvrUrSx Разность средних модулей уровней сходства ВЕРНО и ОШИБОЧНО идентифицированных и неидентифицированных объектов
DCBROWSECOL DATA FieldAnchor( 5,9,3) HEADER "Средний;модуль;уровня;сходства;ВЕРНО;идентиф.;и неидент.;объектов" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor( 6,9,3) HEADER "Средний;модуль;уровня;сходства;ОШИБ.;идентиф.;и неидент.;объектов" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor( 7,9,3) HEADER "Разность;ср.модулей;ур.сход.;ВЕРНО и;ОШИБ.;идентиф.;и неидент.;объектов" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
* | 17 | P_T_IDENT | N | 15 | 7 | 17. P_T_Ident Вероятность верной идентификации объекта с классом с использованием модели
* | 18 | P_T_NIDENT | N | 15 | 7 | 18. P_T_NIdent Вероятность верной не идентификации объекта с классом с использованием модели
* | 19 | P_F_IDENT | N | 15 | 7 | 19. P_F_Ident Вероятность ошибочной идентификации объекта с классом с использованием модели
* | 20 | P_F_NIDENT | N | 15 | 7 | 20. P_F_NIdent Вероятность ошибочной не идентификации объекта с классом с использованием модели
DCBROWSECOL DATA FieldAnchor(17,9,3) HEADER "Процент ;правильной;идентификации" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(18,9,3) HEADER "Процент ;правильной;не идентификации" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(19,9,3) HEADER "Процент ;ошибочной ;идентификации" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(20,9,3) HEADER "Процент ;ошибочной ;не идентификации" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
* | 21 | P_SLUG_ID | N | 15 | 7 | 21. P_SlUg_Id Вероятность случайного угадывания принадлежности объектов к классам
* | 22 | P_SLUG_NID | N | 15 | 7 | 22. P_SlUg_NId Вероятность случайного угадывания непринадлежности объектов к классам
* | 23 | EFFMOD_ID | N | 15 | 7 | 23. EffMod_Id Эффективность модели при идентификации: отношение вероятности верной идентификации при использовании модели к вероятности случайного угадывания принадлежности объекта к классу
* | 24 | EFFMOD_NID | N | 15 | 7 | 24. EffMod_NId Эффективность модели при неидентификации: отношение вероятности верной неидентификации при использовании модели к вероятности случайного угадывания непринадлежности объекта к классу
* | 25 | AVR_EFFMOD | N | 15 | 7 | 25. Avr_EffMod Средняя эффективность модели: (EffMod_Id+EffMod_NId)/2
DCBROWSECOL DATA FieldAnchor(21,9,3) HEADER "Вероятн.;случайн.;угадыв.;принадл.;объектов;к классам" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(22,9,3) HEADER "Вероятн.;случайн.;угадыв.;непринадл.;объектов;к классам" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(23,9,3) HEADER "Эффект.;модели;при;идентиф.:;=C13/C17" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(24,9,3) HEADER "Эффект.;модели;при;неидент.:;=C14/C18" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(25,9,3) HEADER "Средняя;эффект.;модели:;=(C19+;C20)/2" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL FIELD VerModCls->Date HEADER "Дата;получения;результата" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH 10
DCBROWSECOL FIELD VerModCls->Time HEADER "Время;получения;результата" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH 8
DCGETOPTIONS SAYFONT '10.Helv Bold' TABSTOP AUTORESIZE
cTitle = '4.1.3.8. Стат.анализ результатов идентификации по классам, моделям и инт.критериям'+'. Текущая модель: "'+UPPER(Ar_Model[M_CurrInf])+'"'
DCREAD GUI ;
FIT ;
OPTIONS GetOptions ;
MODAL ;
TITLE cTitle ;
EVAL {|o|SetAppFocus(oBrowScale:GetColumn(1))}
It should be something like this.
And in a more simple embodiment, all worked fine:
Code: Select all
PRIVATE bCBlockAll:={|| iif(VerModClsIT->F_mera=M_MaxValAll,{GRA_CLR_RED,nil},iif(VerModClsIT->F_mera=0,{GRA_CLR_BLACK,nil},{GRA_CLR_BLACK,nil})) } // Клиффорд
PRIVATE bCBlockCls:={|| iif(VerModCls->F_mera=M_MaxValCls,{GRA_CLR_RED,nil},iif(VerModCls->F_mera=0,{GRA_CLR_BLACK,nil},{GRA_CLR_BLACK,nil})) } // Клиффорд
/* ----- Create browse-1 ----- */
bScale := {|| VerModCls->(DC_SetScope(0,VerModClsIT->ModIntKrit)), ;
VerModCls->(DC_SetScope(1,VerModClsIT->ModIntKrit)), ;
VerModCls->(DC_DbGoTop()), ;
oBrowGrSc:refreshAll() }
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД
HEADLINES 1 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
ITEMMARKED {|| Eval(bScale), ;
DC_GetRefresh(GetList,, ;
DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
WNF = 9 // Ширина числового поля
DCSETPARENT oBrowScale
DCBROWSECOL FIELD VerModClsIT->Name_Mod HEADER "Наименование модели и частного критерия" PARENT oBrowScale FONT "9.Courier" COLOR bCBlockAll WIDTH 115
DCBROWSECOL FIELD VerModClsIT->Int_Krit HEADER "Наименование интегрального критерия" PARENT oBrowScale FONT "9.Courier" COLOR bCBlockAll WIDTH 44
DCBROWSECOL DATA FieldAnchorA(14,"VerModClsIT",9,3) HEADER "Точность модели" PARENT oBrowScale FONT "9.Courier" COLOR bCBlockAll WIDTH 15
DCBROWSECOL DATA FieldAnchorA(15,"VerModClsIT",9,3) HEADER "Полнота модели" PARENT oBrowScale FONT "9.Courier" COLOR bCBlockAll WIDTH 15
DCBROWSECOL DATA FieldAnchorA(16,"VerModClsIT",9,3) HEADER "F-мера Ван Ризбергена" PARENT oBrowScale FONT "9.Courier" COLOR bCBlockAll WIDTH 20
/* ----- Create browse-2 ----- */
DCSETPARENT TO
@9, 0 DCBROWSE oBrowGrSc ALIAS 'VerModCls' SIZE 217,27 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД
HEADLINES 8 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
ITEMMARKED bItems
DCSETPARENT oBrowGrSc
DCBROWSECOL FIELD VerModCls->Kod_cls HEADER "Код;класса" PARENT oBrowGrSc COLOR bCBlockCls WIDTH 5
DCBROWSECOL FIELD VerModCls->Name_cls HEADER "Наименование;класса" PARENT oBrowGrSc COLOR bCBlockCls WIDTH 25
DCBROWSECOL DATA FieldAnchor( 4,9,3) HEADER "Дифферен-;циальная;досто-;верность;модели;{-1, +1}" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor( 5,9,3,) HEADER "Средний;модуль;уровня;сходства;ВЕРНО;идентиф.;и неидент.;объектов" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor( 6,9,3) HEADER "Средний;модуль;уровня;сходства;ОШИБ.;идентиф.;и неидент.;объектов" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor( 7,9,3) HEADER "Разность;ср.модулей;ур.сход.;ВЕРНО и;ОШИБ.;идентиф.;и неидент.;объектов" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor( 8,9,0) HEADER "Кол-во;объектов;распозн.;выборки;фактически;относящихся;к классу" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor( 9,9,0) HEADER "Число истино-;положительных;решений (TP)" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(12,9,0) HEADER "Число истино-;отрицательных;решений (TN)" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(11,9,0) HEADER "Число ложно- ;положительных;решений (FP)" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(10,9,0) HEADER "Число ложно- ;отрицательных;решений (FN)" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(14,9,3) HEADER "Точность;модели" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(15,9,3) HEADER "Полнота ;модели" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(16,9,3) HEADER "F-мера ;Ван;Ризбергена" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(13,9,3) HEADER "L-мера ;проф.;Е.В.Луценко;{0,+1}" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(17,9,3) HEADER "Процент ;правильной;идентификации" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(18,9,3) HEADER "Процент ;правильной;не идентификации" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(19,9,3) HEADER "Процент ;ошибочной ;идентификации" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(20,9,3) HEADER "Процент ;ошибочной ;не идентификации" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(21,9,3) HEADER "Вероятн.;случайн.;угадыв.;принадл.;объектов;к классам" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(22,9,3) HEADER "Вероятн.;случайн.;угадыв.;непринадл.;объектов;к классам" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(23,9,3) HEADER "Эффект.;модели;при;идентиф.:;=C13/C17" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(24,9,3) HEADER "Эффект.;модели;при;неидент.:;=C14/C18" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL DATA FieldAnchor(25,9,3) HEADER "Средняя;эффект.;модели:;=(C19+;C20)/2" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH WNF
DCBROWSECOL FIELD VerModClsIT->Date HEADER "Дата;получения;результата" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH 10
DCBROWSECOL FIELD VerModClsIT->Time HEADER "Время;получения;результата" PARENT oBrowGrSc FONT "9.Courier" COLOR bCBlockCls WIDTH 8
DCGETOPTIONS SAYFONT '10.Helv Bold' TABSTOP AUTORESIZE
cTitle = '4.1.3.8. Стат.анализ результатов идентификации по классам, моделям и инт.критериям'+'. Текущая модель: "'+UPPER(Ar_Model[M_CurrInf])+'"'
DCREAD GUI ;
FIT ;
OPTIONS GetOptions ;
MODAL ;
TITLE cTitle ;
EVAL {|o|SetAppFocus(oBrowScale:GetColumn(1))}