Контролы ButtonEdit в MIS3

Базовый класс TSFButtonEdit

Изменяет только внешний вид кнопок, добавляет горячие клавиши.

Контролы для стандартных элементов

Алгоритм создания

1. Пишем запрос в котором будет key_field и val_field
2. Размещаем на форме TcxDBButtonEdit, связываем с полем val_field
3. На OnCreate вызываем процедуру вида SetaAsIBISRightEdit(bbRight,'right_id', SetButtonSave );

Ниже предоставлены примеры вызова:

Сущьность	Модуль	Открытие	ButtonEdit	ShowGetNew	Выбор
Адрес	fADDRClass	не нужна	SetAsAddrModal(bbAddr3,'addr_id', True);
Право	fGetRigth, fRigthWOT	fRigthWOT.OpenRight(<right_id>);	fGetRigth.SetaAsIBISRightEdit(bbRight,'right_id', SetButtonSave )	fGetRigth.Right_ShowGet
Страховой документ	fGetIDOC, fIDOCWOT	fIDOCWOT.IDOC_Open	fGetIDOC.SetaAsIBISIDocEdit(bbPayDoc, 'idoc_id', SetButtonSave,uqMDOC, 'people_id', False,<pay_type_id>);
Страховая компания	fGetCompanyInsur, fCompanyInsurWOT	fCompanyInsurWOT.OpenCompanyInsur	SetaAsIBISCompanyInsurEdit(bbInsurCompany, 'company_insur_id',nil);
медицинская компания	fGetCompanyMed, fCompanyMedWOT	fCompanyMedWOT.CompanyMed_Open	fGetCompanyMed.CompanyMed_ShowGet
Место работы	fGetCompanyWork
SetaAsIBISCompanyWorkEdit(bbWorkPlace,'company_id', SetButtonSave);
Документ, удостоверяющий личность	fGetPDOC
пока только функция .PDOC_ShowGet
Отчет	fGetReport1	Report1_ShowGet
Пользователь	fGetuser
SetaAsIBISEmpEdit(bbNazEmp, 'creator_id', SetButtonSave);
Доктор	fGetuser
SetaAsIBISEmpEdit(bbEmpRun, 'runemp_id', SetButtonSave, , [guoShowDept, quoOnlyDoctor]);
Доктор для определенного отделения	fGetuser	SetaAsIBISEmpEdit(bbEmpRun, 'runemp_id', SetButtonSave,'e.dept_id=2' , [guoShowDept, quoOnlyDoctor]);
Медсестры	fGetuser.SetaAsIBISEmpEdit(bbEmpRun, 'runemp_id', SetButtonSave, , [guoShowDept, quoOnlySister]);
МКБ-10	fGetICD10		ICD10_ShowGet
Участок	GetDistrict
Амбулаторный талон	fAmbTicketWOT	AmbTicket_Open(ambticket_id);