Автоматизация документирования деятельности организации. Кирюхин Ю.Г - 59 стр.

UptoLike

59
Для выполнения расчетов в приведенном примере использованы
несколько вычисляемых полей, содержащих промежуточные результаты.
Они не отображаются на экранной форме. Для этого свойство
вычисляемого поля Вывод на экран на вкладке Макет установлено в Нет.
Порядок выполнения расчетов:
1 Создано вычисляемое поле Лет, содержащее количество лет
выслуги:
Лет =DateDiff("yyyy";[Дата поступления];Date(
))
Возвращает число лет в интервале между датой поступления и
текущей датой.
2 Для подсчета количества месяцев к дате поступления добавлено
вычисленное количество лет. Создано скрытое поле Поле1:
Поле1=DateAdd("yyyy"; DateDiff("yyyy";[Дата поступления];Date());[Дата
поступления])
3 Вычислено количество месяцев:
Месяцев = DateDiff("m";[Поле1];Date())
Аналогично произведено вычисление числа дней для поля Дней.
Необходимо
учесть, что некоторые вычисленные значения могут
быть отрицательными. В этом случае для коррекции расчетов необходимо
использовать функцию IIf с аргументами (логическое выражение; значение
или выражение, при котором логическое выражение выполняется;
значение или выражение, при котором логическое выражение не
выполняется).
Например, если количество месяцев оказалось меньше, чем 0,
необходимо пересчитать количество лет.
В этом случае в поле Лет
помещается выражение следующего вида:
=IIf(DateDiff("m"; [Поле1]; Date())<0; DateDiff("yyyy"; [Дата
поступления]; Date())-1; DateDiff("yyyy"; [Дата поступления]; Date())
В следующем примере (Рисунок 15, Рисунок 16) показано
применение функций Day, Month, Year и Len.
     Для выполнения расчетов в приведенном примере использованы
несколько вычисляемых полей, содержащих промежуточные результаты.
Они не отображаются на экранной форме. Для этого свойство
вычисляемого поля Вывод на экран на вкладке Макет установлено в Нет.


     Порядок выполнения расчетов:
     1 Создано вычисляемое поле Лет, содержащее количество лет
выслуги:
     Лет =DateDiff("yyyy";[Дата поступления];Date())
     Возвращает число лет в интервале между датой поступления и
текущей датой.
     2 Для подсчета количества месяцев к дате поступления добавлено
вычисленное количество лет. Создано скрытое поле Поле1:
Поле1=DateAdd("yyyy"; DateDiff("yyyy";[Дата поступления];Date());[Дата
поступления])
     3 Вычислено количество месяцев:
     Месяцев = DateDiff("m";[Поле1];Date())
     Аналогично произведено вычисление числа дней для поля Дней.
     Необходимо учесть, что некоторые вычисленные значения могут
быть отрицательными. В этом случае для коррекции расчетов необходимо
использовать функцию IIf с аргументами (логическое выражение; значение
или выражение, при котором логическое выражение выполняется;
значение или выражение, при котором логическое выражение не
выполняется).
     Например, если количество месяцев оказалось меньше, чем 0,
необходимо пересчитать количество лет. В этом случае в поле Лет
помещается выражение следующего вида:
     =IIf(DateDiff("m"; [Поле1]; Date())<0; DateDiff("yyyy"; [Дата
поступления]; Date())-1; DateDiff("yyyy"; [Дата поступления]; Date())
     В следующем примере (Рисунок 15, Рисунок 16) показано
применение функций Day, Month, Year и Len.


                                     59