installer/data/mysql/db_revs/210600003.pl

   1 use Modern::Perl;
   2
   3 return {
   4     bug_number => "24434",
   5     description => "Add 'WrongTransfer' to branchtransfers.cancellation_reason enum",
   6     up => sub {
   7         my ($args) = @_;
   8         my $dbh = $args->{dbh};
   9
  10         # add 'wrongtransfer' to branchtransfers cancellation_reason enum
  11         $dbh->do(
  12             q{
  13                 alter table
  14                     `branchtransfers`
  15                 modify column
  16                     `cancellation_reason` enum(
  17                         'Manual',
  18                         'StockrotationAdvance',
  19                         'StockrotationRepatriation',
  20                         'ReturnToHome',
  21                         'ReturnToHolding',
  22                         'RotatingCollection',
  23                         'Reserve',
  24                         'LostReserve',
  25                         'CancelReserve',
  26                         'ItemLost',
  27                         'WrongTransfer'
  28                     ) DEFAULT NULL
  29                 after `reason`
  30               }
  31         );
  32     },
  33 }