Проектирование приложения базы данных «Методичка», страница 8

Функция производит добавление в справочник NameSprav новой записи со значением полей Params. В случае успешного добавления (отсутствия идентичной записи в справочнике, соответствия прав доступа) функция возвращает True, иначе False.

7. public Function Edit (NameSprav:String; Params:StructForParams): boolean // редактирование  в указанном справочнике текущей записи.

Функция производит редактирование в справочнике NameSprav текущей записи, заменяя на новую со значением полей Params. В случае успешного редактирования (отсутствия идентичной записи в справочнике, соответствия прав доступа) функция возвращает True, иначе False.

8. public Function Delete (NameSprav:String): boolean // удаление  в указанном справочнике текущей записи.

Функция производит удаление в справочнике NameSprav текущей записи. В случае успешного удаления (отсутствия дочерних записей, соответствия прав доступа) функция возвращает True, иначе False.

2. TSpYchGodTable (аналогично для TSpLabRabTable, TSpDisTable, TSpSpecTable, TSpMetodTable)

Атрибуты:

private UserRole: integer – статус текущего пользователя.

Методы:

1. Constructor InitSpravYchGod (dbTable:TTable;) //получение экземпляра класса TSpYchGodTable.

В качестве параметра в данную функцию передается таблица справочника учебных годов.

2. Distructor Destroy () // уничтожение  экземпляра класса  TSpYchGodTable.

3. private Procedure SetRole (Role:Byte) // устанавливает статус текущего пользователя.

Присваивает атрибуту UserRole значение Role.

4. private Function GetCode (Params:StructForParams): Integer // получение кода (идентификатора) из справочника для заданного сочетания полей.

Список значений полей Params передаются в данную функцию в качестве параметра.

5. private Function GetInfByCode (Code:Integer): StructForParams // получение сочетания полей  из справочника для заданного идентификатора.

Идентификатор записи Code передается в данную структуру в качестве параметра.

6. private Function Insert (Params:StructForParams): boolean // добавление в указанный справочник новой записи.

Функция производит добавление в справочник новой записи со значением полей Params. В случае успешного добавления (отсутствия идентичной записи в справочнике, соответствия прав доступа) функция возвращает True, иначе False.

7. private Function Edit (Params:StructForParams): boolean // редактирование  в указанном справочнике текущей записи.

Функция производит редактирование в справочнике текущей записи, заменяя на новую со значением полей Params. В случае успешного редактирования (отсутствия идентичной записи в справочнике, соответствия прав доступа) функция возвращает True, иначе False.

8. private Function Delete (): boolean // удаление  в указанном справочнике текущей записи.

Функция производит удаление в справочнике текущей записи. В случае успешного удаления (отсутствия дочерних записей, соответствия прав доступа) функция возвращает True, иначе False.

6.1.4. Модуль периода актуальности

Модуль периода актуальности содержит класс  TPerAktTable.

Атрибуты:

private UserRole: integer – статус текущего пользователя.

Методы:

1. Constructor InitPerAkt (dbTable:TTable) //получение экземпляра класса TPerAktTable.

В качестве параметра в данную функцию передается таблица периодов актуальности.

2. Distructor Destroy () // уничтожение  экземпляра класса  TPerAktTable.

3. public  Procedure SetRole (Role:Byte) // устанавливает статус текущего пользователя

Присваивает атрибуту UserRole значение Role.

4. public Function Insert (UseSpravInfo:TUseSpravInfo; Params:StructForParams): boolean // добавление новой записи.

Функция производит добавление в таблицу новой записи со значением кодов полей Params. В случае успешного добавления (отсутствия идентичной записи в справочнике, соответствия прав доступа) функция возвращает True, иначе False.

Для получения кодов соответствующих полей данный класс использует объект класса TUseSpravInfo, котрый передается в функцию в качестве параметра.

7. public Function Edit (UseSpravInfo:TUseSpravInfo; Params:StructForParams): boolean // редактирование  текущей записи.