From 647be833fc9825f9262b8f538cb132cff626f2a1 Mon Sep 17 00:00:00 2001 From: Marijana Glavica Date: Tue, 28 Jul 2009 23:23:19 +0000 Subject: [PATCH] files for e-journals catalog git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@1263 07558da8-63fa-0310-ba24-9fe276d99e06 --- vhost/ecas/cambridge.pl | 30 +++++++++++++++++ vhost/ecas/ecas-search.html | 64 +++++++++++++++++++++++++++++++++++++ vhost/ecas/sd.pl | 11 +++++++ 3 files changed, 105 insertions(+) create mode 100644 vhost/ecas/cambridge.pl create mode 100644 vhost/ecas/ecas-search.html create mode 100644 vhost/ecas/sd.pl diff --git a/vhost/ecas/cambridge.pl b/vhost/ecas/cambridge.pl new file mode 100644 index 0000000..648f399 --- /dev/null +++ b/vhost/ecas/cambridge.pl @@ -0,0 +1,30 @@ +my $issn_key = + rec('F'); + +my $issn = get( $issn_key ); + +if ( $issn ) { + # warn "nije novi"; +} else { + +$issn = rec('F'); + +set( $issn_key => $issn ); + + +search( 'title', rec('D') ); +search( 'abbtitle', rec('E') ); +search( 'issn', + join_with(' ; ', + $issn, + rec('G') + ) +); +search( 'publisher', 'Cambridge' ); +search( 'url', 'http://journals.cambridge.org/' . lc ( rec('A') ) ); +search( 'urlp', 'http://journals.cambridge.org/' . lc ( rec('A') ) ); +search( 'collection', + config('input description') +) + +} diff --git a/vhost/ecas/ecas-search.html b/vhost/ecas/ecas-search.html new file mode 100644 index 0000000..8650635 --- /dev/null +++ b/vhost/ecas/ecas-search.html @@ -0,0 +1,64 @@ + +
+ + + + + + + + +
+ +rezultata po stranici +
+ + + + + + + + +
+

Zbirke

+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ + + +
+
+ + +
+
diff --git a/vhost/ecas/sd.pl b/vhost/ecas/sd.pl new file mode 100644 index 0000000..b9338d3 --- /dev/null +++ b/vhost/ecas/sd.pl @@ -0,0 +1,11 @@ + +search( 'title', rec('C') ); +search( 'issn', + rec('D'), +); +search( 'publisher', rec('E') ); +search( 'url', rec('T') ); +search( 'urlp', rec('T') ); +search( 'collection', + config('input description') +); -- 2.20.1