https://gsbelarus.com:80/gs/wiki/index.php?action=history&feed=atom&title=GdvAcctBase.TgdvAcctBase 2026-07-16T19:15:31Z История изменений этой страницы в вики MediaWiki 1.19.16 https://gsbelarus.com:80/gs/wiki/index.php?title=GdvAcctBase.TgdvAcctBase&diff=5494&oldid=prev 2012-10-11T10:24:00Z

<p>Новая страница: «{{ClassDef_Template|unit={{#explode:{{PAGENAME}}|.|0}}|class={{#explode:{{PAGENAME}}|.|1}}|src=TgdvAcctBase = class(TIBCustomDataSet)}} == Описание == &lt;onl…»</p> <p><b>Новая страница</b></p><div>{{ClassDef_Template|unit={{#explode:{{PAGENAME}}|.|0}}|class={{#explode:{{PAGENAME}}|.|1}}|src=TgdvAcctBase = class(TIBCustomDataSet)}}<br /> <br /> == Описание ==<br /> <br /> &lt;onlyinclude&gt;Базовый объект для бухгалтерских отчетов.&lt;/onlyinclude&gt;<br /> <br /> &lt;source lang=&quot;pascal&quot;&gt;<br /> TgdvAcctBase = class(TIBCustomDataSet)<br /> public<br /> // Показывать суммы в рублях<br /> procedure ShowInNCU(Show: Boolean; DecDigits: Integer = -1; Scale: Integer = 0);<br /> // Показывать суммы в валюте<br /> procedure ShowInCurr(Show: Boolean; DecDigits: Integer = -1; Scale: Integer = 0; CurrKey: TID = -1);<br /> // Показывать суммы в эквиваленте<br /> procedure ShowInEQ(Show: Boolean; DecDigits: Integer = -1; Scale: Integer = 0);<br /> <br /> // Добавляет счета, по которому будет выполняться расчет<br /> procedure AddAccount(AccountKey: TID); <br /> // Добавляет счета, по котором будут считаться корреспондирующие проводки<br /> procedure AddCorrAccount(AccountKey: TID);<br /> // Добавляет условие, например USR$GS_CUSTOMER = 147567392<br /> procedure AddCondition(FieldName: String; AValue: String);<br /> // Добавляет количественную аналитику<br /> procedure AddValue(ValueKey: TID; ValueName: String);<br /> <br /> // Загрузить конфигурацию отчета по переданному ID из таблицы AC_ACCT_CONFIG<br /> procedure LoadConfig(AID: TID);<br /> // Сохранить текущую конфигурацию отчета, возвращает ID сохраненной конфигурации<br /> function SaveConfig: TID;<br /> <br /> // Очистить конфигурацию и результаты отчета<br /> procedure Clear; virtual;<br /> // Построить отчет<br /> procedure BuildReport;<br /> // Загрузить конфигурацию и построить отчет<br /> procedure Execute(ConfigID: TID);<br /> <br /> // Дата начала периода<br /> property DateBegin: TDate;<br /> // Дата окончания периода<br /> property DateEnd: TDate;<br /> // Построить пустой отчет<br /> property MakeEmpty: Boolean;<br /> // ID компании<br /> property CompanyKey: TID;<br /> // Строить отчет по всему холдингу указанному в CompanyKey<br /> property AllHolding: Boolean;<br /> // Включать субсчета<br /> property WithSubAccounts: Boolean;<br /> // Включать внутренние проводки<br /> property IncludeInternalMovement: Boolean;<br /> // Расширенное отображение полей<br /> property ShowExtendedFields: Boolean;<br /> end;<br /> &lt;/source&gt;<br /> <br /> '''Значения по умолчанию'''<br /> <br /> DateBegin - текущая дата<br /> DateEnd - текущая дата<br /> MakeEmpty - false<br /> CompanyKey - ID текущей рабочей организации<br /> AllHolding - true<br /> WithSubAccounts - false<br /> IncludeInternalMovement - false<br /> ShowExtendedFields - false<br /> <br /> '''Вывод сумм по умолчанию'''<br /> <br /> По умолчанию выводятся только суммы в рублях. Кол-во знаков после запятой берется из системных настроек, масштаб равен 1.</div>

SYSDBA