Не верно снимаются средства

[elite]

даже не с 5го числа, а сделать опцию "до хх%% не производить перерасчет"

[Efendy]

Сделал. Фича будет в next (пока не обновлял, собираю фичи и вылью скопом). Если кому горит:

В services.pm после:

Код:

$mode =~ /^(2|4)$/ or last;

добавить:

Код:

 last if $mode == 2 && (localtime())[3] <= int($cfg::end_month_srv_nochange_day);

или

Код:

 last if $mode == 2 && (localtime())[3] <= день_до_котого_не_делать_перерасчет;

если день_до_котого_не_делать_перерасчет = 2, то первого и второго числа перерасчет не будет

[relikts]

Спасибо огромное!   Этот механизм будет работать и когда оператор пополняет счет и происходит активация услуги (скажем 2 числа) и 1 числа месяца когда в 0.00 произойдет нормальное списание? То есть спишется полная сумма указанная в тарифе?

С днем связи!!!!  

[sanya-antr]

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

[relikts]

Здравствуйте в нодени плюс не нахожу такого кода. Находил 2 файла, ни в одном из них нет, поиск файла с текстом внутри тоже ничего не дал.

Да ради бога, если не боитесь, что клиенты подадут в общество защиты потребителей за то, что денег списали в разы больше использованных услуг, то просто в файле services.pm замените фрагмент:

Код:

                $p->{mode} =~ /^(2|4)$/ or last;

на

Код:

                $p->{mode} =~ /^(4)$/ or last;

[relikts]

Этого тоже не нахожу.

Сделал. Фича будет в next (пока не обновлял, собираю фичи и вылью скопом). Если кому горит:

В services.pm после:

Код:

$mode =~ /^(2|4)$/ or last;

добавить:

Код:

 last if $mode == 2 && (localtime())[3] <= int($cfg::end_month_srv_nochange_day);

или

Код:

 last if $mode == 2 && (localtime())[3] <= день_до_котого_не_делать_перерасчет;

если день_до_котого_не_делать_перерасчет = 2, то первого и второго числа перерасчет не будет

[Efendy]

Блин, я же не могу поддерживать все устаревшие ревизии.  В N+ такой код есть. Если у вас не обновленный бил, тогда ищите фрагмент

Код:

(2|4)

например он есть в

Код:

if( ref $actions->{set_service} && $actions->{set_service}{mode} =~ /^(2|4)$/ && !$const_price )

Еще есть такие фрагменты:

Код:

$p->{mode} == 2

их можно заменить на

Код:

0

[relikts]

Спасибо, что уже стоит биллинг обновить?

[relikts]

У меня вот такой код есть только, код (2|4) или {2|4}  не находится нигде. Хелп. 

Код:

# Режим уменьшения длительности услуги до X числа следующего месяца
            if( ref $actions->{set_service} && $actions->{set_service}{mode} == 2 && !$const_price )
            {
                my %p = %{$actions->{set_service}};
                $p{tm1} == $p{tm2} && last; # защита
                my $k = sprintf '%.2f', ($p{tm_end} - $p{tm_start}) / ($p{tm2} - $p{tm1});
                $k = 0.01 if $k < 0.01;
                # Неполный месяц, коэффициент $k может быть > 1 кстати
                $reason->{last_day_k} = $k;
                $cash = sprintf '%.2f', $k * $cash; 

Блин, я же не могу поддерживать все устаревшие ревизии.  В N+ такой код есть. Если у вас не обновленный бил, тогда ищите фрагмент

Код:

(2|4)

например он есть в

Код:

if( ref $actions->{set_service} && $actions->{set_service}{mode} =~ /^(2|4)$/ && !$const_price )

Еще есть такие фрагменты:

Код:

$p->{mode} == 2

их можно заменить на

Код:

0