|
Line 0
Link Here
|
| 0 |
- |
1 |
$DBversion = 'XXX'; # will be replaced by the RM |
|
|
2 |
if( CheckVersion( $DBversion ) ) { |
| 3 |
|
| 4 |
$dbh->do( "UPDATE marc_subfield_structure SET liblibrarian = 'Home library' WHERE liblibrarian = 'Permanent location' |
| 5 |
AND tagfield = 952 and tagsubfield = 'a'" ); |
| 6 |
$dbh->do( "UPDATE marc_subfield_structure SET libopac = 'Home library' WHERE libopac = 'Permanent location' |
| 7 |
AND tagfield = 952 and tagsubfield = 'a'" ); |
| 8 |
$dbh->do( "UPDATE marc_subfield_structure SET liblibrarian = 'Current library' WHERE liblibrarian = 'Current location' |
| 9 |
AND tagfield = 952 and tagsubfield = 'b'" ); |
| 10 |
$dbh->do( "UPDATE marc_subfield_structure SET libopac = 'Current library' WHERE libopac = 'Current location' |
| 11 |
AND tagfield = 952 and tagsubfield = 'b'" ); |
| 12 |
|
| 13 |
NewVersion( $DBversion, 25867, "Update subfield descriptions for 952\$a and 952\$b"); |
| 14 |
} |