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

(-)a/acqui/basket.pl (-10 / +28 lines)
Lines 210-215 if ( $op eq 'delete_confirm' ) { Link Here
210
    print $query->redirect("/cgi-bin/koha/acqui/basket.pl?basketno=$basketno");
210
    print $query->redirect("/cgi-bin/koha/acqui/basket.pl?basketno=$basketno");
211
    exit;
211
    exit;
212
} else {
212
} else {
213
    my @branches_loop;
213
    # get librarian branch...
214
    # get librarian branch...
214
    if ( C4::Context->preference("IndependantBranches") ) {
215
    if ( C4::Context->preference("IndependantBranches") ) {
215
        my $userenv = C4::Context->userenv;
216
        my $userenv = C4::Context->userenv;
Lines 223-238 if ( $op eq 'delete_confirm' ) { Link Here
223
                exit 1;
224
                exit 1;
224
            }
225
            }
225
        }
226
        }
226
    }
227
        if (!defined $basket->{branch} or $basket->{branch} eq $userenv->{branch}) {
227
    # get branches
228
            push @branches_loop, {
228
    my $branches = C4::Branch::GetBranches;
229
                branchcode => $userenv->{branch},
229
    my @branches_loop;
230
                branchname => $userenv->{branchname},
230
    foreach my $branch (sort keys %$branches) {
231
                selected => 1,
231
        push @branches_loop, {
232
            };
232
            branchcode => $branch,
233
        }
233
            branchname => $branches->{$branch}->{branchname},
234
    } else {
234
            selected => (defined $basket->{branch} and $branch eq $basket->{branch}) ? 1 : 0
235
        # get branches
235
        };
236
        my $branches = C4::Branch::GetBranches;
237
        my @branchcodes = sort {
238
            $branches->{$a}->{branchname} cmp $branches->{$b}->{branchname}
239
        } keys %$branches;
240
        foreach my $branch (@branchcodes) {
241
            my $selected = 0;
242
            if (defined $basket->{branch}) {
243
                $selected = 1 if $branch eq $basket->{branch};
244
            } else {
245
                $selected = 1 if $branch eq C4::Context->userenv->{branch};
246
            }
247
            push @branches_loop, {
248
                branchcode => $branch,
249
                branchname => $branches->{$branch}->{branchname},
250
                selected => $selected
251
            };
252
        }
236
    }
253
    }
