суббота, 16 января 2021 г.

Тофик Бухгалтерия Аз - расчет и проведение удержаний по безработице и обязательного мед страхования в документе больничного

 Тофик Бухгалтерия Аз - расчет и проведение  удержаний по безработице и обязательного мед страхования в документе больничного



Функция СформироватьЗапросПоОтражениюВУчете()
    
    Запрос = Новый Запрос();
    
    
    Если ОтражатьВНалоговомУчете Тогда
        ПоказателиДляНУ = "
    |    ОтражениеЗарплаты.СчетДтНУ                КАК СчетДтНУ,
    |    ОтражениеЗарплаты.СчетДтНУ.Наименование    КАК НаименованиеСчетДтНУ,
    |    ОтражениеЗарплаты.СубконтоДтНУ1            КАК СубконтоДтНУ1,
    |    ОтражениеЗарплаты.СубконтоДтНУ2            КАК СубконтоДтНУ2,
    |    ОтражениеЗарплаты.СубконтоДтНУ3            КАК СубконтоДтНУ3,
    |    ОтражениеЗарплаты.СчетКтНУ                КАК СчетКтНУ,
    |    ОтражениеЗарплаты.СубконтоКтНУ1            КАК СубконтоКтНУ1,
    |    ОтражениеЗарплаты.СубконтоКтНУ2            КАК СубконтоКтНУ2,
    |    ОтражениеЗарплаты.СубконтоКтНУ3            КАК СубконтоКтНУ3,";
    КонецЕсли;

Процедура ДействияФормыДействиеРассчитатьУдержания(Кнопка)
    
    Если Не РасчетДокументаРазрешен() Тогда
        Возврат
    КонецЕсли;
    
    Если НЕ РаботаСДиалогами.ЗаписатьДокументОтменивПроведениеПередВыполнениемДействия(ДокументОбъект, ЭтаФорма, НСтр("ru='рассчитать';uk='розрахувати'")) Тогда
        Возврат;
    КонецЕсли;
    
    КомментироватьРасчет = Ложь;
    мСотрудники = Новый СписокЗначений;
    
    // РассчитатьПоРаботнику
    Для каждого СтрокаСотрудник Из ЭлементыФормы.РаботникиОрганизации.ВыделенныеСтроки Цикл
        мСотрудники.Добавить(СтрокаСотрудник.Сотрудник) ;
    КонецЦикла;
    
    Если Кнопка.Имя = "РассчитатьПоРаботникуСКомментарием" Тогда
        КомментироватьРасчет = Истина;
    КонецЕсли;
     ОбработкаКомментариев2=обработки.СообщенияВыполняемыхДействий.Создать();
    
     //ЗаполнитьЗначение(ОбработкаКомментариев2,  глЗначениеПеременной("глОбработкаСообщений"));
    ОбработкаКомментариев2.УдалитьСообщения();
    РассчитатьВсеУдержания(мСотрудники, КомментироватьРасчет);
ОбработкаКомментариев2.ПоказатьСообщения();

    

Комментариев нет:

КА 2 для Азербайджана - Комплексная автоматизация

 Проблема при отражение документа поступление безналичных ДС . Решение поменять взаиморасчет на режим оффлайн