View | Details | Raw Unified | Return to bug 7661
Collapse All | Expand All

(-)a/C4/tests/Record_test.pl (-141 lines)
Lines 1-141 Link Here
1
#!/usr/bin/perl
2
#
3
# Copyright 2006 (C) LibLime
4
# Joshua Ferraro <jmf@liblime.com>
5
#
6
# This file is part of Koha.
7
#
8
# Koha is free software; you can redistribute it and/or modify it under the
9
# terms of the GNU General Public License as published by the Free Software
10
# Foundation; either version 2 of the License, or (at your option) any later
11
# version.
12
#
13
# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
14
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
15
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
16
#
17
# You should have received a copy of the GNU General Public License along
18
# with Koha; if not, write to the Free Software Foundation, Inc.,
19
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
20
#
21
#
22
use strict;
23
use warnings;
24
25
# specify the number of tests
26
use Test::More tests => 23;
27
#use C4::Context;
28
use C4::Record;
29
30
=head1 NAME
31
32
Record_test.pl - test suite for Record.pm
33
34
=head1 SYNOPSIS
35
36
$ export KOHA_CONF=/path/to/koha.conf
37
$ ./Record_test.pl
38
39
=cut
40
41
## FIXME: Preliminarily grab the modules dir so we can run this in context
42
43
ok (1, 'module compiled');
44
45
# open some files for testing
46
open MARC21MARC8,"testrecords/marc21_marc8.dat" or die $!;
47
my $marc21_marc8; # = scalar (MARC21MARC8);
48
foreach my $line (<MARC21MARC8>) {
49
    $marc21_marc8 .= $line;
50
}
51
$marc21_marc8 =~ s/\n$//;
52
close MARC21MARC8;
53
54
open (MARC21UTF8,"<:utf8","testrecords/marc21_utf8.dat") or die $!;
55
my $marc21_utf8;
56
foreach my $line (<MARC21UTF8>) {
57
	$marc21_utf8 .= $line;
58
}
59
$marc21_utf8 =~ s/\n$//;
60
close MARC21UTF8;
61
62
open MARC21MARC8COMBCHARS,"testrecords/marc21_marc8_combining_chars.dat" or die $!;
63
my $marc21_marc8_combining_chars;
64
foreach my $line(<MARC21MARC8COMBCHARS>) {
65
	$marc21_marc8_combining_chars.=$line;
66
}
67
$marc21_marc8_combining_chars =~ s/\n$//; #FIXME: why is a newline ending up here?
68
close MARC21MARC8COMBCHARS;
69
70
open (MARC21UTF8COMBCHARS,"<:utf8","testrecords/marc21_utf8_combining_chars.dat") or die $!;
71
my $marc21_utf8_combining_chars;
72
foreach my $line(<MARC21UTF8COMBCHARS>) {
73
	$marc21_utf8_combining_chars.=$line;
74
}
75
close MARC21UTF8COMBCHARS;
76
77
open (MARCXMLUTF8,"<:utf8","testrecords/marcxml_utf8.xml") or die $!;
78
my $marcxml_utf8;
79
foreach my $line (<MARCXMLUTF8>) {
80
	$marcxml_utf8 .= $line;
81
}
82
close MARCXMLUTF8;
83
84
$marcxml_utf8 =~ s/\n//g;
85
86
## The Tests:
87
my $error; my $marc; my $marcxml; my $dcxml; # some scalars to store values
88
## MARC to MARCXML
89
print "\n1. Checking conversion of simple ISO-2709 (MARC21) records to MARCXML\n";
90
ok (($error,$marcxml) = marc2marcxml($marc21_marc8,'UTF-8','MARC21'), 'marc2marcxml - from MARC-8 to UTF-8 (MARC21)'); 
91
ok (!$error, 'no errors in conversion');
92
	$marcxml =~ s/\n//g; 
93
	$marcxml =~ s/v\/ s/v\/s/g; # FIXME: bug in new_from_xml_record!!
94
is ($marcxml,$marcxml_utf8, 'record matches antitype');
95
96
ok (($error,$marcxml) = marc2marcxml($marc21_utf8,'UTF-8','MARC21'), 'marc2marcxml - from UTF-8 to UTF-8 (MARC21)');
97
ok (!$error, 'no errors in conversion');
98
	$marcxml =~ s/\n//g;