237
254
238
#if the basket is closed,and the user has the permission to edit basketgroups, display a list of basketgroups
255
#if the basket is closed,and the user has the permission to edit basketgroups, display a list of basketgroups
Lines 417-422 if ( $op eq 'delete_confirm' ) { Link Here
417
    $template->param(
434
    $template->param(
418
        basketno             => $basketno,
435
        basketno             => $basketno,
419
        basketname           => $basket->{'basketname'},
436
        basketname           => $basket->{'basketname'},
437
        basketbranchname     => C4::Branch::GetBranchName($basket->{branch}),
420
        basketnote           => $basket->{note},
438
        basketnote           => $basket->{note},
421
        basketbooksellernote => $basket->{booksellernote},
439
        basketbooksellernote => $basket->{booksellernote},
422
        basketcontractno     => $basket->{contractnumber},
440
        basketcontractno     => $basket->{contractnumber},
(-)a/installer/data/mysql/de-DE/mandatory/userpermissions.sql (-1 / +1 lines)
Lines 13-19 INSERT INTO permissions (module_bit, code, description) VALUES Link Here
13
   (11, 'budget_modify', 'Konten verändern (keine neuen anlegen, aber bestehende ändern)'),
13
   (11, 'budget_modify', 'Konten verändern (keine neuen anlegen, aber bestehende ändern)'),
14
   (11, 'planning_manage', 'Etatplanung verwalten'),
14
   (11, 'planning_manage', 'Etatplanung verwalten'),
15
   (11, 'order_manage', 'Bestellungen verwalten'),
15
   (11, 'order_manage', 'Bestellungen verwalten'),
16
   (11, 'order_manage_all', 'Manage all orders & baskets'),
16
   (11, 'order_manage_all', 'Manage all orders and baskets, regardless of restrictions on them'),
17
   (11, 'group_manage', 'Bestellgruppen vewalten'),
17
   (11, 'group_manage', 'Bestellgruppen vewalten'),
18
   (11, 'order_receive', 'Lieferungen verwalten'),
18
   (11, 'order_receive', 'Lieferungen verwalten'),
19
   (11, 'budget_add_del', 'Konten hinzufügen/ändern, aber bestehende nicht ändern'),
19
   (11, 'budget_add_del', 'Konten hinzufügen/ändern, aber bestehende nicht ändern'),
(-)a/installer/data/mysql/en/mandatory/userpermissions.sql (-1 / +1 lines)
Lines 13-19 INSERT INTO permissions (module_bit, code, description) VALUES Link Here
13
   (11, 'budget_modify', 'Modify budget (can''t create lines, but can modify existing ones)'),
13
   (11, 'budget_modify', 'Modify budget (can''t create lines, but can modify existing ones)'),
14
   (11, 'planning_manage', 'Manage budget plannings'),
14
   (11, 'planning_manage', 'Manage budget plannings'),
15
   (11, 'order_manage', 'Manage orders & basket'),
15
   (11, 'order_manage', 'Manage orders & basket'),
16
   (11, 'order_manage_all', 'Manage all orders & baskets'),
16
   (11, 'order_manage_all', 'Manage all orders and baskets, regardless of restrictions on them'),
17
   (11, 'group_manage', 'Manage orders & basketgroups'),
17
   (11, 'group_manage', 'Manage orders & basketgroups'),
18
   (11, 'order_receive', 'Manage orders & basket'),
18
   (11, 'order_receive', 'Manage orders & basket'),
19
   (11, 'budget_add_del', 'Add and delete budgets (but cant modify budgets)'),
19
   (11, 'budget_add_del', 'Add and delete budgets (but cant modify budgets)'),
(-)a/installer/data/mysql/es-ES/mandatory/userpermissions.sql (-1 / +1 lines)
Lines 13-19 INSERT INTO permissions (module_bit, code, description) VALUES Link Here
13
   (11, 'budget_modify', 'Modify budget (can''t create lines, but can modify existing ones)'),
13
   (11, 'budget_modify', 'Modify budget (can''t create lines, but can modify existing ones)'),
14
   (11, 'planning_manage', 'Manage budget plannings'),
14
   (11, 'planning_manage', 'Manage budget plannings'),
15
   (11, 'order_manage', 'Manage orders & basket'),
15
   (11, 'order_manage', 'Manage orders & basket'),
16
   (11, 'order_manage_all', 'Manage all orders & baskets'),
16
   (11, 'order_manage_all', 'Manage all orders and baskets, regardless of restrictions on them'),
17
   (11, 'group_manage', 'Manage orders & basketgroups'),
17
   (11, 'group_manage', 'Manage orders & basketgroups'),
18
   (11, 'order_receive', 'Manage orders & basket'),
18
   (11, 'order_receive', 'Manage orders & basket'),
19
   (11, 'budget_add_del', 'Add and delete budgets (but cant modify budgets)'),
19
   (11, 'budget_add_del', 'Add and delete budgets (but cant modify budgets)'),
(-)a/installer/data/mysql/fr-FR/1-Obligatoire/userpermissions.sql (-1 / +1 lines)
Lines 30-36 INSERT INTO permissions (module_bit, code, description) VALUES Link Here
30
   (11, 'budget_modify', 'Modifier les budgets (impossible de créer les lignes, mais possible de modifier celles qui existent'),
30
   (11, 'budget_modify', 'Modifier les budgets (impossible de créer les lignes, mais possible de modifier celles qui existent'),
31
   (11, 'planning_manage', 'Gérer de la planification des budgets'),
31
   (11, 'planning_manage', 'Gérer de la planification des budgets'),
32
   (11, 'order_manage', 'Gérer les commandes et les paniers'),
32
   (11, 'order_manage', 'Gérer les commandes et les paniers'),
33
   (11, 'order_manage_all', 'Gérer toutes les commandes et panier'),
33
   (11, 'order_manage_all', 'Manage all orders and baskets, regardless of restrictions on them'),
34
   (11, 'group_manage', 'Gérer les commandes et les bons de commande'),
34
   (11, 'group_manage', 'Gérer les commandes et les bons de commande'),
35
   (11, 'order_receive', 'Gérer les réceptions'),
35
   (11, 'order_receive', 'Gérer les réceptions'),
36
   (11, 'budget_add_del', 'Ajouter et supprimer les budgets (mais pas modifier)'),
36
   (11, 'budget_add_del', 'Ajouter et supprimer les budgets (mais pas modifier)'),
(-)a/installer/data/mysql/it-IT/necessari/userpermissions.sql (-1 / +1 lines)
Lines 15-21 INSERT INTO permissions (module_bit, code, description) VALUES Link Here
15
   (11, 'budget_modify', 'Modifica budget (non li crea ma modifica gli esistenti)'),
15
   (11, 'budget_modify', 'Modifica budget (non li crea ma modifica gli esistenti)'),
16
   (11, 'planning_manage', 'Intervieni sulla pianificazione dei budgets'),
16
   (11, 'planning_manage', 'Intervieni sulla pianificazione dei budgets'),
17
   (11, 'order_manage', 'Gestisci ordini e raccoglitori'),
17
   (11, 'order_manage', 'Gestisci ordini e raccoglitori'),
18
   (11, 'order_manage_all', 'Manage all orders & baskets'),
18
   (11, 'order_manage_all', 'Manage all orders and baskets, regardless of restrictions on them'),
19
   (11, 'group_manage', 'Gestisci ordini e raccoglitori raggruppati'),
19
   (11, 'group_manage', 'Gestisci ordini e raccoglitori raggruppati'),
20
   (11, 'order_receive', 'Gestisci arrivi'),
20
   (11, 'order_receive', 'Gestisci arrivi'),
21
   (11, 'budget_add_del', 'Aggiungi e cancella budgets (senza modificarli)'),
21
   (11, 'budget_add_del', 'Aggiungi e cancella budgets (senza modificarli)'),
(-)a/installer/data/mysql/nb-NO/1-Obligatorisk/userpermissions.sql (-1 / +1 lines)
Lines 34-40 INSERT INTO permissions (module_bit, code, description) VALUES Link Here
34
   (11, 'budget_modify', 'Endre budsjetter (kan ikke legge til kontolinjer, men endre eksisterende)'),
34
   (11, 'budget_modify', 'Endre budsjetter (kan ikke legge til kontolinjer, men endre eksisterende)'),
35
   (11, 'planning_manage', 'Administrere budsjettplaner'),
35
   (11, 'planning_manage', 'Administrere budsjettplaner'),
36
   (11, 'order_manage', 'Administrere bestillinger og kurver'),
36
   (11, 'order_manage', 'Administrere bestillinger og kurver'),
37
   (11, 'order_manage_all', 'Manage all orders & baskets'),
37
   (11, 'order_manage_all', 'Manage all orders and baskets, regardless of restrictions on them'),
38
   (11, 'group_manage', 'Administrere bestillinger og kurv-grupper'),
38
   (11, 'group_manage', 'Administrere bestillinger og kurv-grupper'),
39
   (11, 'order_receive', 'Administrere bestillinger og kurver'),
39
   (11, 'order_receive', 'Administrere bestillinger og kurver'),
40
   (11, 'budget_add_del', 'Legge til og slette budsjetter (men ikke endre budsjetter)'),
40
   (11, 'budget_add_del', 'Legge til og slette budsjetter (men ikke endre budsjetter)'),
(-)a/installer/data/mysql/pl-PL/mandatory/userpermissions.sql (-1 / +1 lines)
Lines 13-19 INSERT INTO permissions (module_bit, code, description) VALUES Link Here
13
   (11, 'budget_modify', 'Modify budget (can''t create lines, but can modify existing ones)'),
13
   (11, 'budget_modify', 'Modify budget (can''t create lines, but can modify existing ones)'),
14
   (11, 'planning_manage', 'Manage budget plannings'),
14
   (11, 'planning_manage', 'Manage budget plannings'),
15
   (11, 'order_manage', 'Manage orders & basket'),
15
   (11, 'order_manage', 'Manage orders & basket'),
16
   (11, 'order_manage_all', 'Manage all orders & baskets'),
16
   (11, 'order_manage_all', 'Manage all orders and baskets, regardless of restrictions on them'),
17
   (11, 'group_manage', 'Manage orders & basketgroups'),
17
   (11, 'group_manage', 'Manage orders & basketgroups'),
18
   (11, 'order_receive', 'Manage orders & basket'),
18
   (11, 'order_receive', 'Manage orders & basket'),
19
   (11, 'budget_add_del', 'Add and delete budgets (but cant modify budgets)'),
19
   (11, 'budget_add_del', 'Add and delete budgets (but cant modify budgets)'),
(-)a/installer/data/mysql/ru-RU/mandatory/permissions_and_user_flags.sql (-1 / +1 lines)
Lines 37-43 INSERT INTO permissions (module_bit, code, description) VALUES Link Here
37
   (11, 'budget_modify', 'Modify budget (can''t create lines, but can modify existing ones)'),
37
   (11, 'budget_modify', 'Modify budget (can''t create lines, but can modify existing ones)'),
38
   (11, 'planning_manage', 'Manage budget plannings'),
38
   (11, 'planning_manage', 'Manage budget plannings'),
39
   (11, 'order_manage', 'Manage orders & basket'),
39
   (11, 'order_manage', 'Manage orders & basket'),
40
   (11, 'order_manage_all', 'Manage all orders & baskets'),
40
   (11, 'order_manage_all', 'Manage all orders and baskets, regardless of restrictions on them'),
41
   (11, 'group_manage', 'Manage orders & basketgroups'),
41
   (11, 'group_manage', 'Manage orders & basketgroups'),
42
   (11, 'order_receive', 'Manage orders & basket'),
42
   (11, 'order_receive', 'Manage orders & basket'),
43
   (11, 'budget_add_del', 'Add and delete budgets (but cant modify budgets)'),
43
   (11, 'budget_add_del', 'Add and delete budgets (but cant modify budgets)'),
(-)a/installer/data/mysql/uk-UA/mandatory/permissions_and_user_flags.sql (-1 / +1 lines)
Lines 37-43 INSERT INTO permissions (module_bit, code, description) VALUES Link Here
37
   (11, 'budget_modify', 'Modify budget (can''t create lines, but can modify existing ones)'),
37
   (11, 'budget_modify', 'Modify budget (can''t create lines, but can modify existing ones)'),
38
   (11, 'planning_manage', 'Manage budget plannings'),
38
   (11, 'planning_manage', 'Manage budget plannings'),
39
   (11, 'order_manage', 'Manage orders & basket'),
39
   (11, 'order_manage', 'Manage orders & basket'),
40
   (11, 'order_manage_all', 'Manage all orders & baskets'),
40
   (11, 'order_manage_all', 'Manage all orders and baskets, regardless of restrictions on them'),
41
   (11, 'group_manage', 'Manage orders & basketgroups'),
41
   (11, 'group_manage', 'Manage orders & basketgroups'),
42
   (11, 'order_receive', 'Manage orders & basket'),
42
   (11, 'order_receive', 'Manage orders & basket'),
43
   (11, 'budget_add_del', 'Add and delete budgets (but cant modify budgets)'),
43
   (11, 'budget_add_del', 'Add and delete budgets (but cant modify budgets)'),
(-)a/installer/data/mysql/updatedatabase.pl (-1 / +1 lines)
Lines 5561-5567 if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) { Link Here
5561
    ");
5561
    ");
5562
    $dbh->do("
5562
    $dbh->do("
5563
        INSERT INTO permissions (module_bit, code, description)
5563
        INSERT INTO permissions (module_bit, code, description)
5564
        VALUES (11, 'order_manage_all', 'Manage all orders & baskets')
5564
        VALUES (11, 'order_manage_all', 'Manage all orders and baskets, regardless of restrictions on them')
5565
    ");
5565
    ");
5566
5566
5567
    print "Upgrade to $DBversion done (Add branch and users list to baskets. "
5567
    print "Upgrade to $DBversion done (Add branch and users list to baskets. "
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/basket.tt (-17 / +24 lines)
Lines 231-237 Link Here
231
                    <li><span class="label">Contract name:</span> <a href="../admin/aqcontract.pl?op=add_form&amp;contractnumber=[% basketcontractno %]&amp;booksellerid=[% booksellerid %]">[% basketcontractname %]</a></li>
231
                    <li><span class="label">Contract name:</span> <a href="../admin/aqcontract.pl?op=add_form&amp;contractnumber=[% basketcontractno %]&amp;booksellerid=[% booksellerid %]">[% basketcontractname %]</a></li>
232
                [% END %]
232
                [% END %]
233
                [% IF ( authorisedbyname ) %]<li><span class="label">Created by:</span>  [% authorisedbyname %]</li>[% END %]
233
                [% IF ( authorisedbyname ) %]<li><span class="label">Created by:</span>  [% authorisedbyname %]</li>[% END %]
234
                <li>
234
                <li id="managedby">
235
                    <form action="" method="post">
235
                    <form action="" method="post">
236
                        <span class="label">Managed by:</span>
236
                        <span class="label">Managed by:</span>
237
                        <div style="float:left">
237
                        <div style="float:left">
Lines 251-273 Link Here
251
                        </div>
251
                        </div>
252
                    </form>
252
                    </form>
253
                </li>
253
                </li>
254
                <li>
254
                <li id="branch">
255
                    <form action="" method="post">
255
                    <span class="label">Branch:</span>
256
                        <span class="label">Branch:</span>
256
                    [% IF basketbranchname %]
257
                        <select id="branch" name="branch">
257
                        [% basketbranchname %]
258
                            <option value="">No branch</option>
258
                    [% ELSE %]
259
                            [% FOREACH branch IN branches_loop %]
259
                        No branch
260
                                [% IF (branch.selected) %]
260
                    [% END %]
261
                                    <option selected="selected" value="[% branch.branchcode %]"> [% branch.branchname %]</option>
261
                    [% IF branches_loop.size %]
262
                                [% ELSE %]
262
                        <form action="" method="post">
263
                                    <option value="[% branch.branchcode %]"> [% branch.branchname %]</option>
263
                            <select id="branch" name="branch">
264
                                <option value="">(no branch)</option>
265
                                [% FOREACH branch IN branches_loop %]
266
                                    [% IF (branch.selected) %]
267
                                        <option selected="selected" value="[% branch.branchcode %]"> [% branch.branchname %]</option>
268
                                    [% ELSE %]
269
                                        <option value="[% branch.branchcode %]"> [% branch.branchname %]</option>
270
                                    [% END %]
264
                                [% END %]
271
                                [% END %]
265
                            [% END %]
272
                            </select>
266
                        </select>
273
                            <input type="hidden" id="basketno" name="basketno" value="[% basketno %]" />
267
                        <input type="hidden" id="basketno" name="basketno" value="[% basketno %]" />
274
                            <input type="hidden" id="op" name="op" value="mod_branch" />
268
                        <input type="hidden" id="op" name="op" value="mod_branch" />
275
                            <input type="submit" value="Change" />
269
                        <input type="submit" value="Save" />
276
                        </form>
270
                    </form>
277
                    [% END %]
271
                </li>
278
                </li>
272
                [% IF ( creationdate ) %]<li><span class="label">Opened on:</span>  [% creationdate | $KohaDates %]</li>[% END %]
279
                [% IF ( creationdate ) %]<li><span class="label">Opened on:</span>  [% creationdate | $KohaDates %]</li>[% END %]
273
                [% IF ( closedate ) %]<li><span class="label">Closed on:</span> [% closedate | $KohaDates %]</li>[% END %]
280
                [% IF ( closedate ) %]<li><span class="label">Closed on:</span> [% closedate | $KohaDates %]</li>[% END %]
(-)a/t/Acquisition/CanUserManageBasket.t (-6 / +5 lines)
Lines 1-15 Link Here
1
#!/usr/bin/perl
1
#!/usr/bin/perl
2
2
3
use Modern::Perl;
3
use Modern::Perl;
4
use Test::MockModule;
5
use Test::More tests => 42;
4
use Test::More tests => 42;
6
5
7
use C4::Acquisition;
6
use C4::Acquisition;
8
7
9
my $C4_Acquisition_module = new Test::MockModule('C4::Acquisition');
8
# Avoid "redefined subroutine" warnings
10
$C4_Acquisition_module->mock('GetBasketUsers', \&Mock_GetBasketUsers);
9
local $SIG{__WARN__} = sub { warn $_[0] unless $_[0] =~ /redefined/ };
11
my $C4_Context_module = new Test::MockModule('C4::Context');
10
12
$C4_Context_module->mock('preference', \&Mock_preference);
11
*C4::Acquisition::GetBasketUsers = \&Mock_GetBasketUsers;
12
*C4::Context::preference = \&Mock_preference;
13
13
14
my $AcqViewBaskets;
14
my $AcqViewBaskets;
15
my %basketusers = (
15
my %basketusers = (
16
- 

Return to bug 7295