Подскажите, плиз, где и какие значения проверяет модуль кредита и решает выдавать кредит или нет. Интересует логика модуля кредита.
/usr/local/nodeny/modules/credit/create.user.credit.pl
и там можно по комментариям понять:
# Платеж-блокировка? - можно создать специальный платеж-событие, которое в принципе заблокирует взятие кредита данным абонентом
# Активные кредиты?
my $balance = $usr->{balance};
my $credit_amt = $balance * -1;
начинаем вычислять сумму кредита, пока она равна размеру задолженности (на сколько баланс в минусе)
# Замороженные услуги (в виде события)?
my $price = $usr->{discount}? $info->{price}*(100-$usr->{discount})/100 : $info->{price};
$credit_amt += $price;
к размеру кредита добавляем стоимость каждой замороженной услуги с учетом скидки
# Замороженные услуги (в виде услуги)?
my $price = $usr->{discount}? $p{price}*(100-$usr->{discount})/100 : $p{price};
$credit_amt += $price;
то же самое, но для другого типа заморозки
# Сумма положительных платежей после кредита должна быть не меньше суммы кредита
# Были ли положительные платежи за последние $cfg::credit_max_nopay_days дней?
my $full_amt = sprintf '%.2f', $credit_amt + $commission;
$full_amt = '0.01' if $full_amt < 0.01;
финальная сумма кредита. sprintf '%.2f' - делает 2 знака после запятой