Hello all, At COOL, we've recently started authority control with BSLW. We have had our entire DB cleaned up and are getting ready to start the quarterly updates. In this, we will be sending them new bibs that have been added to the system for headings cleanup.
However, we are also considering sending edited bibs as well. This would be bib records that were authorized and cleaned up, but have since been overlaid or updated. The biggest issue we are having is how to do this. While the edit date in the bib is a starting point, we really only want to send bibs whose headings have changed, not other values in the record. The question is: How? We've looked at the auditing tables as a starting point, but am thinking there might be a better solution: --------------------- Initial thoughts: 1. Using PGAdmin, we can extract a list of TCN's that have been modified (edited) since our last full DB dump. 2. Using this list, extract bibs in MARC format from the system. 3. Using MARC Compare (found in Marc Edit 6.x) I can compare these bibs with the original cleaned up records from BSLW and get a list of changed fields. (I've done a sample file this am) 4. This solution actually works to scan fields by hand for changes. 5. However, with MARC Compare the records have to be in order or everything falls apart. (Plus if you have a ton-o-records, this can prove time consuming). --------------------- Solution? So my proposed solution is to write a custom PERL script to take original bibs and edited bibs, extract them down and compare headings in each of the two files, sending output out (via TCN's) of those bibs whose headings fields have changed (such as the 100's, 400's, 600's, 700-740's as examples). Once I have the TCN's, it would be easy to dump these out of the system for cleanup by BSLW. --------------------- My question is: Has this been done before? (I don't want to reinvent the wheel). Is there a better way that someone else has come up with to do this? I've been digging around http://perldoc.perl.org/File/Compare.html this am as well as http://marcpm.sourceforge.net/tutorial.pdf, and https://metacpan.org/pod/MARC::Record and I think this would be do-able. I'm certainly not a developer, but have written perl scripts in the past....so this would be fun to try. Any thoughts? --Tony Tony Bandy [email protected]<mailto:[email protected]> OHIONET 1500 West Lane Ave. Columbus, OH 43221-3975 614-484-1074 (Direct) 614-486-2966 x19
