Биллинговая система Nodeny

$sql="SELECT u.id,u.balance,u.grp,u.paket,u.paket3,u.srvs,u.start_day,u.discount,u.cstate,u.next_paket,u.next_paket3,p.price FROM users u LEFT JOIN plans2 p ON u.paket=p.id WHERE u.balance >= p.price ";

 # режим отчета=0 - необходим для формирования $service_list
 $money_param={
   paket=>$paket,
   paket3=>$paket3,
   traf1=>$traf1,
   traf2=>$traf2,
   traf3=>$traf3,
   traf4=>$traf4,
   service=>$srvs,
   start_day=>$start_day,
   discount=>$discount,
   mode_report=>0
 };
 $h=&Money($money_param);
 $got_money=sprintf("%.2f",$h->{money});

 $money_over=$h->{money_over};
 $service_list=$h->{service_list};
 chomp $service_list;

if ($got_money > $price)
{
$got_money = 0;
#$service_list="";
}

if ($got_money > $start_money)
{
$got_money = 0;
$perehodim = 0;
}
else
{
$perehodim = 1;
}

if ($perehodim == 1)
{
 $sql="INSERT INTO pays ".
    "(mid,cash,time,admin_id,admin_ip,bonus,reason,coment,type,category) VALUES".
    "($id,-$got_money,$time_last,0,0,'y','$reason','$coment',10,110)";
}

$h=&Money($money_param);
 $got_money=sprintf("%.2f",$h->{money});

 $money_over=$h->{money_over};
 $service_list=$h->{service_list};
 chomp $service_list;

if ($got_money > $start_money)
{
$got_money = 0;
$perehodim = 0;
}
else
{
$perehodim = 1;
}

 chomp $reason;

if ($perehodim == 1)
{
 $sql="INSERT INTO pays ".
    "(mid,cash,time,admin_id,admin_ip,bonus,reason,coment,type,category) VALUES".
    "($id,-$got_money,$time_last,0,0,'y','$reason','$coment',10,110)";
}
else
{
 $sql="INSERT INTO pays ".
    "(mid,cash,time,admin_id,admin_ip,bonus,reason,coment,type,category) VALUES".
    "($id,-$got_money,$time_last,0,0,'y','$reason','Недостаточно средств для перехода на новый месяц',10,110)";

}