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

(-)a/C4/Biblio.pm (+5 lines)
Lines 2637-2642 sub _koha_marc_update_bib_ids { Link Here
2637
    } else {
2637
    } else {
2638
        C4::Biblio::UpsertMarcSubfield($record, $biblioitem_tag, $biblioitem_subfield, $biblioitemnumber);
2638
        C4::Biblio::UpsertMarcSubfield($record, $biblioitem_tag, $biblioitem_subfield, $biblioitemnumber);
2639
    }
2639
    }
2640
2641
    if (C4::Context->preference('AutoAddSystemControlNumberAndMARCOrgCode')) {
2642
        C4::Biblio::UpsertMarcControlField($record, '001', $biblionumber);
2643
        C4::Biblio::UpsertMarcControlField($record, '003', C4::Context->preference('MARCOrgCode'));
2644
    }
2640
}
2645
}
2641
2646
2642
=head2 _koha_marc_update_biblioitem_cn_sort
2647
=head2 _koha_marc_update_biblioitem_cn_sort
(-)a/installer/data/mysql/atomicupdate/auto-add-001-syspref.pl (+12 lines)
Line 0 Link Here
1
use Modern::Perl;
2
3
return {
4
    bug_number => "29694",
5
    description => "Add system preference",
6
    up => sub {
7
        my ($args) = @_;
8
        my ($dbh, $out) = @$args{qw(dbh out)};
9
        $dbh->do(q{INSERT IGNORE INTO systempreferences (`variable`, `value`, `options`, `explanation`, `type`) VALUES ('AutoAddSystemControlNumberAndMARCOrgCode', '0', NULL, 'Automatically add biblionumber to 001, and MARCOrgCode to 003', 'YesNo')});
10
        say $out "System preference AutoAddSystemControlNumberAndMARCOrgCode added";
11
    },
12
}
(-)a/installer/data/mysql/mandatory/sysprefs.sql (+1 lines)
Lines 73-78 INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` Link Here
73
('AuthoritySeparator','--','10','Used to separate a list of authorities in a display. Usually --','free'),
73
('AuthoritySeparator','--','10','Used to separate a list of authorities in a display. Usually --','free'),
74
('AuthSuccessLog','0',NULL,'If enabled, log successful authentications','YesNo'),
74
('AuthSuccessLog','0',NULL,'If enabled, log successful authentications','YesNo'),
75
('autoBarcode','OFF','incremental|annual|hbyymmincr|EAN13|OFF','Used to autogenerate a barcode: incremental will be of the form 1, 2, 3; annual of the form 2007-0001, 2007-0002; hbyymmincr of the form HB08010001 where HB=Home Branch','Choice'),
75
('autoBarcode','OFF','incremental|annual|hbyymmincr|EAN13|OFF','Used to autogenerate a barcode: incremental will be of the form 1, 2, 3; annual of the form 2007-0001, 2007-0002; hbyymmincr of the form HB08010001 where HB=Home Branch','Choice'),
76
('AutoAddSystemControlNumberAndMARCOrgCode', '0', NULL, 'Automatically add biblionumber to 001, and MARCOrgCode to 003', 'YesNo'),
76
('AutoCreateAuthorities','0',NULL,'Automatically create authorities that do not exist when cataloging records.','YesNo'),
77
('AutoCreateAuthorities','0',NULL,'Automatically create authorities that do not exist when cataloging records.','YesNo'),
77
('AutoCreditNumber', '', '', 'Automatically generate a number for account credits', 'Choice'),
78
('AutoCreditNumber', '', '', 'Automatically generate a number for account credits', 'Choice'),
78
('AutoEmailOpacUser','0',NULL,'Sends notification emails containing new account details to patrons - when account is created.','YesNo'),
79
('AutoEmailOpacUser','0',NULL,'Sends notification emails containing new account details to patrons - when account is created.','YesNo'),
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/cataloguing.pref (-1 / +6 lines)
Lines 158-163 Cataloging: Link Here
158
            - and record's last modifier name in MARC subfield
158
            - and record's last modifier name in MARC subfield
159
            - pref: MarcFieldForModifierName
159
            - pref: MarcFieldForModifierName
160
            - ". <br/><strong>NOTE:</strong> Use a dollar sign between field and subfield like 123$a."
160
            - ". <br/><strong>NOTE:</strong> Use a dollar sign between field and subfield like 123$a."
161
        -
162
            - pref: AutoAddSystemControlNumberAndMARCOrgCode
163
              choices:
164
                  1: Add
165
                  0: Do not add
166
            - System-Control-Number (001) and Control-Number-Identifier (003) automatically from biblionumber and MARCOrgCode.
161
    Display:
167
    Display:
162
        -
168
        -
163
            - 'Separate main entry and subdivisions with '
169
            - 'Separate main entry and subdivisions with '
164
- 

Return to bug 29694