fix db marks

12 years ago · 421c91d5a1
parent a9633eff2c
commit 421c91d5a1
1 changed files with 3 additions and 1 deletions
--- a/cdr-exporter.pl
+++ b/cdr-exporter.pl
@ -265,11 +265,13 @@ sub write_wrap {
    ($force == 0 && $rec_idx < $max) and return;
    ($force == 1 && $rec_idx == 0) and return;
    my $reseller_contract_id = "";
+    my $mark_query = undef;
    unless($reseller eq "system") {
        $reseller_contract_id = "-".$reseller_ids->{$reseller};
+	$mark_query = [ $reseller_ids->{$reseller} ];
    }
    if (!defined($mark{"lastseq".$reseller_contract_id})) {
-        my $tmpmark = NGCP::CDR::Export::get_mark($dbh, $collid, [ $reseller ]);
+        my $tmpmark = NGCP::CDR::Export::get_mark($dbh, $collid, $mark_query);
 	%mark = ( %mark, %$tmpmark );
        $mark{"lastseq".$reseller_contract_id} //= 0;
    }