Имя: Пароль:
1C
1С v8
Отменить изменение основного вида начислений в ЗУП 2.5
0 IreneTS
 
21.02.18
14:39
Добрый день!
Помогите, пожалуйста. Надо отменить редактирование основного вида начисления. Был расчет по произвольной формуле расчета ТарифнаяСтавкаЧасовая*ВремяВЧасах*KPI
Изменили на расчет процентом, но, такой вариант тоже не подошел, так как надо вводить еще проценты всем, а сотрудников более 1000. Решили откатать обратно, но не вышло(( При попытке сохранения пишет, что "Показатели формулы расчета нельзя менять, так как по данному виду расчета проведены документы" и вываливает кучу документов, где это начисление прошло.
Кто-нибудь может подсказать, как можно вернуть все как было?
1 d4rkmesa
 
гуру
21.02.18
14:59
(0) Программно:

ТипСсылки = ТипЗнч(СсылкаНаОбъект);
    МетаданныеСсылки = СсылкаНаОбъект.Метаданные();
    Если Справочники.ТипВсеСсылки().СодержитТип(ТипСсылки) Тогда
        Менеджер = Справочники[МетаданныеСсылки.Имя];
    ИначеЕсли ПланыВидовХарактеристик.ТипВсеСсылки().СодержитТип(ТипСсылки) Тогда
        Менеджер = ПланыВидовХарактеристик[МетаданныеСсылки.Имя];
    ИначеЕсли ПланыСчетов.ТипВсеСсылки().СодержитТип(ТипСсылки) Тогда
        Менеджер = ПланыСчетов[МетаданныеСсылки.Имя];
    ИначеЕсли ПланыВидовРасчета.ТипВсеСсылки().СодержитТип(ТипСсылки) Тогда
        Менеджер = ПланыВидовРасчета[МетаданныеСсылки.Имя];        
    КонецЕсли;
    
    Попытка
        Объект = СсылкаНаОбъект.ПолучитьОбъект();    
        Объект[НаименованиеРеквизита] = ЗначениеРеквизита;
        Объект.ОбменДанными.Загрузка = Истина;
        Объект.Записать();
    Исключение
        Сообщить(ОписаниеОшибки());
    КонецПопытки;
2 d4rkmesa
 
гуру
21.02.18
14:59
(1) Главное тут:
Объект.ОбменДанными.Загрузка = Истина;
3 IreneTS
 
21.02.18
17:20
Спасибо огромное!
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.