View | Details | Raw Unified | Return to bug 34993
Collapse All | Expand All

(-)a/cataloguing/addbiblio.pl (-49 / +48 lines)
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
- 

Return to bug 34993