Lines 310-326
sub build_tabs {
Link Here
|
310 |
@subfields_data, |
310 |
@subfields_data, |
311 |
$biblio_form_builder->generate_subfield_form( |
311 |
$biblio_form_builder->generate_subfield_form( |
312 |
{ |
312 |
{ |
313 |
tag => $tag, |
313 |
tag => $tag, |
314 |
subfield => $subfield, |
314 |
subfield => $subfield, |
315 |
value => $value, |
315 |
value => $value, |
316 |
index_tag => $index_tag, |
316 |
index_tag => $index_tag, |
317 |
record => $record, |
317 |
record => $record, |
318 |
hostitemnumber => scalar $input->param('hostitemnumber'), |
318 |
hostitemnumber => scalar $input->param('hostitemnumber'), |
319 |
op => scalar $input->param('op'), |
319 |
op => scalar $input->param('op'), |
320 |
changed_framework => scalar $input->param('changed_framework'), |
320 |
changed_framework => scalar $input->param('changed_framework'), |
321 |
breedingid => scalar $input->param('breedingid'), |
321 |
breedingid => scalar $input->param('breedingid'), |
322 |
tagslib => $tagslib, |
322 |
tagslib => $tagslib, |
323 |
mandatory_z3950 => $mandatory_z3950, |
323 |
mandatory_z3950 => $mandatory_z3950, |
324 |
} |
324 |
} |
325 |
) |
325 |
) |
326 |
); |
326 |
); |
Lines 336-352
sub build_tabs {
Link Here
|
336 |
@subfields_data, |
336 |
@subfields_data, |
337 |
$biblio_form_builder->generate_subfield_form( |
337 |
$biblio_form_builder->generate_subfield_form( |
338 |
{ |
338 |
{ |
339 |
tag => $tag, |
339 |
tag => $tag, |
340 |
subfield => $subfield, |
340 |
subfield => $subfield, |
341 |
value => $value, |
341 |
value => $value, |
342 |
index_tag => $index_tag, |
342 |
index_tag => $index_tag, |
343 |
record => $record, |
343 |
record => $record, |
344 |
hostitemnumber => scalar $input->param('hostitemnumber'), |
344 |
hostitemnumber => scalar $input->param('hostitemnumber'), |
345 |
op => scalar $input->param('op'), |
345 |
op => scalar $input->param('op'), |
346 |
changed_framework => scalar $input->param('changed_framework'), |
346 |
changed_framework => scalar $input->param('changed_framework'), |
347 |
breedingid => scalar $input->param('breedingid'), |
347 |
breedingid => scalar $input->param('breedingid'), |
348 |
tagslib => $tagslib, |
348 |
tagslib => $tagslib, |
349 |
mandatory_z3950 => $mandatory_z3950, |
349 |
mandatory_z3950 => $mandatory_z3950, |
350 |
} |
350 |
} |
351 |
) |
351 |
) |
352 |
); |
352 |
); |
Lines 377-393
sub build_tabs {
Link Here
|
377 |
@subfields_data, |
377 |
@subfields_data, |
378 |
$biblio_form_builder->generate_subfield_form( |
378 |
$biblio_form_builder->generate_subfield_form( |
379 |
{ |
379 |
{ |
380 |
tag => $tag, |
380 |
tag => $tag, |
381 |
subfield => $subfield, |
381 |
subfield => $subfield, |
382 |
value => '', |
382 |
value => '', |
383 |
index_tag => $index_tag, |
383 |
index_tag => $index_tag, |
384 |
record => $record, |
384 |
record => $record, |
385 |
hostitemnumber => scalar $input->param('hostitemnumber'), |
385 |
hostitemnumber => scalar $input->param('hostitemnumber'), |
386 |
op => scalar $input->param('op'), |
386 |
op => scalar $input->param('op'), |
387 |
changed_framework => scalar $input->param('changed_framework'), |
387 |
changed_framework => scalar $input->param('changed_framework'), |
388 |
breedingid => scalar $input->param('breedingid'), |
388 |
breedingid => scalar $input->param('breedingid'), |
389 |
tagslib => $tagslib, |
389 |
tagslib => $tagslib, |
390 |
mandatory_z3950 => $mandatory_z3950, |
390 |
mandatory_z3950 => $mandatory_z3950, |
391 |
} |
391 |
} |
392 |
) |
392 |
) |
393 |
); |
393 |
); |
Lines 440-463
sub build_tabs {
Link Here
|
440 |
# always include in the form regardless of the hidden setting - bug 2206 and 28022 |
440 |
# always include in the form regardless of the hidden setting - bug 2206 and 28022 |
441 |
next |
441 |
next |
442 |
if ( $subfield->{tab} ne $tabloop ); |
442 |
if ( $subfield->{tab} ne $tabloop ); |
443 |
push( |
443 |
push( |
444 |
@subfields_data, |
444 |
@subfields_data, |
445 |
$biblio_form_builder->generate_subfield_form( |
445 |
$biblio_form_builder->generate_subfield_form( |
446 |
{ |
446 |
{ |
447 |
tag => $tag, |
447 |
tag => $tag, |
448 |
subfield => $subfield->{subfield}, |
448 |
subfield => $subfield->{subfield}, |
449 |
value => '', |
449 |
value => '', |
450 |
index_tag => $index_tag, |
450 |
index_tag => $index_tag, |
451 |
record => $record, |
451 |
record => $record, |
452 |
hostitemnumber => scalar $input->param('hostitemnumber'), |
452 |
hostitemnumber => scalar $input->param('hostitemnumber'), |
453 |
op => scalar $input->param('op'), |
453 |
op => scalar $input->param('op'), |
454 |
changed_framework => scalar $input->param('changed_framework'), |
454 |
changed_framework => scalar $input->param('changed_framework'), |
455 |
breedingid => scalar $input->param('breedingid'), |
455 |
breedingid => scalar $input->param('breedingid'), |
456 |
tagslib => $tagslib, |
456 |
tagslib => $tagslib, |
457 |
mandatory_z3950 => $mandatory_z3950, |
457 |
mandatory_z3950 => $mandatory_z3950, |
458 |
} |
458 |
} |
459 |
) |
459 |
) |
460 |
); |
460 |
); |
461 |
} |
461 |
} |
462 |
if ( $#subfields_data >= 0 ) { |
462 |
if ( $#subfields_data >= 0 ) { |
463 |
my %tag_data = ( |
463 |
my %tag_data = ( |
464 |
- |
|
|