Добавить
_screen.ActiveForm.ourTB.ButtonClick(_screen.ActiveForm.ourTB.Buttons("Add"))
TYPE("_screen.ActiveForm.ourTB.Buttons('Add')")!="O"
Редактировать
_screen.ActiveForm.ourTB.ButtonClick(_screen.ActiveForm.ourTB.Buttons("Edit"))
TYPE("_screen.ActiveForm.ourTB.Buttons('Edit')")!="O"
Удалить
_screen.ActiveForm.ourTB.ButtonClick(_screen.ActiveForm.ourTB.Buttons("Del"))
TYPE("_screen.ActiveForm.ourTB.Buttons('Del')")!="O"
Пометить все
_screen.ActiveForm.ourTB.ButtonClick(_screen.ActiveForm.ourTB.Buttons("Mark"))
TYPE("_screen.ActiveForm.ourTB.Buttons('Mark')")!="O"
Исключить все
_screen.ActiveForm.ourTB.ButtonClick(_screen.ActiveForm.ourTB.Buttons("UnMark"))
TYPE("_screen.ActiveForm.ourTB.Buttons('UnMark')")!="O"
Поиск
_screen.ActiveForm.ourTB.ButtonClick(_screen.ActiveForm.ourTB.Buttons("Find"))
TYPE("_screen.ActiveForm.ourTB.Buttons('Find')")!="O"
Подготовить cab
do PrepairCab with id
TYPE("oCntr")!="O"
Печать
_screen.ActiveForm.ourTB.ButtonClick(_screen.ActiveForm.ourTB.Buttons("Print"))
TYPE("_screen.ActiveForm.ourTB.Buttons('Print')")!="O"