Подскажите как можно уменьшить базу зарплаты, хотябы журнал расчетов
Подскажите как можно уменьшить базу зарплаты, хотябы журнал расчетов
"Да легко =)<br><br>Создаете внешний отчет, на нем три элемента:<br>НачДата (реквизит диалога типа Дата)<br>КонДата (реквизит диалога типа Дата)<br>Выполнить (кнопка, на вкладке Дополнительно в поле Формула впишите "Удаление()" без кавычек)<br><br>В модуль обработки кладете:<br><br>//////////<br>Перем Период,НТП,КТП;<br><br>Процедура Удаление()<br> Перем Запрос, ТекстЗапроса;<br> //Создание объекта типа Запрос<br> Запрос = СоздатьОбъект("Запрос");<br> ЖР=СоздатьОбъект("ЖурналРасчетов.Зарплата");<br> ТекстЗапроса = <br> "//{{ЗАПРОС(Сформировать)<br> |Период с НачДата по КонДата;<br> |ФизЛицо = ЖурналРасчетов.Зарплата.Объект.ОсновнойЭлемент;<br> |ЗаписьЖР = ЖурналРасчетов.Зарплата.ТекущаяЗапись;<br> |Результат = ЖурналРасчетов.Зарплата.Результат;<br> |Группировка ФизЛицо без групп;<br> |Группировка ЗаписьЖР;<br> |"//}}ЗАПРОС<br> ;<br> // Если ошибка в запросе, то выход из процедуры<br> Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда<br> Возврат;<br> КонецЕсли;<br><br> Пока Запрос.Группировка(1) = 1 Цикл<br> Пока Запрос.Группировка(2) = 1 Цикл<br> ТекущаяЗапись=Запрос.ЗаписьЖР;<br> ЖР.НайтиЗапись(ТекущаяЗапись);<br> ЖР.УдалитьЗапись();<br> КонецЦикла;<br> КонецЦикла;<br> <br>КонецПроцедуры<br>///////////<br><br>И всё =) Укажите период, за который хотите удалить записи."
Ты сам то как оцениваешь последствия своего "произведения"???
Да нормально оцениваю =) Человеку нужно убрать записи журнала расчета зарплаты - этот код это делает. Как уж будет применено - дело его рук и совести.
1C:Лекторий: 16 января 2025 года, начало в 10:00 — Бесплатная онлайн-лекция об особенностях применения НДС на УСН в 2025 году и поддержке в 1С 1C:Лекторий: 21 января 2025 года, начало в 12:00 — Бесплатная онлайн-лекция о зарплатной отчетности за 2024 год - рекомендации по подготовке в 1С:ЗУП ред.3 |
1C:Лекторий: 23 января 2025 года, начало в 10:00 — Бесплатная онлайн-лекция о ККТ - ответы на частые вопросы, применение ставок 5% и 7% на УСН 1C:Лекторий: 28 января 2025 года, начало в 12:00 — Бесплатная онлайн-лекция о рисках для вашего бизнеса по Закону №152-ФЗ «О персональных данных» в 2025 году |