99
	$marcxml =~ s/v\/ s/v\/s/g;
100
is ($marcxml,$marcxml_utf8, 'record matches antitype');
101
102
print "\n2. checking binary MARC21 records with combining characters to MARCXML\n";
103
ok (($error,$marcxml) = marc2marcxml($marc21_marc8_combining_chars,'MARC-8','MARC21'), 'marc2marcxml - from MARC-8 to MARC-8 with combining characters(MARC21)');
104
ok (!$error, 'no errors in conversion');
105
106
ok (($error,$marcxml) = marc2marcxml($marc21_marc8_combining_chars,'UTF-8','MARC21'), 'marc2marcxml - from MARC-8 to UTF-8 with combining characters (MARC21)');
107
ok (!$error, 'no errors in conversion');
108
109
ok (($error,$marcxml) = marc2marcxml($marc21_utf8_combining_chars,'UTF-8','MARC21'), 'marc2marcxml - from UTF-8 to UTF-8 with combining characters (MARC21)');
110
ok (!$error, 'no errors in conversion');
111
112
ok (($error,$dcxml) = marc2dcxml($marc21_utf8), 'marc2dcxml - from ISO-2709 to Dublin Core');
113
ok (!$error, 'no errors in conversion');
114
115
print "\n3. checking ability to alter encoding\n";
116
ok (($error,$marc) = changeEncoding($marc21_marc8,'MARC','MARC21','UTF-8'), 'changeEncoding - MARC21 from MARC-8 to UTF-8');
117
ok (!$error, 'no errors in conversion');
118
119
ok (($error,$marc) = changeEncoding($marc21_utf8,'MARC','MARC21','MARC-8'), 'changeEncoding - MARC21 from UTF-8 to MARC-8');
120
ok (!$error, 'no errors in conversion');
121
122
ok (($error,$marc) = changeEncoding($marc21_marc8,'MARC','MARC21','MARC-8'), 'changeEncoding - MARC21 from MARC-8 to MARC-8');
123
ok (!$error, 'no errors in conversion');
124
125
ok (($error,$marc) = changeEncoding($marc21_utf8,'MARC','MARC21','UTF-8'), 'changeEncoding - MARC21 from UTF-8 to UTF-8');
126
ok (!$error, 'no errors in conversion');
127
128
__END__
129
130
=head1 TODO
131
132
Still lots more to test including UNIMARC support
133
134
=head1 AUTHOR
135
136
Joshua Ferraro <jmf@liblime.com>
137
138
=head1 MODIFICATIONS
139
140
141
=cut
(-)a/C4/tests/testrecords/marc21_marc8.dat (-1 lines)
Line 1 Link Here
1
00463     2200169   450000100060000000300050000600500170001100800410002802000150006909000150008410000340009924500510013325000250018465000220020994200250023195200370025684893ACLS19990324000000.0930421s19xx    xxu           00010 eng d  a0854562702  c1738d17381 aChristie, Agatha,d1890-1976.10aWhy didn't they ask Evans? /cAgatha Christie.  aLarge print edition. 0aLarge type books.  aONecLPkLP Christie  bNPLp31000000010273r12.00u2148
(-)a/C4/tests/testrecords/marc21_marc8_combining_chars.dat (-1 lines)
Line 1 Link Here
1
01442cam  2200373 a 4500001001300000003000600013005001700019008004100036010001700077040002500094016001900119020004200138029002100180050002800201082002300229084001500252092001700267049000800284245015300292260007900445300002800524440015300552500003000705500002200735650005600757650007000813650005700883650002500940650002100965650002500986700003001011942001501041994001201056ocm11030895 OCoLC20060516100102.0840720s1984    ne       b    001 0 eng    a   83048926   aDLCcDLCdMUQdNLGGC  aB84431862bccb  a0800606035 (Fortress Press) :c$35.951 aNLGGCb84037516600aBM485b.L57 1984 vol. 200a296.1 sa296.1219  a11.372bcl0 a296.1bST66   aWN300aJewish writings of the Second Temple period :bApocrypha, Pseudepigrapha, Qumran, sectarian writings, Philo, Josephus /cedited by Michael E. Stone.  aAssen, Netherlands :bVan Gorcum ;aPhiladelphia :bFortress Press,c1984.  axxiii, 697 p. ;c25 cm. 0aCompendia rerum Iudaicarum ad Novum Testamentum.nSection 2,pLiterature of the Jewish people in the period of the Second Temple and the Talmud ;v2  aBibliography: p. 603-653.  aIncludes indexes. 0aJewish religious literaturexHistory and criticism. 0aJudaismxHistoryyPost-exilic period, 586 B.C.-210 A.D.xSources. 6aLittâerature religieuse juivexHistoire et critique.17aOude Testament.2gtt17aApocriefen.2gtt17aDode-Zeerollen.2gtt1 aStone, Michael E.,d1938-  k296.1 ST66  aC0bWN3
(-)a/C4/tests/testrecords/marc21_marc8_errors.dat (-1 lines)
Line 1 Link Here
1
00462     2200169   450000100060000000300050000600500170001100800410002802000150006909000150008410000340009924500510013325000250018465000220020994200250023195200370025684893ACLS19990324000000.0930421s19xx    xxu           00010 eng d  a0854562702  c1738d17381 aChristie, Agatha,d1890-1976.10aWhy didn't they ask Evans? /cAgatha Christie.  aLarge print edition. 0aLarge type books.  aONecLPkLP Christie  bNPLp31000000010273r12.00u2148
(-)a/C4/tests/testrecords/marc21_utf8.dat (-1 lines)
Line 1 Link Here
1
00463    a2200169   450000100060000000300050000600500170001100800410002802000150006909000150008410000340009924500510013325000250018465000220020994200250023195200370025684893ACLS19990324000000.0930421s19xx    xxu           00010 eng d  a0854562702  c1738d17381 aChristie, Agatha,d1890-1976.10aWhy didn't they ask Evans? /cAgatha Christie.  aLarge print edition. 0aLarge type books.  aONecLPkLP Christie  bNPLp31000000010273r12.00u2148
(-)a/C4/tests/testrecords/marc21_utf8_combining_chars.dat (-1 lines)
Line 1 Link Here
1
01442cam a2200373 a 4500001001300000003000600013005001700019008004100036010001700077040002500094016001900119020004200138029002100180050002800201082002300229084001500252092001700267049000800284245015300292260007900445300002800524440015300552500003000705500002200735650005600757650007000813650005700883650002500940650002100965650002500986700003001011942001501041994001201056ocm11030895 OCoLC20060516100102.0840720s1984    ne       b    001 0 eng    a   83048926   aDLCcDLCdMUQdNLGGC  aB84431862bccb  a0800606035 (Fortress Press) :c$35.951 aNLGGCb84037516600aBM485b.L57 1984 vol. 200a296.1 sa296.1219  a11.372bcl0 a296.1bST66   aWN300aJewish writings of the Second Temple period :bApocrypha, Pseudepigrapha, Qumran, sectarian writings, Philo, Josephus /cedited by Michael E. Stone.  aAssen, Netherlands :bVan Gorcum ;aPhiladelphia :bFortress Press,c1984.  axxiii, 697 p. ;c25 cm. 0aCompendia rerum Iudaicarum ad Novum Testamentum.nSection 2,pLiterature of the Jewish people in the period of the Second Temple and the Talmud ;v2  aBibliography: p. 603-653.  aIncludes indexes. 0aJewish religious literaturexHistory and criticism. 0aJudaismxHistoryyPost-exilic period, 586 B.C.-210 A.D.xSources. 6aLittérature religieuse juivexHistoire et critique.17aOude Testament.2gtt17aApocriefen.2gtt17aDode-Zeerollen.2gtt1 aStone, Michael E.,d1938-  k296.1 ST66  aC0bWN3
(-)a/C4/tests/testrecords/marcxml_utf8.xml (-44 lines)
Lines 1-44 Link Here
1
<?xml version="1.0" encoding="UTF-8"?>
2
<record
3
  xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
