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

(-)a/C4/AuthoritiesMarc.pm (-4 / +5 lines)
Lines 569-583 sub AddAuthority { Link Here
569
	if ($format eq "MARC21") {
569
	if ($format eq "MARC21") {
570
        my $userenv = C4::Context->userenv;
570
        my $userenv = C4::Context->userenv;
571
        my $library;
571
        my $library;
572
        my $marcorgcode = C4::Context->preference('MARCOrgCode');
572
        if ( $userenv && $userenv->{'branch'} ) {
573
        if ( $userenv && $userenv->{'branch'} ) {
573
            $library = Koha::Libraries->find( $userenv->{'branch'} );
574
            $library = Koha::Libraries->find( $userenv->{'branch'} );
575
            $marcorgcode = $library->get_effective_marcorgcode;
574
        }
576
        }
575
		if (!$record->leader) {
577
		if (!$record->leader) {
576
			$record->leader($leader);
578
			$record->leader($leader);
577
		}
579
		}
578
		if (!$record->field('003')) {
580
		if (!$record->field('003')) {
579
			$record->insert_fields_ordered(
581
			$record->insert_fields_ordered(
580
                MARC::Field->new('003', $library ? $library->get_effective_marcorgcode : C4::Context->preference('MARCOrgCode'))
582
                MARC::Field->new('003', $marcorgcode);
581
			);
583
			);
582
		}
584
		}
583
		my $date=POSIX::strftime("%y%m%d",localtime);
585
		my $date=POSIX::strftime("%y%m%d",localtime);
Lines 596-603 sub AddAuthority { Link Here
596
		if (!$record->field('040')) {
598
		if (!$record->field('040')) {
597
		 $record->insert_fields_ordered(
599
		 $record->insert_fields_ordered(
598
        MARC::Field->new('040','','',
600
        MARC::Field->new('040','','',
599
            'a' => $library ? $library->get_effective_marcorgcode : C4::Context->preference('MARCOrgCode'),
601
            'a' => $marcorgcode,
600
            'c' => $library ? $library->get_effective_marcorgcode : C4::Context->preference('MARCOrgCode')
602
            'c' => $marcorgcode,
601
				) 
603
				) 
602
			);
604
			);
603
    }
605
    }
604
- 

Return to bug 10132