�?зменения в функциях бухгалтерских отчетов

После переработки бухгалтерских отчетов печатные формы по ним требуют внесения некоторых изменений. Стандартные печатные формы уже исправлены, нужно только загрузить последнюю версию настройки "Бух. отчеты". Изменения необходимо внести только в печатные формы не входящих в стандартную комплектацию Гедемина.

Дополнительные наборы данных в отчетах "Анализ счета", "Карта счета" были перенесены с формы в главный объект. Поэтому нужно заменить ссылки на эти объекты следующим образом:

было:

  set ibdsMain = OwnerForm.FindComponent("ibdsMain")
  set ibdsSaldo = OwnerForm.FindComponent("ibdsSaldo")
  set ibdsSaldoEnd = OwnerForm.FindComponent("ibdsSaldoEnd")
  set ibdsCirculation = OwnerForm.FindComponent("ibdsCirculation")

стало:

  set ibdsMain = OwnerForm.FindComponent("ibdsMain")
  set ibdsSaldo = ibdsMain.IBDSSaldoBegin
  set ibdsSaldoEnd = ibdsMain.IBDSSaldoEnd
  set ibdsCirculation = ibdsMain.IBDSCirculation

Имена параметров begindate и enddate

Имена параметров для указания диапазона дат в бухгалтерских отчетах приведены к единому виду -- BEGINDATE и ENDDATE. Там, где раньше было:

  set q = BaseQueryList.Query(BaseQueryList.Add("ibdsMain", 0))
  q.SQL = OwnerForm.FindComponent("ibdsMain").SelectSQL.Text
  q.ParamByName("datebegin").AsDateTime = OwnerForm.FindComponent("ibdsMain").ParamByName("datebegin").AsDateTime
  q.ParamByName("dateend").AsDateTime = OwnerForm.FindComponent("ibdsMain").ParamByName("dateend").AsDateTime
  q.Open

теперь следует писать:

  set q = BaseQueryList.Query(BaseQueryList.Add("ibdsMain", 0))
  q.SQL = ibdsMain.SelectSQL.Text
  q.ParamByName("begindate").AsDateTime = ibdsMain.ParamByName("begindate").AsDateTime
  q.ParamByName("enddate").AsDateTime = ibdsMain.ParamByName("enddate").AsDateTime
  q.Open