4
  xsi:schemaLocation="http://www.loc.gov/MARC21/slim http://www.loc.gov/standards/marcxml/schema/MARC21slim.xsd"
5
  xmlns="http://www.loc.gov/MARC21/slim">
6
7
  <leader>00463    a2200169   4500</leader>
8
  <controlfield tag="001">84893</controlfield>
9
  <controlfield tag="003">ACLS</controlfield>
10
  <controlfield tag="005">19990324000000.0</controlfield>
11
  <controlfield tag="008">930421s19xx    xxu           00010 eng d</controlfield>
12
  <datafield tag="020" ind1=" " ind2=" ">
13
    <subfield code="a">0854562702</subfield>
14
  </datafield>
15
  <datafield tag="090" ind1=" " ind2=" ">
16
    <subfield code="c">1738</subfield>
17
    <subfield code="d">1738</subfield>
18
  </datafield>
19
  <datafield tag="100" ind1="1" ind2=" ">
20
    <subfield code="a">Christie, Agatha,</subfield>
21
    <subfield code="d">1890-1976.</subfield>
22
  </datafield>
23
  <datafield tag="245" ind1="1" ind2="0">
24
    <subfield code="a">Why didn't they ask Evans? /</subfield>
25
    <subfield code="c">Agatha Christie.</subfield>
