Lines 19-24
Link Here
|
19 |
|
19 |
|
20 |
|
20 |
|
21 |
use strict; |
21 |
use strict; |
|
|
22 |
use warnings; |
23 |
|
22 |
use CGI; |
24 |
use CGI; |
23 |
use C4::Auth; |
25 |
use C4::Auth; |
24 |
use C4::Dates; |
26 |
use C4::Dates; |
Lines 30-42
use C4::Serials;
Link Here
|
30 |
|
32 |
|
31 |
|
33 |
|
32 |
my $query = new CGI; |
34 |
my $query = new CGI; |
33 |
my $op = $query->param('op'); |
35 |
my $op = $query->param('op') || ''; |
34 |
my $dbh = C4::Context->dbh; |
36 |
my $dbh = C4::Context->dbh; |
35 |
|
37 |
|
36 |
my $sth; |
38 |
my $sth; |
37 |
my ( $template, $loggedinuser, $cookie ); |
39 |
my ( $template, $loggedinuser, $cookie ); |
38 |
my $externalid = $query->param('externalid'); |
40 |
my $externalid = $query->param('externalid'); |
39 |
my $alerttype = $query->param('alerttype'); |
41 |
my $alerttype = $query->param('alerttype') || ''; |
40 |
my $biblionumber = $query->param('biblionumber'); |
42 |
my $biblionumber = $query->param('biblionumber'); |
41 |
|
43 |
|
42 |
( $template, $loggedinuser, $cookie ) = get_template_and_user( |
44 |
( $template, $loggedinuser, $cookie ) = get_template_and_user( |
43 |
- |
|
|