GdcConst.TgdcConst
Материал из GedeminWiki
(Различия между версиями)
SYSDBA (обсуждение | вклад) |
SYSDBA (обсуждение | вклад) (→Описание) |
||
| (не показана 1 промежуточная версия 1 участника) | |||
| Строка 7: | Строка 7: | ||
Механизм констант платформы Гедымин предназначен для удобной работы с величинами вроде ставки НДС, размера минимальной заработной платы, базовой величины и т.п. Тип данных константы может быть строкой, датой или числом. Три независимых признака определяют поведение константы: | Механизм констант платформы Гедымин предназначен для удобной работы с величинами вроде ставки НДС, размера минимальной заработной платы, базовой величины и т.п. Тип данных константы может быть строкой, датой или числом. Три независимых признака определяют поведение константы: | ||
| − | * Периодическая -- для каждого значения указывается дата, начиная с которой оно вступает в силу. | + | * '''Периодическая''' -- для каждого значения указывается дата, начиная с которой оно вступает в силу. |
| − | * Организация -- каждое значение привязывается к своей организации. | + | * '''Организация''' -- каждое значение привязывается к своей организации. |
| − | * Пользователь -- каждое значение привязывается к пользователю системы. | + | * '''Пользователь''' -- каждое значение привязывается к пользователю системы. |
| − | Список констант и их значений хранится в таблице [[GD_CONST]] и [[GD_CONSTVALUE]], соответственно. | + | Список констант и их значений хранится в таблице [[GD_CONST]] и [[GD_CONSTVALUE]], соответственно. Форма просмотра открывается командой '''Константы''' из раздела '''Сервис''' Исследователя системы. |
| + | |||
| + | Пример использования значения константы в макросах: | ||
| + | |||
| + | <syntaxhighlight lang="VB"> | ||
| + | ... | ||
| + | Dim Creator, gdcConst, SimpleConst, PeriodicalConst | ||
| + | Set Creator = New TCreator | ||
| + | Set gdcConst = Creator.GetObject(null, "TgdcConst", "") | ||
| + | |||
| + | ' RUID константы следует взять из окна Свойста объекта | ||
| + | SimpleConst = gdcConst.QGetValueByID(gdcBaseManager.GetIDByRUIDString("147901775_143913310")) | ||
| + | |||
| + | ' Получение значения периодической константы на дату 01.01.2000 | ||
| + | PeriodicalConst = gdcConst.QGetValueByIDAndDate(gdcBaseManager.GetIDByRUIDString("147901775_143913310"), DateSerial(2000, 01, 01)) | ||
| + | </syntaxhighlight> | ||
| + | |||
| + | Приведенные выше функции '''QGetValueByID''' и '''QGetValueByIDAndDate''' будут использовать ИД текущей рабочей организации (список ИД, в случае холдинга) и текущего пользователя для извлечения значения. | ||
Текущая версия на 16:11, 27 августа 2014
| Модуль: GdcConst.pas | Конструкторы и деструкторы | Свойства | Методы | События | Наследованные члены |
Delphi:
TgdcConst = class(TgdcBase)
[править] Описание
Бизнес-класс для работы с константами.
Механизм констант платформы Гедымин предназначен для удобной работы с величинами вроде ставки НДС, размера минимальной заработной платы, базовой величины и т.п. Тип данных константы может быть строкой, датой или числом. Три независимых признака определяют поведение константы:
- Периодическая -- для каждого значения указывается дата, начиная с которой оно вступает в силу.
- Организация -- каждое значение привязывается к своей организации.
- Пользователь -- каждое значение привязывается к пользователю системы.
Список констант и их значений хранится в таблице GD_CONST и GD_CONSTVALUE, соответственно. Форма просмотра открывается командой Константы из раздела Сервис Исследователя системы.
Пример использования значения константы в макросах:
... Dim Creator, gdcConst, SimpleConst, PeriodicalConst Set Creator = New TCreator Set gdcConst = Creator.GetObject(null, "TgdcConst", "") ' RUID константы следует взять из окна Свойста объекта SimpleConst = gdcConst.QGetValueByID(gdcBaseManager.GetIDByRUIDString("147901775_143913310")) ' Получение значения периодической константы на дату 01.01.2000 PeriodicalConst = gdcConst.QGetValueByIDAndDate(gdcBaseManager.GetIDByRUIDString("147901775_143913310"), DateSerial(2000, 01, 01))
Приведенные выше функции QGetValueByID и QGetValueByIDAndDate будут использовать ИД текущей рабочей организации (список ИД, в случае холдинга) и текущего пользователя для извлечения значения.