26
  </datafield>
27
  <datafield tag="250" ind1=" " ind2=" ">
28
    <subfield code="a">Large print edition.</subfield>
29
  </datafield>
30
  <datafield tag="650" ind1=" " ind2="0">
31
    <subfield code="a">Large type books.</subfield>
32
  </datafield>
33
  <datafield tag="942" ind1=" " ind2=" ">
34
    <subfield code="a">ONe</subfield>
35
    <subfield code="c">LP</subfield>
36
    <subfield code="k">LP Christie</subfield>
37
  </datafield>
38
  <datafield tag="952" ind1=" " ind2=" ">
39
    <subfield code="b">NPL</subfield>
40
    <subfield code="p">31000000010273</subfield>
41
    <subfield code="r">12.00</subfield>
42
    <subfield code="u">2148</subfield>
43
  </datafield>
44
</record>
(-)a/C4/tests/testrecords/marcxml_utf8_entityencoded.xml (-46 lines)
Lines 1-46 Link Here
1
<?xml version="1.0" encoding="UTF-8"?>
2
<collection
3
  xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
4
  xsi:schemaLocation="http://www.loc.gov/MARC21/slim http://www.loc.gov/standards/marcxml/schema/MARC21slim.xsd"
5
  xmlns="http://www.loc.gov/MARC21/slim">
6
7
<record>
8
  <leader>00463    a2200169   4500</leader>
9
  <controlfield tag="001">84893</controlfield>
10
  <controlfield tag="003">ACLS</controlfield>
11
  <controlfield tag="005">19990324000000.0</controlfield>
12
  <controlfield tag="008">930421s19xx    xxu           00010 eng d</controlfield>
13
  <datafield tag="020" ind1=" " ind2=" ">
14
    <subfield code="a">0854562702</subfield>
15
  </datafield>
16
  <datafield tag="090" ind1=" " ind2=" ">
17
    <subfield code="c">1738</subfield>
18
    <subfield code="d">1738</subfield>
19
  </datafield>
20
  <datafield tag="100" ind1="1" ind2=" ">
21
    <subfield code="a">Christie, Agatha,</subfield>
22
    <subfield code="d">1890-1976.</subfield>
23
  </datafield>
24
  <datafield tag="245" ind1="1" ind2="0">
25
    <subfield code="a">Why didn't they ask Evans? /</subfield>
26
    <subfield code="c">Agatha Christie.</subfield>
27
  </datafield>
28
  <datafield tag="250" ind1=" " ind2=" ">
29
    <subfield code="a">Large print edition.</subfield>
30
  </datafield>
31
  <datafield tag="650" ind1=" " ind2="0">
32
    <subfield code="a">Large type books.</subfield>
33
  </datafield>
34
  <datafield tag="942" ind1=" " ind2=" ">
35
    <subfield code="a">ONe</subfield>
36
    <subfield code="c">LP</subfield>
37
    <subfield code="k">LP Christie</subfield>
38
  </datafield>
39
  <datafield tag="952" ind1=" " ind2=" ">
40
    <subfield code="b">NPL</subfield>
41
    <subfield code="p">31000000010273</subfield>
42
    <subfield code="r">12.00</subfield>
43
    <subfield code="u">2148</subfield>
44
  </datafield>
