Рассчитано с 1800 до 2199, но можно сделать универсально по аналогии разбора последних двух цифр года, тогда получится с 0000 до 9999 года.
Для пустой даты результат: " . . "
ВЫБРАТЬ
ВЫБОР
КОГДА &Дата = ДАТАВРЕМЯ(1, 1, 1)
ТОГДА " "
КОГДА ДЕНЬ(&Дата) = 1
ТОГДА "01"
КОГДА ДЕНЬ(&Дата) = 2
ТОГДА "02"
КОГДА ДЕНЬ(&Дата) = 3
ТОГДА "03"
КОГДА ДЕНЬ(&Дата) = 4
ТОГДА "04"
КОГДА ДЕНЬ(&Дата) = 5
ТОГДА "05"
КОГДА ДЕНЬ(&Дата) = 6
ТОГДА "06"
КОГДА ДЕНЬ(&Дата) = 7
ТОГДА "07"
КОГДА ДЕНЬ(&Дата) = 8
ТОГДА "08"
КОГДА ДЕНЬ(&Дата) = 9
ТОГДА "09"
КОГДА ДЕНЬ(&Дата) = 10
ТОГДА "10"
КОГДА ДЕНЬ(&Дата) = 11
ТОГДА "11"
КОГДА ДЕНЬ(&Дата) = 12
ТОГДА "12"
КОГДА ДЕНЬ(&Дата) = 13
ТОГДА "13"
КОГДА ДЕНЬ(&Дата) = 14
ТОГДА "14"
КОГДА ДЕНЬ(&Дата) = 15
ТОГДА "15"
КОГДА ДЕНЬ(&Дата) = 16
ТОГДА "16"
КОГДА ДЕНЬ(&Дата) = 17
ТОГДА "17"
КОГДА ДЕНЬ(&Дата) = 18
ТОГДА "18"
КОГДА ДЕНЬ(&Дата) = 19
ТОГДА "19"
КОГДА ДЕНЬ(&Дата) = 20
ТОГДА "20"
КОГДА ДЕНЬ(&Дата) = 21
ТОГДА "21"
КОГДА ДЕНЬ(&Дата) = 22
ТОГДА "22"
КОГДА ДЕНЬ(&Дата) = 23
ТОГДА "23"
КОГДА ДЕНЬ(&Дата) = 24
ТОГДА "24"
КОГДА ДЕНЬ(&Дата) = 25
ТОГДА "25"
КОГДА ДЕНЬ(&Дата) = 26
ТОГДА "26"
КОГДА ДЕНЬ(&Дата) = 27
ТОГДА "27"
КОГДА ДЕНЬ(&Дата) = 28
ТОГДА "28"
КОГДА ДЕНЬ(&Дата) = 29
ТОГДА "29"
КОГДА ДЕНЬ(&Дата) = 30
ТОГДА "30"
КОГДА ДЕНЬ(&Дата) = 31
ТОГДА "31"
КОНЕЦ + "." + ВЫБОР
КОГДА &Дата = ДАТАВРЕМЯ(1, 1, 1)
ТОГДА " "
КОГДА МЕСЯЦ(&Дата) = 1
ТОГДА "01"
КОГДА МЕСЯЦ(&Дата) = 2
ТОГДА "02"
КОГДА МЕСЯЦ(&Дата) = 3
ТОГДА "03"
КОГДА МЕСЯЦ(&Дата) = 4
ТОГДА "04"
КОГДА МЕСЯЦ(&Дата) = 5
ТОГДА "05"
КОГДА МЕСЯЦ(&Дата) = 6
ТОГДА "06"
КОГДА МЕСЯЦ(&Дата) = 7
ТОГДА "07"
КОГДА МЕСЯЦ(&Дата) = 8
ТОГДА "08"
КОГДА МЕСЯЦ(&Дата) = 9
ТОГДА "09"
КОГДА МЕСЯЦ(&Дата) = 10
ТОГДА "10"
КОГДА МЕСЯЦ(&Дата) = 11
ТОГДА "11"
КОГДА МЕСЯЦ(&Дата) = 12
ТОГДА "12"
КОНЕЦ + "." + ВЫБОР
КОГДА &Дата = ДАТАВРЕМЯ(1, 1, 1)
ТОГДА " "
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ = 18
ТОГДА "18"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ = 19
ТОГДА "19"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ = 20
ТОГДА "20"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ = 21
ТОГДА "21"
ИНАЧЕ ""
КОНЕЦ + ВЫБОР
КОГДА &Дата = ДАТАВРЕМЯ(1, 1, 1)
ТОГДА " "
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) > (ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10
ТОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))
КОНЕЦ = 0
ТОГДА "0"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) > (ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10
ТОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))
КОНЕЦ = 1
ТОГДА "1"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) > (ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10
ТОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))
КОНЕЦ = 2
ТОГДА "2"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) > (ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10
ТОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))
КОНЕЦ = 3
ТОГДА "3"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) > (ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10
ТОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))
КОНЕЦ = 4
ТОГДА "4"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) > (ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10
ТОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))
КОНЕЦ = 5
ТОГДА "5"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) > (ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10
ТОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))
КОНЕЦ = 6
ТОГДА "6"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) > (ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10
ТОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))
КОНЕЦ = 7
ТОГДА "7"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) > (ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10
ТОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))
КОНЕЦ = 8
ТОГДА "8"
КОГДА ВЫБОР
КОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) > (ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10
ТОГДА (ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ((ГОД(&Дата) / 100 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) > ГОД(&Дата) / 100
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 100 КАК ЧИСЛО(3, 0))
КОНЕЦ) * 10 КАК ЧИСЛО(2, 0))
КОНЕЦ = 9
ТОГДА "9"
ИНАЧЕ ""
КОНЕЦ + ВЫБОР
КОГДА &Дата = ДАТАВРЕМЯ(1, 1, 1)
ТОГДА " "
КОГДА (ГОД(&Дата) / 10 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) > ГОД(&Дата) / 10
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))
КОНЕЦ) * 10 = 0
ТОГДА "0"
КОГДА (ГОД(&Дата) / 10 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) > ГОД(&Дата) / 10
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))
КОНЕЦ) * 10 = 1
ТОГДА "1"
КОГДА (ГОД(&Дата) / 10 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) > ГОД(&Дата) / 10
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))
КОНЕЦ) * 10 = 2
ТОГДА "2"
КОГДА (ГОД(&Дата) / 10 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) > ГОД(&Дата) / 10
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))
КОНЕЦ) * 10 = 3
ТОГДА "3"
КОГДА (ГОД(&Дата) / 10 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) > ГОД(&Дата) / 10
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))
КОНЕЦ) * 10 = 4
ТОГДА "4"
КОГДА (ГОД(&Дата) / 10 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) > ГОД(&Дата) / 10
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))
КОНЕЦ) * 10 = 5
ТОГДА "5"
КОГДА (ГОД(&Дата) / 10 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) > ГОД(&Дата) / 10
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))
КОНЕЦ) * 10 = 6
ТОГДА "6"
КОГДА (ГОД(&Дата) / 10 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) > ГОД(&Дата) / 10
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))
КОНЕЦ) * 10 = 7
ТОГДА "7"
КОГДА (ГОД(&Дата) / 10 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) > ГОД(&Дата) / 10
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))
КОНЕЦ) * 10 = 8
ТОГДА "8"
КОГДА (ГОД(&Дата) / 10 - ВЫБОР
КОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) > ГОД(&Дата) / 10
ТОГДА (ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))) - 1
ИНАЧЕ ВЫРАЗИТЬ(ГОД(&Дата) / 10 КАК ЧИСЛО(4, 0))
КОНЕЦ) * 10 = 9
ТОГДА "9"
ИНАЧЕ ""
КОНЕЦ КАК ДатаСтрокой