@@ -, +, @@ - Look at your item edit form or on the MARC tab for the descriptions shown for $a and $b for any framework - Note the descriptons say '... location' - Change one or more using the frameworks. - Run the database update - Verify only the unchanged ones have been updated --- .../mysql/atomicupdate/bug_25867_location_renames.perl | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 installer/data/mysql/atomicupdate/bug_25867_location_renames.perl --- a/installer/data/mysql/atomicupdate/bug_25867_location_renames.perl +++ a/installer/data/mysql/atomicupdate/bug_25867_location_renames.perl @@ -0,0 +1,14 @@ +$DBversion = 'XXX'; # will be replaced by the RM +if( CheckVersion( $DBversion ) ) { + + $dbh->do( "UPDATE marc_subfield_structure SET liblibrarian = 'Home library' WHERE liblibrarian = 'Permanent location' + AND tagfield = 952 and tagsubfield = 'a'" ); + $dbh->do( "UPDATE marc_subfield_structure SET libopac = 'Home library' WHERE libopac = 'Permanent location' + AND tagfield = 952 and tagsubfield = 'a'" ); + $dbh->do( "UPDATE marc_subfield_structure SET liblibrarian = 'Current library' WHERE liblibrarian = 'Current location' + AND tagfield = 952 and tagsubfield = 'b'" ); + $dbh->do( "UPDATE marc_subfield_structure SET libopac = 'Current library' WHERE libopac = 'Current location' + AND tagfield = 952 and tagsubfield = 'b'" ); + + NewVersion( $DBversion, 25867, "Update subfield descriptions for 952\$a and 952\$b"); +} --