• 🔥 Бесплатный курс от Академии Кодебай: «Анализ защищенности веб-приложений»

    🛡 Научитесь находить и использовать уязвимости веб-приложений.
    🧠 Изучите SQLi, XSS, CSRF, IDOR и другие типовые атаки на практике.
    🧪 Погрузитесь в реальные лаборатории и взломайте свой первый сайт!
    🚀 Подходит новичкам — никаких сложных предварительных знаний не требуется.

    Доступ открыт прямо сейчас Записаться бесплатно

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

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

shoutakascream

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

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

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

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

Взломай свой первый сервер и прокачай скилл — Начни игру на HackerLab