|
Lines 517-522
my $fa_duedatespec = $input->param('duedatespec');
Link Here
|
| 517 |
|
517 |
|
| 518 |
my $userflags = 'edit_catalogue'; |
518 |
my $userflags = 'edit_catalogue'; |
| 519 |
|
519 |
|
|
|
520 |
$frameworkcode = &GetFrameworkCode($biblionumber) |
| 521 |
if ( $biblionumber and not( defined $frameworkcode) and $op ne 'cud-addbiblio' ); |
| 522 |
|
| 523 |
if ($frameworkcode eq 'FA'){ |
| 524 |
$userflags = 'fast_cataloging'; |
| 525 |
} |
| 526 |
|
| 520 |
my ( $template, $loggedinuser, $cookie ) = get_template_and_user( |
527 |
my ( $template, $loggedinuser, $cookie ) = get_template_and_user( |
| 521 |
{ |
528 |
{ |
| 522 |
template_name => "cataloguing/addbiblio.tt", |
529 |
template_name => "cataloguing/addbiblio.tt", |
|
Lines 526-538
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
Link Here
|
| 526 |
} |
533 |
} |
| 527 |
); |
534 |
); |
| 528 |
|
535 |
|
| 529 |
$frameworkcode = &GetFrameworkCode($biblionumber) |
|
|
| 530 |
if ( $biblionumber and not( defined $frameworkcode) and $op ne 'cud-addbiblio' ); |
| 531 |
|
| 532 |
if ($frameworkcode eq 'FA'){ |
| 533 |
$userflags = 'fast_cataloging'; |
| 534 |
} |
| 535 |
|
| 536 |
$frameworkcode = '' if ( $frameworkcode eq 'Default' ); |
536 |
$frameworkcode = '' if ( $frameworkcode eq 'Default' ); |
| 537 |
|
537 |
|
| 538 |
# Set default values for global variable |
538 |
# Set default values for global variable |
| 539 |
- |
|
|