Lines 3974-3993
if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
Link Here
|
3974 |
} |
3974 |
} |
3975 |
|
3975 |
|
3976 |
$DBversion = "3.03.00.015"; |
3976 |
$DBversion = "3.03.00.015"; |
3977 |
if (C4::Context->preference("Version") < TransformToNum($DBversion)) { |
3977 |
if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) { |
3978 |
my $sth = $dbh->prepare("INSERT INTO `marc_subfield_structure` (`tagfield`, `tagsubfield`, `liblibrarian`, `libopac`, `repeatable`, `mandatory`, `kohafield`, |
3978 |
if ( C4::Context->preference("marcflavour") eq "MARC21" ) { |
|
|
3979 |
my $sth = $dbh->prepare( |
3980 |
"INSERT INTO `marc_subfield_structure` (`tagfield`, `tagsubfield`, `liblibrarian`, `libopac`, `repeatable`, `mandatory`, `kohafield`, |
3979 |
`tab`, `authorised_value`, `authtypecode`, `value_builder`, `isurl`, `hidden`, `frameworkcode`, `seealso`, `link`, `defaultvalue`) |
3981 |
`tab`, `authorised_value`, `authtypecode`, `value_builder`, `isurl`, `hidden`, `frameworkcode`, `seealso`, `link`, `defaultvalue`) |
3980 |
VALUES ( ?, '9', '9 (RLIN)', '9 (RLIN)', 0, 0, '', 6, '', '', '', 0, -5, '', '', '', NULL)"); |
3982 |
VALUES ( ?, '9', '9 (RLIN)', '9 (RLIN)', 0, 0, '', 6, '', '', '', 0, -5, '', '', '', NULL)" |
3981 |
$sth->execute('648'); |
3983 |
); |
3982 |
$sth->execute('654'); |
3984 |
$sth->execute('648'); |
3983 |
$sth->execute('655'); |
3985 |
$sth->execute('654'); |
3984 |
$sth->execute('656'); |
3986 |
$sth->execute('655'); |
3985 |
$sth->execute('657'); |
3987 |
$sth->execute('656'); |
3986 |
$sth->execute('658'); |
3988 |
$sth->execute('657'); |
3987 |
$sth->execute('662'); |
3989 |
$sth->execute('658'); |
3988 |
$sth->finish; |
3990 |
$sth->execute('662'); |
3989 |
print "Upgrade to $DBversion done (Bug 5619: Add subfield 9 to marc21 648,654,655,656,657,658,662)\n"; |
3991 |
$sth->finish; |
3990 |
SetVersion ($DBversion); |
3992 |
print |
|
|
3993 |
"Upgrade to $DBversion done (Bug 5619: Add subfield 9 to marc21 648,654,655,656,657,658,662)\n"; |
3994 |
} |
3995 |
SetVersion($DBversion); |
3991 |
} |
3996 |
} |
3992 |
|
3997 |
|
3993 |
$DBversion = '3.03.00.016'; |
3998 |
$DBversion = '3.03.00.016'; |
3994 |
- |
|
|