I can not display a "One to many"

This forum is for eXpress++ general support.
Post Reply
Message
Author
User avatar
Eugene Lutsenko
Posts: 1649
Joined: Sat Feb 04, 2012 2:23 am
Location: Russia, Southern federal district, city of Krasnodar
Contact:

I can not display a "One to many"

#1 Post by Eugene Lutsenko »

I can not display a "One to many":

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))}
[/size]

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))}
[/size]
Attachments
err31102016b.jpg
err31102016b.jpg (314.27 KiB) Viewed 6025 times
err31102016.jpg
err31102016.jpg (80.11 KiB) Viewed 6026 times

User avatar
rdonnay
Site Admin
Posts: 4813
Joined: Wed Jan 27, 2010 6:58 pm
Location: Boise, Idaho USA
Contact:

Re: I can not display a "One to many"

#2 Post by rdonnay »

You did not show enough code.

The problem is in your function: F4_1_3_8.

I suspect that you passed oBrowScale to that function.
Try passing it by reference: @oBrowScale
The eXpress train is coming - and it has more cars.

User avatar
Eugene Lutsenko
Posts: 1649
Joined: Sat Feb 04, 2012 2:23 am
Location: Russia, Southern federal district, city of Krasnodar
Contact:

Re: I can not display a "One to many"

#3 Post by Eugene Lutsenko »

Thank you, Roger!

I took the old version of the operating and gradually began to migrate into it new code fragments that have changed. And it worked! At the same time I did not understand what was wrong in the new version, as I have not changed anything in fragments when transported. I have a suspicion that somewhere in the text was invisible symbols.

Post Reply