installer/data/mysql/atomicupdate/bug_24157.perl

   1 $DBversion = 'XXX'; # will be replaced by the RM
   2 if( CheckVersion( $DBversion ) ) {
   3     $dbh->do(q|
   4         INSERT IGNORE INTO permissions (module_bit, code, description) VALUES
   5         (11, 'reopen_closed_invoices', 'Reopen closed invoices')
   6     |);
   7
   8     $dbh->do(q|
   9         INSERT IGNORE INTO permissions (module_bit, code, description) VALUES
  10         (11, 'edit_invoices', 'Edit invoices')
  11     |);
  12
  13     $dbh->do(q|
  14         INSERT IGNORE INTO permissions (module_bit, code, description) VALUES
  15         (11, 'delete_baskets', 'Delete baskets')
  16     |);
  17
  18     $dbh->do(q|
  19         INSERT IGNORE INTO permissions (module_bit, code, description) VALUES
  20         (11, 'delete_invoices', 'Delete invoices')
  21     |);
  22
  23     $dbh->do(q|
  24         INSERT IGNORE INTO permissions (module_bit, code, description) VALUES
  25         (11, 'merge_invoices', 'Merge invoices')
  26     |);
  27
  28     SetVersion( $DBversion );
  29     print "Upgrade to $DBversion done (Bug 24157: Add new permissions reopen_closed_invoices, edit_invoices, delete_invoices, merge_invoices, delete_baskets)\n";
  30 }