|
Lines 36-56
my $input = CGI->new();
Link Here
|
| 36 |
|
36 |
|
| 37 |
checkauth($input, 0, { reserveforothers => 'place_holds' }, 'intranet'); |
37 |
checkauth($input, 0, { reserveforothers => 'place_holds' }, 'intranet'); |
| 38 |
|
38 |
|
| 39 |
my @reqbib = $input->multi_param('reqbib'); |
39 |
my @reqbib = $input->multi_param('reqbib'); |
| 40 |
my @biblionumbers = $input->multi_param('biblionumber'); |
40 |
my @biblionumbers = $input->multi_param('biblionumber'); |
| 41 |
my @holdable_bibs = $input->multi_param('holdable_bibs'); |
41 |
my @holdable_bibs = $input->multi_param('holdable_bibs'); |
| 42 |
my $borrowernumber = $input->param('borrowernumber'); |
42 |
my $borrowernumber = $input->param('borrowernumber'); |
| 43 |
my $notes = $input->param('notes'); |
43 |
my $notes = $input->param('notes'); |
| 44 |
my $branch = $input->param('pickup'); |
44 |
my $branch = $input->param('pickup'); |
| 45 |
my $startdate = $input->param('reserve_date') || ''; |
45 |
my $startdate = $input->param('reserve_date') || ''; |
| 46 |
my @rank = $input->multi_param('rank-request'); |
46 |
my @rank = $input->multi_param('rank-request'); |
| 47 |
my $title = $input->param('title'); |
47 |
my $title = $input->param('title'); |
| 48 |
my $checkitem = $input->param('checkitem'); |
48 |
my $checkitem = $input->param('checkitem'); |
| 49 |
my $item_group_id = $input->param('item_group_id'); |
49 |
my $item_group_id = $input->param('item_group_id'); |
| 50 |
my $expirationdate = $input->param('expiration_date'); |
50 |
my $expirationdate = $input->param('expiration_date'); |
| 51 |
my $itemtype = $input->param('itemtype') || undef; |
51 |
my $itemtype = $input->param('itemtype') || undef; |
| 52 |
my $non_priority = $input->param('non_priority'); |
52 |
my $non_priority = $input->param('non_priority'); |
| 53 |
my $hold_group_param = $input->param('hold_group') || undef; |
53 |
my $hold_group_param = $input->param('hold_group') || undef; |
| 54 |
my $hold_group; |
54 |
my $hold_group; |
| 55 |
|
55 |
|
| 56 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
56 |
my $patron = Koha::Patrons->find( $borrowernumber ); |
|
Lines 70-76
my $found;
Link Here
|
| 70 |
|
70 |
|
| 71 |
if ( $patron ) { |
71 |
if ( $patron ) { |
| 72 |
|
72 |
|
| 73 |
if ( $hold_group_param ) { |
73 |
if ($hold_group_param) { |
| 74 |
$hold_group = Koha::HoldGroup->new->store; |
74 |
$hold_group = Koha::HoldGroup->new->store; |
| 75 |
} |
75 |
} |
| 76 |
|
76 |
|
| 77 |
- |
|
|