installer/data/mysql/atomicupdate/Bug_16007_adding_column_letternumber_back_into_table_overduerules_transport_types.perl

   1 my $dbh = C4::Context->dbh;
   2 my ($print_error) = $dbh->{PrintError};
   3 $dbh->{RaiseError} = 0;
   4 $dbh->{PrintError} = 0;
   5 $dbh->do("ALTER TABLE overduerules_transport_types ADD COLUMN letternumber INT(1) NOT NULL DEFAULT 1 AFTER id");
   6 $dbh->{PrintError} = $print_error;
   7 print "Bug 16007: Make sure overduerules_transport_types.letternumber exists\n";