|
Lines 7155-7160
if ( CheckVersion($DBversion) ) {
Link Here
|
| 7155 |
SetVersion($DBversion); |
7155 |
SetVersion($DBversion); |
| 7156 |
} |
7156 |
} |
| 7157 |
|
7157 |
|
|
|
7158 |
$DBversion = "3.13.00.XXX"; |
| 7159 |
if ( CheckVersion($DBversion) ) { |
| 7160 |
$dbh->do(qq{ |
| 7161 |
INSERT IGNORE INTO marc_subfield_structure (tagfield, tagsubfield, liblibrarian, libopac, repeatable, mandatory, |
| 7162 |
kohafield, tab, authorised_value, authtypecode, value_builder, isurl, hidden, frameworkcode, seealso, link, |
| 7163 |
defaultvalue) VALUES |
| 7164 |
('015', 'q', 'Qualifying information', 'Qualifying information', 1, 0, '', 0, '', '', '', 0, 0, '', '', '', NULL), |
| 7165 |
('020', 'q', 'Qualifying information', 'Qualifying information', 1, 0, '', 0, '', '', '', 0, 0, '', '', '', NULL), |
| 7166 |
('024', 'q', 'Qualifying information', 'Qualifying information', 1, 0, '', 0, '', '', '', 0, 0, '', '', '', NULL), |
| 7167 |
('027', 'q', 'Qualifying information', 'Qualifying information', 1, 0, '', 0, '', '', '', 0, 0, '', '', '', NULL), |
| 7168 |
('800', '7', 'Control subfield', 'Control subfield', 0, 0, '', 8, '', '', '', NULL, -6, '', '', '', NULL), |
| 7169 |
('810', '7', 'Control subfield', 'Control subfield', 0, 0, '', 8, '', '', '', NULL, -6, '', '', '', NULL), |
| 7170 |
('811', '7', 'Control subfield', 'Control subfield', 0, 0, '', 8, '', '', '', NULL, -6, '', '', '', NULL), |
| 7171 |
('830', '7', 'Control subfield', 'Control subfield', 0, 0, '', 8, '', '', '', NULL, -6, '', '', '', NULL); |
| 7172 |
}); |
| 7173 |
$dbh->do(qq{ |
| 7174 |
INSERT IGNORE INTO auth_subfield_structure (authtypecode, tagfield, tagsubfield, liblibrarian, libopac, repeatable, |
| 7175 |
mandatory, tab, authorised_value, value_builder, seealso, isurl, hidden, linkid, kohafield, frameworkcode) VALUES |
| 7176 |
('', '020', 'q', 'Qualifying information', 'Qualifying information', 1, 0, 0, NULL, NULL, NULL, 0, 0, '', '', ''), |
| 7177 |
('', '024', 'q', 'Qualifying information', 'Qualifying information', 1, 0, 0, NULL, NULL, NULL, 0, 0, '', '', ''); |
| 7178 |
}); |
| 7179 |
print "Upgrade to $DBversion done (Bug 10970 - Update MARC21 frameworks to Update Nr. 17 - DB update)\n"; |
| 7180 |
SetVersion($DBversion); |
| 7181 |
} |
| 7182 |
|
| 7183 |
|
| 7158 |
=head1 FUNCTIONS |
7184 |
=head1 FUNCTIONS |
| 7159 |
|
7185 |
|
| 7160 |
=head2 TableExists($table) |
7186 |
=head2 TableExists($table) |
| 7161 |
- |
|
|