ПРОДАЖА И ВНЕДРЕНИЕ 1С

по всей России

+7 (495) 223-32-11

Заказать обратный звонок

8 (800) 775-90-01

Бесплатно по России

Получить

Скорую 1С помощь

Получить

Проконсультироваться
со специалистом 1С

Консультироваться

В примере обнуляется флаг ручной правки расчетов выбранного сотрудника, кроме
расчетов с ВР ПремияСум, для которых, наоборот, вносится ручная правка результата.
Новая величина премии равна 1250 руб. Попутно выполняется расчет записей,
с которых снимется флаг ручной правки.

Код 1C v 7.x
 сСотр_2 = СоздатьОбъект("Справочник.Сотрудники");
      
// Метод Выбрать вызывает диалог для выбора элемента справочника
// Если сотрудник не выбран
если сСотр_2.Выбрать("Выберите сотрудника", "ФормаДляВыбора") = 0 тогда
Предупреждение("Сотрудник не выбран.");
возврат;
конецЕсли;
// Выбран Агальцов Ю. А.
жз = СоздатьОбъект("ЖурналРасчетов.Зарплата");
жз.ВыбратьПериодПоОбъекту(сСотр_2.ТекущийЭлемент());
ВР = ВидРасчета.ПремияСум;
пока жз.ПолучитьЗапись() = 1 цикл
если (жз.Исправлена = 1) и (жз.ВидРасч = ВР) тогда
жз.ОтменитьИсправление(); // Снимаем флаг ручной правки результата
жз.Рассчитать(); // Рассчитываем запись
конецЕсли;
если жз.ВидРасч = ВР тогда
жз.Исправить( 1250.0);
конецЕсли;
конецЦикла; // пока
Предупреждение("Готово.");
конецПроцедуры


Заказать обратный звонок

Позвонить
Отправлено! В самое ближайшее время наш менеджер свяжется с Вами.