• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

ЗиК 7.7 Типовая. Док-т ПеречислениеЗарплатыВБанк, вид рас-та Перечисле

  • Автор темы shoutakascream
  • Дата начала
S

shoutakascream

Добрый вечер.
Работаю в ЗиК 7.7. Типовая конфигурация. Есть документ - Перечисление Зарплаты В Банк. В нем удержание задается числом. Необходимо, чтобы удержание задавалось процентом, а процент считался от конечного сальдо для сотрудника за данный период. Документ вводит Вид расчета - Перечисление В Банк. В типовой код вида расчета добавил следующее:

Код:
жз = СоздатьОбъект("ЖурналРасчетов.Зарплата");
нтп = жз.НачалоТекущегоПериода();
банк = 0;
жз.ВыбратьПериодПоОбъекту(Объект, нтп);
пока жз.ПолучитьЗапись() = 1 цикл
ВР = жз.ВидРасч;
если (ВР.ВходитВГруппу(ГруппаРасчетов.ВсеНачисления) = 1) или (ВР.ВходитВГруппу(ГруппаРасчетов.НачальноеСальдо)=1) тогда
банк = банк + жз.результат;
КонецЕсли;
Если (ВР.ВходитВГруппу(ГруппаРасчетов.ВсеУдержания) = 1) или (ВР = ВидРасчета.ВыплатаЗарплаты) тогда
банк = банк - жз.результат;
КонецЕсли;
конецЦикла;
результат = Цел(банк) * Документ.Величина /100;

В данном коде при пересчете результата учитывается само удержание, из-за чего мы получаем каждый раз новый результат. Что нужно дописать/исправить, чтобы программа не включала удержание и обходило его стороной.

Программированием занимаюсь второй месяц. Опыта мало. Буду благодарен за любую помощь. Спасибо.
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!