|
Lines 396-403
sub removeFieldsForPrefill {
Link Here
|
| 396 |
|
396 |
|
| 397 |
my $input = new CGI; |
397 |
my $input = new CGI; |
| 398 |
my $error = $input->param('error'); |
398 |
my $error = $input->param('error'); |
| 399 |
my $biblionumber = $input->param('biblionumber'); |
399 |
|
| 400 |
my $itemnumber = $input->param('itemnumber'); |
400 |
my $biblionumber; |
|
|
401 |
my $itemnumber; |
| 402 |
if( $input->param('itemnumber') && !$input->param('biblionumber') ){ |
| 403 |
$itemnumber = $input->param('itemnumber'); |
| 404 |
my $item = Koha::Items->find( $itemnumber ); |
| 405 |
$biblionumber = $item->biblionumber; |
| 406 |
} else { |
| 407 |
$biblionumber = $input->param('biblionumber'); |
| 408 |
$itemnumber = $input->param('itemnumber'); |
| 409 |
} |
| 410 |
|
| 401 |
my $op = $input->param('op') || q{}; |
411 |
my $op = $input->param('op') || q{}; |
| 402 |
my $hostitemnumber = $input->param('hostitemnumber'); |
412 |
my $hostitemnumber = $input->param('hostitemnumber'); |
| 403 |
my $marcflavour = C4::Context->preference("marcflavour"); |
413 |
my $marcflavour = C4::Context->preference("marcflavour"); |
| 404 |
- |
|
|