45
</record>
46
</collection>
(-)a/t/db_dependent/Record/Record.t (+141 lines)
Line 0 Link Here
1
#!/usr/bin/perl
2
#
3
# Copyright 2006 (C) LibLime
4
# Joshua Ferraro <jmf@liblime.com>
5
#
6
# This file is part of Koha.
7
#
8
# Koha is free software; you can redistribute it and/or modify it under the
9
# terms of the GNU General Public License as published by the Free Software
10
# Foundation; either version 2 of the License, or (at your option) any later
11
# version.
12
#
13
# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
14
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
15
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
16
#
17
# You should have received a copy of the GNU General Public License along
18
# with Koha; if not, write to the Free Software Foundation, Inc.,
19
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
20
#
21
#
22
use strict;
23
use warnings;
24
25
# specify the number of tests
26
use Test::More tests => 23;
27
#use C4::Context;
28
use C4::Record;
29
30
=head1 NAME
31
32
Record_test.pl - test suite for Record.pm
33
34
=head1 SYNOPSIS
35
36
$ export KOHA_CONF=/path/to/koha.conf
37
$ ./Record_test.pl
38
39
=cut
40
41
## FIXME: Preliminarily grab the modules dir so we can run this in context
42
43
ok (1, 'module compiled');
44
45
# open some files for testing
46
open MARC21MARC8,"testrecords/marc21_marc8.dat" or die $!;
47
my $marc21_marc8; # = scalar (MARC21MARC8);
48
foreach my $line (<MARC21MARC8>) {
49
    $marc21_marc8 .= $line;
50
}
51
$marc21_marc8 =~ s/\n$//;
52
close MARC21MARC8;
53
54
open (MARC21UTF8,"<:utf8","testrecords/marc21_utf8.dat") or die $!;
55
my $marc21_utf8;
56
foreach my $line (<MARC21UTF8>) {
57
	$marc21_utf8 .= $line;
58
}
59
$marc21_utf8 =~ s/\n$//;
60
close MARC21UTF8;
61
62
open MARC21MARC8COMBCHARS,"testrecords/marc21_marc8_combining_chars.dat" or die $!;
63
my $marc21_marc8_combining_chars;
64
foreach my $line(<MARC21MARC8COMBCHARS>) {
65
	$marc21_marc8_combining_chars.=$line;
66
}
67
$marc21_marc8_combining_chars =~ s/\n$//; #FIXME: why is a newline ending up here?
68
close MARC21MARC8COMBCHARS;
69
70
open (MARC21UTF8COMBCHARS,"<:utf8","testrecords/marc21_utf8_combining_chars.dat") or die $!;
71
my $marc21_utf8_combining_chars;
72
foreach my $line(<MARC21UTF8COMBCHARS>) {
73
	$marc21_utf8_combining_chars.=$line;
74
}
75
close MARC21UTF8COMBCHARS;
76
77
open (MARCXMLUTF8,"<:utf8","testrecords/marcxml_utf8.xml") or die $!;
78
my $marcxml_utf8;
79
foreach my $line (<MARCXMLUTF8>) {
80
	$marcxml_utf8 .= $line;
81
}
82
close MARCXMLUTF8;
83
84
$marcxml_utf8 =~ s/\n//g;
85
86
## The Tests:
87
my $error; my $marc; my $marcxml; my $dcxml; # some scalars to store values
88
## MARC to MARCXML
89
print "\n1. Checking conversion of simple ISO-2709 (MARC21) records to MARCXML\n";
90
ok (($error,$marcxml) = marc2marcxml($marc21_marc8,'UTF-8','MARC21'), 'marc2marcxml - from MARC-8 to UTF-8 (MARC21)'); 
91
ok (!$error, 'no errors in conversion');
92
	$marcxml =~ s/\n//g; 
93
	$marcxml =~ s/v\/ s/v\/s/g; # FIXME: bug in new_from_xml_record!!
94
is ($marcxml,$marcxml_utf8, 'record matches antitype');
95
96
ok (($error,$marcxml) = marc2marcxml($marc21_utf8,'UTF-8','MARC21'), 'marc2marcxml - from UTF-8 to UTF-8 (MARC21)');
97
ok (!$error, 'no errors in conversion');
98
	$marcxml =~ s/\n//g;
99
	$marcxml =~ s/v\/ s/v\/s/g;
