Контролы ButtonEdit в MIS3 — различия между версиями
Материал из ИбисоПедии
Zhukov (обсуждение | вклад) (→Контролы для стандартных элементов) |
Zhukov (обсуждение | вклад) (→Контролы для стандартных элементов) |
||
| Строка 4: | Строка 4: | ||
== Контролы для стандартных элементов == | == Контролы для стандартных элементов == | ||
* Право: SetaAsIBISRightEdit | * Право: SetaAsIBISRightEdit | ||
| − | * Страховой документ: SetaAsIBISIDocEdit | + | * Страховой документ: fGetIDOC.SetaAsIBISIDocEdit(bbPayDoc, 'idoc_id', SetButtonSave,uqMDOC.FieldValues['people_id'], False, uqHosp.FieldValues['pay_type_id'] ); |
* Страховая компания | * Страховая компания | ||
* медицинская компания | * медицинская компания | ||
Версия 10:29, 23 мая 2014
Базовый класс TSFButtonEdit
Изменяет только внешний вид кнопок, добавляет горячие клавиши.
Контролы для стандартных элементов
- Право: SetaAsIBISRightEdit
- Страховой документ: fGetIDOC.SetaAsIBISIDocEdit(bbPayDoc, 'idoc_id', SetButtonSave,uqMDOC.FieldValues['people_id'], False, uqHosp.FieldValues['pay_type_id'] );
- Страховая компания
- медицинская компания
- Место работы
- Документ, удостоверяющий личность
- Отчета
- Пользователь
- Доктора
- Доктора для определенного отделения
Алгоритм создания
- Пишем запрос в котором будет key_field и val_field
- Размещаем на форме TcxDBButtonEdit, связываем с полем val_field
- На OnCreate вызываем процедуру вида SetaAsIBISRightEdit(bbRight,'right_id', SetButtonSave );
