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

(-)a/t/db_dependent/Reports_Guided.t (-7 / +6 lines)
Lines 43-49 $dbh->do(q|DELETE FROM saved_reports|); Link Here
43
#Start tests
43
#Start tests
44
44
45
#Test save_report
45
#Test save_report
46
my $count = scalar( @{ get_saved_reports() } );
46
my $count = scalar @{ get_saved_reports() };
47
is( $count, 0, "There is no report" );
47
is( $count, 0, "There is no report" );
48
48
49
my @report_ids;
49
my @report_ids;
Lines 67-76 like( $report_ids[0], '/^\d+$/', "Save_report returns an id for first" ); Link Here
67
like( $report_ids[1], '/^\d+$/', "Save_report returns an id for second" );
67
like( $report_ids[1], '/^\d+$/', "Save_report returns an id for second" );
68
like( $report_ids[2], '/^\d+$/', "Save_report returns an id for third" );
68
like( $report_ids[2], '/^\d+$/', "Save_report returns an id for third" );
69
69
70
is( scalar( @{ get_saved_reports() } ),
70
is( scalar @{ get_saved_reports() },
71
    $count, "$count reports have been added" );
71
    $count, "$count reports have been added" );
72
72
73
is( scalar( @{ get_saved_reports( $report_ids[0] ) } ),
73
is( scalar @{ get_saved_reports( $report_ids[0] ) },
74
    1, "filter takes report id" );
74
    1, "filter takes report id" );
75
75
76
#Test delete_report
76
#Test delete_report
Lines 79-95 is (delete_report(),undef, "Without id delete_report returns undef"); Link Here
79
is( delete_report( $report_ids[0] ), 1, "report 1 is deleted" );
79
is( delete_report( $report_ids[0] ), 1, "report 1 is deleted" );
80
$count--;
80
$count--;
81
81
82
is( scalar( @{ get_saved_reports() } ), $count, "Report1 has been deleted" );
82
is( scalar @{ get_saved_reports() }, $count, "Report1 has been deleted" );
83
83
84
is( delete_report( $report_ids[1], $report_ids[2] ), 2, "report 2 and 3 are deleted" );
84
is( delete_report( $report_ids[1], $report_ids[2] ), 2, "report 2 and 3 are deleted" );
85
$count -= 2;
85
$count -= 2;
86
86
87
is( scalar( @{ get_saved_reports() } ),
87
is( scalar @{ get_saved_reports() },
88
    $count, "Report2 and report3 have been deleted" );
88
    $count, "Report2 and report3 have been deleted" );
89
89
90
my $sth = execute_query('SELECT COUNT(*) FROM systempreferences', 0, 10);
90
my $sth = execute_query('SELECT COUNT(*) FROM systempreferences', 0, 10);
91
my $results = $sth->fetchall_arrayref;
91
my $results = $sth->fetchall_arrayref;
92
is(scalar(@$results), 1, 'running a query returned a result');
92
is(scalar @$results, 1, 'running a query returned a result');
93
93
94
my $version = C4::Context->preference('Version');
94
my $version = C4::Context->preference('Version');
95
$sth = execute_query(
95
$sth = execute_query(
96
- 

Return to bug 16185