1 # @tag: auth_enable_edit_prices
2 # @description: Zusätzliches Recht readonly für das Attribut readonly bei Preisen und Rabatten im Textfeld. Das Skript hakt standardmässig dieses Recht an, sodass es keinen Unterschied zu vorhergehenden Version gibt.
3 # @depends: release_2_6_3
4 package SL::DBUpgrade2::auth_enable_edit_prices;
9 use parent qw(SL::DBUpgrade2::Base);
16 $self->dbh($::auth->dbconnect);
22 FROM auth.group_rights
23 WHERE (auth.group_rights.group_id = auth."group".id)
24 AND (auth.group_rights."right" = 'edit_prices')
28 my @group_ids = selectall_array_query($::form, $self->dbh, $query);
31 INSERT INTO auth.group_rights (group_id, "right", granted)
32 VALUES (?, 'edit_prices', TRUE)
34 my $sth = prepare_query($::form, $self->dbh, $query);
36 foreach my $id (@group_ids) {
37 do_statement($::form, $sth, $query, $id);