Пример универсального кода. С используемой периодичностью и количеством периодов
&НаСервереБезКОнтекста
Функция ОтнятьПериод(ТочкаОтсчета,Периодичность,КоличествоПериодовАнализа)
НоваяДата = ТочкаОтсчета;
Если Периодичность = Перечисления.Периодичность.Год Тогда
НоваяДата = ДобавитьМесяц(ТочкаОтсчета, -12*КоличествоПериодовАнализа);
ИначеЕсли Периодичность = Перечисления.Периодичность.Полугодие Тогда
НоваяДата = ДобавитьМесяц(ТочкаОтсчета, -6*КоличествоПериодовАнализа);
ИначеЕсли Периодичность = Перечисления.Периодичность.Квартал Тогда
НоваяДата = ДобавитьМесяц(ТочкаОтсчета, -3*КоличествоПериодовАнализа);
ИначеЕсли Периодичность = Перечисления.Периодичность.Месяц Тогда
НоваяДата = ДобавитьМесяц(ТочкаОтсчета, -1*КоличествоПериодовАнализа);
ИначеЕсли Периодичность = Перечисления.Периодичность.Декада Тогда
НоваяДата = ТочкаОтсчета - 86400*10*КоличествоПериодовАнализа;
ИначеЕсли Периодичность = Перечисления.Периодичность.Неделя Тогда
НоваяДата = ТочкаОтсчета - 86400*7*КоличествоПериодовАнализа;
ИначеЕсли Периодичность = Перечисления.Периодичность.День Тогда
НоваяДата = ТочкаОтсчета - 86400*КоличествоПериодовАнализа;
КонецЕсли;
Возврат НоваяДата;
КонецФункции
&НаСервереБезКОнтекста
Функция ОтнятьПериод(ТочкаОтсчета,Периодичность,КоличествоПериодовАнализа)
НоваяДата = ТочкаОтсчета;
Если Периодичность = Перечисления.Периодичность.Год Тогда
НоваяДата = ДобавитьМесяц(ТочкаОтсчета, -12*КоличествоПериодовАнализа);
ИначеЕсли Периодичность = Перечисления.Периодичность.Полугодие Тогда
НоваяДата = ДобавитьМесяц(ТочкаОтсчета, -6*КоличествоПериодовАнализа);
ИначеЕсли Периодичность = Перечисления.Периодичность.Квартал Тогда
НоваяДата = ДобавитьМесяц(ТочкаОтсчета, -3*КоличествоПериодовАнализа);
ИначеЕсли Периодичность = Перечисления.Периодичность.Месяц Тогда
НоваяДата = ДобавитьМесяц(ТочкаОтсчета, -1*КоличествоПериодовАнализа);
ИначеЕсли Периодичность = Перечисления.Периодичность.Декада Тогда
НоваяДата = ТочкаОтсчета - 86400*10*КоличествоПериодовАнализа;
ИначеЕсли Периодичность = Перечисления.Периодичность.Неделя Тогда
НоваяДата = ТочкаОтсчета - 86400*7*КоличествоПериодовАнализа;
ИначеЕсли Периодичность = Перечисления.Периодичность.День Тогда
НоваяДата = ТочкаОтсчета - 86400*КоличествоПериодовАнализа;
КонецЕсли;
Возврат НоваяДата;
КонецФункции