foreachmy$provider_contract(@{$dbh->selectall_arrayref('select contracts.*,resellers.id as reseller_core_id from resellers inner join contracts on resellers.contract_id=contracts.id where resellers.status != "terminated"',{Slice=>{}})}){
my$provider_contact=$dbh->selectrow_hashref('select * from contacts where id=?',undef,$provider_contract->{contact_id});
foreachmy$client_contact(@{$dbh->selectall_arrayref('select contacts.* from contacts where reseller_id = ?',{Slice=>{}},$provider_contract->{reseller_core_id})}){
my$client_contract=$dbh->selectrow_hashref('select contracts.* from contracts where contracts.contact_id=? ',undef,$client_contact->{id});
if(!(my$contract_balance=$dbh->selectrow_hashref('select * from contract_balances where contract_id=? and date(start)=? and date(end)=?',undef,$client_contract->{id},$stime->ymd,$etime->ymd))){
@ -96,13 +85,13 @@ foreach my $provider_contract( @{$dbh->selectall_arrayref('select contracts.*,re
stime=>$stime,
etime=>$etime->datetime,
);
$dbh->do('insert into contract_balances(contract_id,cash_balance,cash_balance_interval,free_time_balance,free_time_balance_interval,start,end,invoice_id)values(?,?,?,?,?,?,?,?)',undef,$client_contract->{id},@$contract_balance{qw/cash_balance cash_balance_interval free_time_balance free_time_balance_interval/},$stime->datetime,$etime->datetime,undef);
$contract_balance=$dbh->selectrow_hashref('select * from contract_balances where id=?',undef,$dbh->last_insert_id(undef,'billing','contract_balances','id'));
}else{
$invoice=$dbh->selectrow_hashref('select * from invoices where id=?',undef,$contract_balance->{invoice_id});