Объект Object
1. Назначение
Внутреннее представление объекта одной из сущностей системы. Создается
при помощи вызова глобальной функции Object, а также множеством
других способов. При помощи метода Get осуществляется чтение объекта
из базы данных, при помощи метода Save - сохранение изменений объекта
в базе данных. Метод VEntity позволяет получить доступ к объекту
типа Class, описывающему сущность, к которой относится
объект системы.
2. Методы и атрибуты класса
Тип |
Имя |
Описание |
Int |
Id |
RW: Идентификатор объекта |
Class |
VEntity |
Сущность, к которой относится объект |
- |
Clear |
Полный сброс |
Int |
Get |
Чтение объекта из базы |
Int |
Save |
Сохранение объекта в базе |
Int |
Delete |
Удаление объекта из базы |
- |
Show |
Показ объекта в окне типа "Панель" |
- |
Edit |
Редактирование объекта в окне типа "Панель" |
- |
DoLookup |
Отработка лукапа на объекте |
- |
DoLookups |
Отработка всех лукапов объекта |
Bool |
Changed |
RO: Объект изменялся со времени чтения или сохранения |
х х х |
FieldByName ( Str ) |
RW: Доступ к полю объекта по имени |
х х х |
FieldById ( Int ) |
RW: Доступ к полю объекта по идентификатору |
х х х |
FieldByNum ( Int ) |
RW: Доступ к полю объекта по номеру |
х х х |
х х х |
RW: Поля объекта |
3. Пример использования
Пример использования данного класса на языке VBScript
Set gr = Grid(100120,0,-1, "Id Desc")
If gr.First Then
Set obj = gr.Current
Set ent = gr.VEntity
i = 0
Do While i < ent.FieldCount
printf "%15s = %s\n", ent.Field(i).Name,
obj.FieldByName( ent.Field(i).Name )
i = i + 1
Loop
End If
|
|