7.7 Почтовый сбор в исполнительном листе

Тема в разделе "Общие вопросы "1С:Предприятие 7.7"", создана пользователем Интересующаяся, 25 окт 2010.

  1. TopicStarter Overlay
    Интересующаяся
    Offline

    Интересующаяся

    Регистрация:
    25 окт 2010
    Сообщения:
    3
    Симпатии:
    0
    Баллы:
    1
    Как в исполнительном листе на удержание алиментов указать сумму почтового сбора (алименты перечисляются почтой), если схема удержания такая:
    от 1000 р включит-7руб+5%
    от 1001 р до 5000 р включительно -57р+4%
    от 5001 р до 20000 р включительно 217р+2%
    от 20001р до 100000р включит 517р+2%
    Буду премного благодарна!
  2. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    21.520
    Симпатии:
    407
    Баллы:
    104
    Какая конфигурация? Почтовый сбор это отдельный ВР наличие которого задается при вводе самого исполнительного листа
  3. TopicStarter Overlay
    Интересующаяся
    Offline

    Интересующаяся

    Регистрация:
    25 окт 2010
    Сообщения:
    3
    Симпатии:
    0
    Баллы:
    1
    конфигурация 7.70.298. В ней можно задать почтовый сбор только в виде определенной суммы.
  4. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    21.520
    Симпатии:
    407
    Баллы:
    104
    Вот кусок СТАНДАРТНОГО ВР "почтовый сбор"
    Код:
    Пока ЖурналРасчетовЗарплата.ПолучитьЗапись()=1 Цикл
    Если (ЖурналРасчетовЗарплата.ВидРасч=ВидРасчета.УдержаниеПоИсполнительномуЛисту)
    и (ЖурналРасчетовЗарплата.Документ=Документ) Тогда
    
    // Почтовый сбор при пересылке алиментов исчисляется за каждый
    // полный или не полный рубль по исполнительному листу
    СуммаПоИспЛисту = ЖурналРасчетовЗарплата.Результат;
    СуммаПоИспЛисту = ?(Цел(СуммаПоИспЛисту) = СуммаПоИспЛисту, СуммаПоИспЛисту, Цел(СуммаПоИспЛисту) + 1);
    Результат = СуммаПоИспЛисту*Документ.ПроцентПочтовогоСбора/100;
    Прервать;
    КонецЕсли;
    КонецЦикла;
    
    
    
    
    
    Там именно задается процент.. Подправить для расчета в зависимости от суммы - дело 2х минут
  5. TopicStarter Overlay
    Интересующаяся
    Offline

    Интересующаяся

    Регистрация:
    25 окт 2010
    Сообщения:
    3
    Симпатии:
    0
    Баллы:
    1
    Спасибо большое, попробую.

Поделиться этой страницей