Це стара версія документу!
Реалізуе інтерфейс списку довідника.
Нагадування При конфігурувані документу в відповдних подіях, умова The.TypeForm=1 вказуе що код відноситься для роботи з списком, The.TypeForm=2-елементом довідника, The.TypeForm=3-групою.
| Член | Тип | Параметри | Опис |
|---|---|---|---|
| Init(Spr,[cPar],[oCrs]) | L | tSpr-довідник, cPar-параметри, cPar-параметри , oCrs-курсор | Конструктор.loSpr = CreateObject('iSpr','_KSPROF','ID="'+lcID+'"') loSpr.Show() If VarType(loSpr)='O' MessageBox(loSpr.MD.Choice) EndIf |
| OnExit() | Дивись опис | Викликае та повертае значення функції заданої в конфіураторі в події OnExit. Якщо в конфігураторі ця подія не перекривалась - метод повертае True | |
| OnDel() | Дивись опис | Викликае та повертае значення функції заданої в конфіураторі в події OnDel. Якщо в конфігураторі ця подія не перекривалась - метод повертае True. Тобто для заборони видалення досить повернути False | |
| OnLoad() | Дивись опис | Викликае та повертае значення функції заданої в конфіураторі в події OnLoad, яка відбуваеться перед відображенням форми редагування. Якщо в конфігураторі ця подія не перекривалась - метод повертае True. Для заборони редагування досить повернути False. Зручно використовувати для настройки можливостей редагування, якщо стандартні можливості не влаштовуть.Do Case Case The.TypeForm= 2 The.Descr.is_Button = .T. The.Descr.ModeChoice = .T. The.Descr.CommandClick = [BProc.Spr._Posada.SelectKP()] EndCase |
|
| isSelectMode | L | Ознчає що довідник буде працювати в режимі вибору, і якщо вибір відбувся, то результат буде збережено в ISpr.MD.Choice.loSpr = CreateObject('iSpr','_KSPROF') loSpr.isSelectMode = .T. loSpr.Show() If VarType(loSpr)='O' MessageBox(loSpr.MD.Choice) EndIf |
|
| MD | TSpr | Посилання на об'ект метаданих якій відображуе інтерфейс |