100
is ($marcxml,$marcxml_utf8, 'record matches antitype');
101
102
print "\n2. checking binary MARC21 records with combining characters to MARCXML\n";
103
ok (($error,$marcxml) = marc2marcxml($marc21_marc8_combining_chars,'MARC-8','MARC21'), 'marc2marcxml - from MARC-8 to MARC-8 with combining characters(MARC21)');
104
ok (!$error, 'no errors in conversion');
105
106
ok (($error,$marcxml) = marc2marcxml($marc21_marc8_combining_chars,'UTF-8','MARC21'), 'marc2marcxml - from MARC-8 to UTF-8 with combining characters (MARC21)');
107
ok (!$error, 'no errors in conversion');
108
109
ok (($error,$marcxml) = marc2marcxml($marc21_utf8_combining_chars,'UTF-8','MARC21'), 'marc2marcxml - from UTF-8 to UTF-8 with combining characters (MARC21)');
110
ok (!$error, 'no errors in conversion');
111
112
ok (($error,$dcxml) = marc2dcxml($marc21_utf8), 'marc2dcxml - from ISO-2709 to Dublin Core');
113
ok (!$error, 'no errors in conversion');
114
115
print "\n3. checking ability to alter encoding\n";
116
ok (($error,$marc) = changeEncoding($marc21_marc8,'MARC','MARC21','UTF-8'), 'changeEncoding - MARC21 from MARC-8 to UTF-8');
117
ok (!$error, 'no errors in conversion');
118
119
ok (($error,$marc) = changeEncoding($marc21_utf8,'MARC','MARC21','MARC-8'), 'changeEncoding - MARC21 from UTF-8 to MARC-8');
120
ok (!$error, 'no errors in conversion');
121
122
ok (($error,$marc) = changeEncoding($marc21_marc8,'MARC','MARC21','MARC-8'), 'changeEncoding - MARC21 from MARC-8 to MARC-8');
123
ok (!$error, 'no errors in conversion');
124
125
ok (($error,$marc) = changeEncoding($marc21_utf8,'MARC','MARC21','UTF-8'), 'changeEncoding - MARC21 from UTF-8 to UTF-8');
126
ok (!$error, 'no errors in conversion');
127
128
__END__
129
130
=head1 TODO
131
132
Still lots more to test including UNIMARC support
133
134
=head1 AUTHOR
135
136
Joshua Ferraro <jmf@liblime.com>
137
138
=head1 MODIFICATIONS
139
140
141
=cut
(-)a/t/db_dependent/Record/testrecords/marc21_marc8.dat (+1 lines)
Line 0 Link Here
1
00463     2200169   450000100060000000300050000600500170001100800410002802000150006909000150008410000340009924500510013325000250018465000220020994200250023195200370025684893ACLS19990324000000.0930421s19xx    xxu           00010 eng d  a0854562702  c1738d17381 aChristie, Agatha,d1890-1976.10aWhy didn't they ask Evans? /cAgatha Christie.  aLarge print edition. 0aLarge type books.  aONecLPkLP Christie  bNPLp31000000010273r12.00u2148
(-)a/t/db_dependent/Record/testrecords/marc21_marc8_combining_chars.dat (+1 lines)
Line 0 Link Here
1
01442cam  2200373 a 4500001001300000003000600013005001700019008004100036010001700077040002500094016001900119020004200138029002100180050002800201082002300229084001500252092001700267049000800284245015300292260007900445300002800524440015300552500003000705500002200735650005600757650007000813650005700883650002500940650002100965650002500986700003001011942001501041994001201056ocm11030895 OCoLC20060516100102.0840720s1984    ne       b    001 0 eng    a   83048926   aDLCcDLCdMUQdNLGGC  aB84431862bccb  a0800606035 (Fortress Press) :c$35.951 aNLGGCb84037516600aBM485b.L57 1984 vol. 200a296.1 sa296.1219  a11.372bcl0 a296.1bST66   aWN300aJewish writings of the Second Temple period :bApocrypha, Pseudepigrapha, Qumran, sectarian writings, Philo, Josephus /cedited by Michael E. Stone.  aAssen, Netherlands :bVan Gorcum ;aPhiladelphia :bFortress Press,c1984.  axxiii, 697 p. ;c25 cm. 0aCompendia rerum Iudaicarum ad Novum Testamentum.nSection 2,pLiterature of the Jewish people in the period of the Second Temple and the Talmud ;v2  aBibliography: p. 603-653.  aIncludes indexes. 0aJewish religious literaturexHistory and criticism. 0aJudaismxHistoryyPost-exilic period, 586 B.C.-210 A.D.xSources. 6aLittâerature religieuse juivexHistoire et critique.17aOude Testament.2gtt17aApocriefen.2gtt17aDode-Zeerollen.2gtt1 aStone, Michael E.,d1938-  k296.1 ST66  aC0bWN3
(-)a/t/db_dependent/Record/testrecords/marc21_marc8_errors.dat (+1 lines)
Line 0 Link Here
1
00462     2200169   450000100060000000300050000600500170001100800410002802000150006909000150008410000340009924500510013325000250018465000220020994200250023195200370025684893ACLS19990324000000.0930421s19xx    xxu           00010 eng d  a0854562702  c1738d17381 aChristie, Agatha,d1890-1976.10aWhy didn't they ask Evans? /cAgatha Christie.  aLarge print edition. 0aLarge type books.  aONecLPkLP Christie  bNPLp31000000010273r12.00u2148
(-)a/t/db_dependent/Record/testrecords/marc21_utf8.dat (+1 lines)
Line 0 Link Here
1
00463    a2200169   450000100060000000300050000600500170001100800410002802000150006909000150008410000340009924500510013325000250018465000220020994200250023195200370025684893ACLS19990324000000.0930421s19xx    xxu           00010 eng d  a0854562702  c1738d17381 aChristie, Agatha,d1890-1976.10aWhy didn't they ask Evans? /cAgatha Christie.  aLarge print edition. 0aLarge type books.  aONecLPkLP Christie  bNPLp31000000010273r12.00u2148
(-)a/t/db_dependent/Record/testrecords/marc21_utf8_combining_chars.dat (+1 lines)
Line 0 Link Here
1
01442cam a2200373 a 4500001001300000003000600013005001700019008004100036010001700077040002500094016001900119020004200138029002100180050002800201082002300229084001500252092001700267049000800284245015300292260007900445300002800524440015300552500003000705500002200735650005600757650007000813650005700883650002500940650002100965650002500986700003001011942001501041994001201056ocm11030895 OCoLC20060516100102.0840720s1984    ne       b    001 0 eng    a   83048926   aDLCcDLCdMUQdNLGGC  aB84431862bccb  a0800606035 (Fortress Press) :c$35.951 aNLGGCb84037516600aBM485b.L57 1984 vol. 200a296.1 sa296.1219  a11.372bcl0 a296.1bST66   aWN300aJewish writings of the Second Temple period :bApocrypha, Pseudepigrapha, Qumran, sectarian writings, Philo, Josephus /cedited by Michael E. Stone.  aAssen, Netherlands :bVan Gorcum ;aPhiladelphia :bFortress Press,c1984.  axxiii, 697 p. ;c25 cm. 0aCompendia rerum Iudaicarum ad Novum Testamentum.nSection 2,pLiterature of the Jewish people in the period of the Second Temple and the Talmud ;v2  aBibliography: p. 603-653.  aIncludes indexes. 0aJewish religious literaturexHistory and criticism. 0aJudaismxHistoryyPost-exilic period, 586 B.C.-210 A.D.xSources. 6aLittérature religieuse juivexHistoire et critique.17aOude Testament.2gtt17aApocriefen.2gtt17aDode-Zeerollen.2gtt1 aStone, Michael E.,d1938-  k296.1 ST66  aC0bWN3
(-)a/t/db_dependent/Record/testrecords/marcxml_utf8.xml (+44 lines)
Line 0 Link Here
1
<?xml version="1.0" encoding="UTF-8"?>
2
<record
3
  xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
