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

(-)a/installer/data/mysql/atomicupdate/bug_29457.pl (-1 / +12 lines)
Line 0 Link Here
0
- 
1
use Modern::Perl;
2
3
return {
4
    bug_number => "29457",
5
    description => "Warn about missing manager_id in cancelled account lines",
6
    up => sub {
7
        my ($args) = @_;
8
        my ($dbh, $out) = @$args{qw(dbh out)};
9
        my ( $count ) = $dbh->selectrow_array( q{SELECT COUNT(*) FROM accountlines WHERE credit_type_code = 'CANCELLATION' AND manager_id is NULL} );
10
        say "Note: We counted $count cancellations in accountlines with an empty manager_id. We regret that this information is missing, but it can't hurt. This release fixed the bug causing it." if $count;
11
    },
12
}

Return to bug 29457