[open-ils-commits] r13581 - in branches/rel_1_6/Open-ILS: src/perlmods/OpenILS/WWW src/perlmods/OpenILS/WWW/SuperCat web/opac/locale/en-US web/opac/skin/default/js web/opac/skin/default/xml xsl (dbs)
svn at svn.open-ils.org
svn at svn.open-ils.org
Mon Jul 13 22:37:06 EDT 2009
Author: dbs
Date: 2009-07-13 22:37:04 -0400 (Mon, 13 Jul 2009)
New Revision: 13581
Added:
branches/rel_1_6/Open-ILS/xsl/MARC21slim2MARCtxt.xsl
Modified:
branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm
branches/rel_1_6/Open-ILS/web/opac/locale/en-US/opac.dtd
branches/rel_1_6/Open-ILS/web/opac/skin/default/js/rdetail.js
branches/rel_1_6/Open-ILS/web/opac/skin/default/xml/page_rdetail.xml
Log:
Backport r13424 and r13580 from trunk: RefWorks export support
Patch from Warren Layton implementing RefWorks export via SuperCat:
"The patch a new transform, MARC21slim2MARCtxt.xsl, which converts MARC
into the MARC-ish plain text format accepted by RefWorks (see [1]).
The patch also adds a new feed to SuperCat, called "marctxt"."
As well as a reworked patch for the default opac skin to expose this
functionality as a link next to the "Place a Hold" link.
Modified: branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm
===================================================================
--- branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm 2009-07-14 02:24:21 UTC (rev 13580)
+++ branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat/Feed.pm 2009-07-14 02:37:04 UTC (rev 13581)
@@ -744,4 +744,57 @@
package OpenILS::WWW::SuperCat::Feed::htmlholdings::item;
use base 'OpenILS::WWW::SuperCat::Feed::htmlcard::item';
+
+package OpenILS::WWW::SuperCat::Feed::marctxt;
+use base 'OpenILS::WWW::SuperCat::Feed::marcxml';
+
+sub new {
+ my $class = shift;
+ my $self = $class->SUPER::new;
+ $self->{type} = 'text/plain';
+ $self->{xsl} = "/MARC21slim2MARCtxt.xsl";
+ return $self;
+}
+
+
+our ($_parser, $_xslt, $xslt_file);
+
+sub toString {
+ my $self = shift;
+ my $base = $self->base || '';
+ my $root = $self->root || '';
+ my $search = $self->search || '';
+ my $class = $self->class || '';
+ my $lib = $self->lib || '-';
+
+ $self->composeDoc;
+
+ $_parser ||= new XML::LibXML;
+ $_xslt ||= new XML::LibXSLT;
+
+ $xslt_file ||=
+ OpenSRF::Utils::SettingsClient
+ ->new
+ ->config_value( dirs => 'xsl' ).
+ $self->{xsl};
+
+ # parse the MARC text xslt ...
+ my $marctxt_xslt = $_xslt->parse_stylesheet( $_parser->parse_file($xslt_file) );
+
+ my $new_doc = $marctxt_xslt->transform(
+ $self->{doc},
+ base_dir => "'$root'",
+ lib => "'$lib'",
+ searchTerms => "'$search'",
+ searchClass => "'$class'",
+ );
+
+ return $marctxt_xslt->output_string($new_doc);
+}
+
+
+package OpenILS::WWW::SuperCat::Feed::marctxt::item;
+use base 'OpenILS::WWW::SuperCat::Feed::marcxml::item';
+
+
1;
Modified: branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
===================================================================
--- branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm 2009-07-14 02:24:21 UTC (rev 13580)
+++ branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm 2009-07-14 02:37:04 UTC (rev 13581)
@@ -145,7 +145,7 @@
->gather(1);
$list = [ map { (keys %$_)[0] } @$list ];
- push @$list, 'htmlholdings','html';
+ push @$list, 'htmlholdings','html', 'marctxt';
for my $browse_axis ( qw/title author subject topic series item-age/ ) {
for my $record_browse_format ( @$list ) {
@@ -259,6 +259,7 @@
<format name='htmlholdings' type='text/html'/>
<format name='html-full' type='text/html'/>
<format name='htmlholdings-full' type='text/html'/>
+ <format name='marctxt' type='text/plain'/>
FORMATS
} elsif ($type eq 'metarecord') {
$body .= <<" FORMATS";
@@ -313,6 +314,7 @@
<format name='htmlholdings' type='text/html'/>
<format name='html-full' type='text/html'/>
<format name='htmlholdings-full' type='text/html'/>
+ <format name='marctxt' type='text/plain'/>
FORMATS
@@ -405,7 +407,7 @@
@{ $supercat->request("open-ils.supercat.$type.formats")->gather(1) }
and !grep
{ $_ eq $base_format }
- qw/opac html htmlholdings/
+ qw/opac html htmlholdings marctxt/
) {
print "Content-type: text/html; charset=utf-8\n\n";
$apache->custom_response( 406, <<" HTML");
@@ -547,6 +549,10 @@
<format>
<name>html-full</name>
<type>text/html</type>
+ </format>
+ <format>
+ <name>marctxt</name>
+ <type>text/plain</type>
</format>";
}
@@ -612,6 +618,10 @@
<format>
<name>html-full</name>
<type>text/html</type>
+ </format>
+ <format>
+ <name>marctxt</name>
+ <type>text/plain</type>
</format>";
for my $h (@$list) {
@@ -1222,7 +1232,7 @@
$feed->unapi($unapi) if ($flesh);
$type = 'atom' if ($type eq 'html');
- $type = 'marcxml' if ($type eq 'htmlholdings');
+ $type = 'marcxml' if (($type eq 'htmlholdings') || ($type eq 'marctxt'));
#$records = $supercat->request( "open-ils.supercat.record.object.retrieve", $records )->gather(1);
Modified: branches/rel_1_6/Open-ILS/web/opac/locale/en-US/opac.dtd
===================================================================
--- branches/rel_1_6/Open-ILS/web/opac/locale/en-US/opac.dtd 2009-07-14 02:24:21 UTC (rev 13580)
+++ branches/rel_1_6/Open-ILS/web/opac/locale/en-US/opac.dtd 2009-07-14 02:37:04 UTC (rev 13581)
@@ -434,6 +434,7 @@
<!ENTITY opac.holds.xulRecipient "Enter recipient barcode">
<!ENTITY opac.holds.recipient "Recipient">
<!ENTITY opac.holds.placeHold "Place Hold">
+<!ENTITY opac.holds.exportRefWorks "Export to RefWorks">
<!ENTITY opac.holds.contactPhone "Contact telephone number">
<!ENTITY opac.holds.contactEmail "Contact email address">
<!ENTITY opac.holds.pickupLocation "Pickup location">
Modified: branches/rel_1_6/Open-ILS/web/opac/skin/default/js/rdetail.js
===================================================================
--- branches/rel_1_6/Open-ILS/web/opac/skin/default/js/rdetail.js 2009-07-14 02:24:21 UTC (rev 13580)
+++ branches/rel_1_6/Open-ILS/web/opac/skin/default/js/rdetail.js 2009-07-14 02:37:04 UTC (rev 13581)
@@ -1,12 +1,21 @@
/* */
-
detachAllEvt('common', 'run');
attachEvt("common", "run", rdetailDraw);
attachEvt("rdetail", "recordDrawn", rdetailBuildStatusColumns);
attachEvt("rdetail", "recordDrawn", rdetailBuildInfoRows);
attachEvt("rdetail", "recordDrawn", rdetailGetPageIds);
+/* Per-skin configuration settings */
+var rdetailLocalOnly = true;
+var rdetailShowLocal = true;
+var rdetailShowCopyLocation = true;
+var rdetailGoogleBookPreview = true;
+var rdetailDisplaySerialHoldings = true;
+var rdetailEnableRefWorks = true;
+var rdetailRefWorksHost = 'http://www.refworks.com';
+
+/* vars vars vars */
var record = null;
var cp_statuses = null;
var recordsCache = [];
@@ -17,26 +26,28 @@
var numStatuses = null;
var defaultCN;
var callnumberCache = {};
-var rdetailLocalOnly = true;
var globalCNCache = {};
var localTOC;
var cachedRecords;
var _statusPositions = {};
-
-var rdetailShowLocal = true;
-var rdetailShowCopyLocation = true;
-var googleBookPreview = true;
-var displaySerialHoldings = true;
var opac_strings;
+var nextContainerIndex;
+
+var nextRecord;
+var prevRecord;
+
+var rdetailPrev = null;
+var rdetailNext = null;
+var rdetailStart = null;
+var rdetailEnd = null;
+
/* serials are currently the only use of Dojo strings in the OPAC */
-if (displaySerialHoldings) {
+if (rdetailDisplaySerialHoldings) {
dojo.requireLocalization("openils.opac", "opac");
opac_strings = dojo.i18n.getLocalization("openils.opac", "opac");
}
-var nextContainerIndex;
-
function rdetailReload() {
var args = {};
args[PARAM_LOCATION] = getNewSearchLocation();
@@ -44,16 +55,6 @@
goTo(buildOPACLink(args));
}
-var nextRecord;
-var prevRecord;
-
-var rdetailPrev = null;
-var rdetailNext = null;
-var rdetailStart = null;
-var rdetailEnd = null;
-
-
-
/* looks to see if we have a next and/or previous record in the
record cache, if so, set up the nav links */
function rdetailSetPaging(ids) {
@@ -124,7 +125,7 @@
req.callback(_rdetailDraw);
req.send();
- if (displaySerialHoldings) {
+ if (rdetailDisplaySerialHoldings) {
var req = new Request(FETCH_MFHD_SUMMARY, getRid());
req.callback(_holdingsDraw);
req.send();
@@ -368,6 +369,27 @@
$('rdetail_place_hold').setAttribute(
'href','javascript:holdsDrawEditor({record:"'+record.doc_id()+'",type:"T"});');
+ var RW = $('rdetail_exp_refworks');
+ if (RW && rdetailEnableRefWorks) {
+
+ var here = (findOrgUnit(getLocation())).name();
+ var org_name = here.replace(" ", "+");
+ var cgi = new CGI();
+
+ RW.setAttribute(
+ 'href',
+ rdetailRefWorksHost + '/express/expressimport.asp?vendor='
+ + org_name
+ + '&filter=MARC+Format&database=All+MARC+Formats&encoding=65001&url=http%3A%2F%2F'
+ + cgi.server_name + '/opac/extras/supercat/marctxt/record/'
+ + record.doc_id()
+ );
+
+ RW.setAttribute('target', 'RefWorksMain');
+
+ unHideMe($('rdetail_exp_refworks_span'));
+ }
+
$('rdetail_img_link').setAttribute('href', buildISBNSrc(cleanISBN(record.isbn()), 'large'));
G.ui.rdetail.image.setAttribute("src", buildISBNSrc(cleanISBN(record.isbn())));
runEvt("rdetail", "recordDrawn");
@@ -914,7 +936,7 @@
* Check for a Google Book preview
*/
function rdetailCheckForGBPreview() {
- if (!googleBookPreview) return;
+ if (!rdetailGoogleBookPreview) return;
searchForGBPreview( cleanISBN(record.isbn()) );
}
Modified: branches/rel_1_6/Open-ILS/web/opac/skin/default/xml/page_rdetail.xml
===================================================================
--- branches/rel_1_6/Open-ILS/web/opac/skin/default/xml/page_rdetail.xml 2009-07-14 02:24:21 UTC (rev 13580)
+++ branches/rel_1_6/Open-ILS/web/opac/skin/default/xml/page_rdetail.xml 2009-07-14 02:37:04 UTC (rev 13581)
@@ -52,6 +52,9 @@
</td>
<td align='right' style='padding-right: 7px;' width='33%'>
+ <span id='rdetail_exp_refworks_span' class='hide_me' style='padding-right: 7px;'>
+ <a id='rdetail_exp_refworks'>&opac.holds.exportRefWorks;</a>
+ </span>
<span style='padding-right: 7px;'>
<a id='rdetail_place_hold' class='classic_link'>&opac.holds.placeHold;</a>
</span>
Copied: branches/rel_1_6/Open-ILS/xsl/MARC21slim2MARCtxt.xsl (from rev 13424, trunk/Open-ILS/xsl/MARC21slim2MARCtxt.xsl)
===================================================================
--- branches/rel_1_6/Open-ILS/xsl/MARC21slim2MARCtxt.xsl (rev 0)
+++ branches/rel_1_6/Open-ILS/xsl/MARC21slim2MARCtxt.xsl 2009-07-14 02:37:04 UTC (rev 13581)
@@ -0,0 +1,36 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<xsl:stylesheet version="1.0" xmlns:marc="http://www.loc.gov/MARC21/slim" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" exclude-result-prefixes="marc">
+ <xsl:output method="text"/>
+
+ <xsl:template match="marc:record">
+ <xsl:text> LEADER </xsl:text>
+ <xsl:value-of select="marc:leader"/>
+
+ <xsl:for-each select="marc:controlfield">
+ <xsl:text> </xsl:text>
+ <xsl:value-of select="@tag"/>
+ <xsl:text> </xsl:text>
+ <xsl:value-of select="marc:controlfield"/>
+ <xsl:value-of select="."/>
+ </xsl:for-each>
+
+ <xsl:for-each select="marc:datafield">
+ <xsl:text> </xsl:text>
+ <xsl:value-of select="@tag"/>
+ <xsl:text> </xsl:text>
+ <xsl:value-of select="@ind1"/>
+ <xsl:value-of select="@ind2"/>
+ <xsl:text> </xsl:text>
+ <xsl:for-each select="marc:subfield">
+ <xsl:if test="@code != 'a'">
+ <xsl:text>|</xsl:text>
+ <xsl:value-of select="@code"/>
+ </xsl:if>
+ <xsl:value-of select="."/>
+ </xsl:for-each>
+ </xsl:for-each>
+
+ <xsl:text> </xsl:text>
+ </xsl:template>
+</xsl:stylesheet>
+
More information about the open-ils-commits
mailing list