4
  xsi:schemaLocation="http://www.loc.gov/MARC21/slim http://www.loc.gov/standards/marcxml/schema/MARC21slim.xsd"
5
  xmlns="http://www.loc.gov/MARC21/slim">
6
7
  <leader>00463    a2200169   4500</leader>
8
  <controlfield tag="001">84893</controlfield>
9
  <controlfield tag="003">ACLS</controlfield>
10
  <controlfield tag="005">19990324000000.0</controlfield>
11
  <controlfield tag="008">930421s19xx    xxu           00010 eng d</controlfield>
12
  <datafield tag="020" ind1=" " ind2=" ">
13
    <subfield code="a">0854562702</subfield>
14
  </datafield>
15
  <datafield tag="090" ind1=" " ind2=" ">
16
    <subfield code="c">1738</subfield>
17
    <subfield code="d">1738</subfield>
18
  </datafield>
19
  <datafield tag="100" ind1="1" ind2=" ">
20
    <subfield code="a">Christie, Agatha,</subfield>
21
    <subfield code="d">1890-1976.</subfield>
22
  </datafield>
23
  <datafield tag="245" ind1="1" ind2="0">
24
    <subfield code="a">Why didn't they ask Evans? /</subfield>
25
    <subfield code="c">Agatha Christie.</subfield>
