View | Details | Raw Unified | Return to bug 10380
Collapse All | Expand All

(-)a/t/db_dependent/Bookseller.t (-5 / +4 lines)
Lines 160-171 is( $bookseller1fromid->{basketcount}, 2, 'Supplier1 has 2 baskets' ); Link Here
160
160
161
#Test subscriptioncount
161
#Test subscriptioncount
162
my $dt_today    = dt_from_string;
162
my $dt_today    = dt_from_string;
163
my $today       = output_pref( $dt_today, 'iso', '24hr', 1 );
163
my $today       = output_pref({ dt => $dt_today, dateformat => 'iso', timeformat => '24hr', dateonly => 1 });
164
164
165
my $dt_today1 = dt_from_string;
165
my $dt_today1 = dt_from_string;
166
my $dur5 = DateTime::Duration->new( days => -5 );
166
my $dur5 = DateTime::Duration->new( days => -5 );
167
$dt_today1->add_duration($dur5);
167
$dt_today1->add_duration($dur5);
168
my $daysago5 = output_pref( $dt_today1, 'iso', '24hr', 1 );
168
my $daysago5 = output_pref({ dt => $dt_today1, dateformat => 'iso', timeformat => '24hr', dateonly => 1 });
169
169
170
my $budgetperiod = C4::Budgets::AddBudgetPeriod({
170
my $budgetperiod = C4::Budgets::AddBudgetPeriod({
171
    budget_period_startdate => $daysago5,
171
    budget_period_startdate => $daysago5,
Lines 346-352 my $basket2info = { Link Here
346
my $dt_today2 = dt_from_string;
346
my $dt_today2 = dt_from_string;
347
my $dur10 = DateTime::Duration->new( days => -10 );
347
my $dur10 = DateTime::Duration->new( days => -10 );
348
$dt_today2->add_duration($dur10);
348
$dt_today2->add_duration($dur10);
349
my $daysago10 = output_pref( $dt_today2, 'iso', '24hr', 1 );
349
my $daysago10 = output_pref({ dt => $dt_today2, dateformat => 'iso', timeformat => '24hr', dateonly => 1 });
350
my $basket3info = {
350
my $basket3info = {
351
    basketno  => $sample_basket3,
351
    basketno  => $sample_basket3,
352
    closedate => $daysago10,
352
    closedate => $daysago10,
Lines 509-515 isnt( exists( $suppliers{$id_supplier4} ), 1, "Supplier4 hasnt late orders" ); Link Here
509
my $dt_today3 = dt_from_string;
509
my $dt_today3 = dt_from_string;
510
my $dur4 = DateTime::Duration->new( days => -4 );
510
my $dur4 = DateTime::Duration->new( days => -4 );
511
$dt_today3->add_duration($dur4);
511
$dt_today3->add_duration($dur4);
512
my $daysago4 = output_pref( $dt_today3, 'iso', '24hr', 1 );
512
my $daysago4 =  output_pref({ dt => $dt_today3, dateformat => 'iso', timeformat => '24hr', dateonly => 1 });
513
%suppliers =
513
%suppliers =
514
  C4::Bookseller::GetBooksellersWithLateOrders( undef, $daysago4, undef );
514
  C4::Bookseller::GetBooksellersWithLateOrders( undef, $daysago4, undef );
515
515
516
- 

Return to bug 10380