88098aa86f
Включает перемещение по ячейкам, стикеровку МП, синхронизацию справочников и обработку кодов маркировки. Co-authored-by: Cursor <cursoragent@cursor.com>
48 lines
2.9 KiB
Plaintext
48 lines
2.9 KiB
Plaintext
///////////////////////////////////////////////////////////////////////////////////////////////////////
|
||
// Copyright (c) 2024, ООО 1С-Софт
|
||
// Все права защищены. Эта программа и сопроводительные материалы предоставляются
|
||
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
|
||
// Текст лицензии доступен по ссылке:
|
||
// https://creativecommons.org/licenses/by/4.0/legalcode
|
||
///////////////////////////////////////////////////////////////////////////////////////////////////////
|
||
|
||
#Область СлужебныйПрограммныйИнтерфейс
|
||
|
||
|
||
Функция ОпределитьДатуОчисткиОпераций(ПериодХранения) Экспорт
|
||
|
||
ТекущаяДата = ОбщегоНазначенияБПО.ДатаСеанса();
|
||
Если ПериодХранения = Перечисления.ПериодХраненияИсторииОпераций.День Тогда
|
||
ОдинДеньСекунды = 60*60*24*1;
|
||
ДатаОчистки = ТекущаяДата - ОдинДеньСекунды;
|
||
ИначеЕсли ПериодХранения = Перечисления.ПериодХраненияИсторииОпераций.Неделя Тогда
|
||
НеделяСекунды = 60*60*24*7;
|
||
ДатаОчистки = ТекущаяДата - НеделяСекунды;
|
||
ИначеЕсли ПериодХранения = Перечисления.ПериодХраненияИсторииОпераций.Декада Тогда
|
||
ДекадаСекунды = 60*60*24*10;
|
||
ДатаОчистки = ТекущаяДата - ДекадаСекунды;
|
||
ИначеЕсли ПериодХранения = Перечисления.ПериодХраненияИсторииОпераций.Месяц Тогда
|
||
ДатаОчистки = ДобавитьМесяц(ТекущаяДата, -1);
|
||
ИначеЕсли ПериодХранения = Перечисления.ПериодХраненияИсторииОпераций.Квартал Тогда
|
||
ДатаОчистки = ДобавитьМесяц(ТекущаяДата, -3);
|
||
ИначеЕсли ПериодХранения = Перечисления.ПериодХраненияИсторииОпераций.Полугодие Тогда
|
||
ДатаОчистки = ДобавитьМесяц(ТекущаяДата, -6);
|
||
ИначеЕсли ПериодХранения = Перечисления.ПериодХраненияИсторииОпераций.Год Тогда
|
||
ДатаОчистки = ДобавитьМесяц(ТекущаяДата, -12);
|
||
Иначе
|
||
Возврат Неопределено;
|
||
КонецЕсли;
|
||
|
||
Возврат ДатаОчистки;
|
||
|
||
КонецФункции
|
||
|
||
#КонецОбласти
|
||
|
||
#Область СлужебныеПроцедурыИФункции
|
||
|
||
|
||
#КонецОбласти
|
||
|
||
|