|
Lines 59-73
use C4::Output;
Link Here
|
| 59 |
use CGI qw ( -utf8 ); |
59 |
use CGI qw ( -utf8 ); |
| 60 |
|
60 |
|
| 61 |
my $input=new CGI; |
61 |
my $input=new CGI; |
| 62 |
my ($template, $loggedinuser, $cookie) = get_template_and_user( |
62 |
|
| 63 |
{ template_name => "", |
63 |
checkauth( $input, 0, { acquisition => 'vendors_manage' }, 'intranet' ); |
| 64 |
query => $input, |
|
|
| 65 |
type => "intranet", |
| 66 |
authnotrequired => 0, |
| 67 |
flagsrequired => { acquisition => 'vendors_manage' }, |
| 68 |
debug => 1, |
| 69 |
} |
| 70 |
); |
| 71 |
|
64 |
|
| 72 |
#print $input->header(); |
65 |
#print $input->header(); |
| 73 |
my $booksellerid=$input->param('booksellerid'); |
66 |
my $booksellerid=$input->param('booksellerid'); |
| 74 |
- |
|
|