26
  </datafield>
27
  <datafield tag="250" ind1=" " ind2=" ">
28
    <subfield code="a">Large print edition.</subfield>
29
  </datafield>
30
  <datafield tag="650" ind1=" " ind2="0">
31
    <subfield code="a">Large type books.</subfield>
32
  </datafield>
33
  <datafield tag="942" ind1=" " ind2=" ">
34
    <subfield code="a">ONe</subfield>
35
    <subfield code="c">LP</subfield>
36
    <subfield code="k">LP Christie</subfield>
37
  </datafield>
38
  <datafield tag="952" ind1=" " ind2=" ">
39
    <subfield code="b">NPL</subfield>
40
    <subfield code="p">31000000010273</subfield>
41
    <subfield code="r">12.00</subfield>
42
    <subfield code="u">2148</subfield>
43
  </datafield>
44
</record>
(-)a/t/db_dependent/Record/testrecords/marcxml_utf8_entityencoded.xml (-1 / +46 lines)
Line 0 Link Here
0
- 
1
<?xml version="1.0" encoding="UTF-8"?>
2
<collection
3
  xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
4
  xsi:schemaLocation="http://www.loc.gov/MARC21/slim http://www.loc.gov/standards/marcxml/schema/MARC21slim.xsd"
5
  xmlns="http://www.loc.gov/MARC21/slim">
6
7
<record>
8
  <leader>00463    a2200169   4500</leader>
9
  <controlfield tag="001">84893</controlfield>
10
  <controlfield tag="003">ACLS</controlfield>
11
  <controlfield tag="005">19990324000000.0</controlfield>
12
  <controlfield tag="008">930421s19xx    xxu           00010 eng d</controlfield>
13
  <datafield tag="020" ind1=" " ind2=" ">
14
    <subfield code="a">0854562702</subfield>
15
  </datafield>
16
  <datafield tag="090" ind1=" " ind2=" ">
17
    <subfield code="c">1738</subfield>
18
    <subfield code="d">1738</subfield>
19
  </datafield>
20
  <datafield tag="100" ind1="1" ind2=" ">
21
    <subfield code="a">Christie, Agatha,</subfield>
22
    <subfield code="d">1890-1976.</subfield>
23
  </datafield>
24
  <datafield tag="245" ind1="1" ind2="0">
25
    <subfield code="a">Why didn't they ask Evans? /</subfield>
26
    <subfield code="c">Agatha Christie.</subfield>
27
  </datafield>
28
  <datafield tag="250" ind1=" " ind2=" ">
29
    <subfield code="a">Large print edition.</subfield>
30
  </datafield>
31
  <datafield tag="650" ind1=" " ind2="0">
32
    <subfield code="a">Large type books.</subfield>
33
  </datafield>
34
  <datafield tag="942" ind1=" " ind2=" ">
35
    <subfield code="a">ONe</subfield>
36
    <subfield code="c">LP</subfield>
37
    <subfield code="k">LP Christie</subfield>
38
  </datafield>
39
  <datafield tag="952" ind1=" " ind2=" ">
40
    <subfield code="b">NPL</subfield>
41
    <subfield code="p">31000000010273</subfield>
42
    <subfield code="r">12.00</subfield>
43
    <subfield code="u">2148</subfield>
44
  </datafield>
45
</record>
46
</collection>

Return to bug 7661