Warning: file_get_contents(https://raw.githubusercontent.com/Den1xxx/Filemanager/master/languages/ru.json): failed to open stream: HTTP request failed! HTTP/1.1 404 Not Found
in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 88
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 215
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 216
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 217
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 218
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 219
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 220
PK ! { tests/marc_xml_rsinger.phptnu [ --TEST--
marc_xml_rsinger2: iterate and pretty print a non-compliant MARC record (uppercase subfield codes)
--SKIPIF--
--FILE--
next()) {
print $marc_record;
print "\n";
}
?>
--EXPECT--
LDR 01850 a2200517 4500
001 0000000044
003 EMILDA
008 980120s1998 fi j 000 0 swe
005 20050204111518.0
020 _a9515008808
_cFIM 72:00
035 _99515008808
040 _aNB
042 _9NB
_9SEE
084 _aHcd,u
_2kssb/6
084 _5NB
_auHc
_2kssb
084 _5SEE
_aHcf
_2kssb/6
084 _5Q
_aHcd,uf
_2kssb/6
100 1 _aJansson, Tove,
_d1914-2001
245 0 _aDet osynliga barnet och andra bert̃telser /
_cTove Jansson
250 _a7. uppl.
260 _aHelsingfors :
_bSchildt,
_c1998 ;
_e(Falun :
_fScandbook)
440 0 _aMumin-biblioteket,
_x99-0698931-9
500 _aOriginaluppl. 1962
599 _aLi: S
740 4 _aDet osynliga barnet
775 1 _z951-50-0385-7
_w9515003857
_907
841 _5Li
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5SEE
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5L
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5NB
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5Q
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5S
_axa
_b0201080u 0 4000uu |000000
_e1
852 _5NB
_bNB
_cNB98:12
_hplikt
_jR, 980520
852 _5Li
_bLi
_cCNB
_hh,u
852 _5SEE
_bSEE
852 _5Q
_bQ
_j98947
852 _5L
_bL
_c0100
_h98/
_j3043 H
852 _5S
_bS
_hSv97
_j7235
900 1s _aYanson, Tobe,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanssonov,̀ Tove,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJansone, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanson, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJansson, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanssonova, Tove,
_d1914-2001
_uJansson, Tove,
_d1914-2001
976 2 _aHcd,u
_bSkn̲litteratur
PK ! 44- tests/marc_field_003.phptnu [ --TEST--
marc_field_003: Add subfields to an existing field
--SKIPIF--
--FILE--
appendSubfield($subfield1);
// insert a new subfield after the first subfield with code 'z'
// expected order: a-z-k-g
$sf = $field->getSubfields('z');
// we might get an array back; in this case, we want the first subfield
if (is_array($sf)) {
$field->insertSubfield($subfield2, $sf[0]);
}
else {
$field->insertSubfield($subfield2, $sf);
}
// insert a new subfield prior to the first subfield with code 'z'
// expected order: a-t-z-k-g
$sf = $field->getSubfields('z');
// we might get an array back; in this case, we want the first subfield
if (is_array($sf)) {
$field->insertSubfield($subfield3, $sf[0], true);
}
else {
$field->insertSubfield($subfield3, $sf, true);
}
// insert a new subfield at the very start of the field
$field->prependSubfield($subfield4);
// let's see the results
print $field;
print "\n";
?>
--EXPECT--
100 0 _0first post
_anothing
_ta lot
_zeverything
_ka bit more
_ga little
PK ! c tests/marc_xml_16642.phptnu [ --TEST--
marc_xml_16642: Fix bug 16642: ensure tag and subfield values are returned as strings
--SKIPIF--
--FILE--
next()) {
foreach ($record->getFields() as $tag => $subfields) {
// Skip everything except for 650 fields
if ($tag == '650') {
print "Subject:";
foreach ($subfields->getSubfields() as $code => $value) {
print " $value";
}
print "\n";
}
}
}
?>
--EXPECT--
Subject: [a]: Arithmetic [x]: Juvenile poetry.
Subject: [a]: Children's poetry, American.
Subject: [a]: Arithmetic [x]: Poetry.
Subject: [a]: American poetry.
Subject: [a]: Visual perception.
PK ! Ҕ tests/marc_16783.phptnu [ --TEST--
marc_16783: iterate and pretty print a non-compliant MARC record (tag = '30-')
--SKIPIF--
--FILE--
next()) {
print $marc_record;
print "\n";
}
?>
--EXPECT--
LDR 01853 a2200517 4500
001 0000000044
003 EMILDA
008 980120s1998 fi j 000 0 swe
020 _a9515008808
_cFIM 72:00
035 _99515008808
040 _aNB
042 _9NB
_9SEE
084 _aHcd,u
_2kssb/6
084 _5NB
_auHc
_2kssb
084 _5SEE
_aHcf
_2kssb/6
084 _5Q
_aHcd,uf
_2kssb/6
100 1 _aJansson, Tove,
_d1914-2001
245 04 _aDet osynliga barnet och andra bert̃telser /
_cTove Jansson
250 _a7. uppl.
260 _aHelsingfors :
_bSchildt,
_c1998 ;
_e(Falun :
_fScandbook)
440 0 _aMumin-biblioteket,
_x99-0698931-9
500 _aOriginaluppl. 1962
599 _aLi: S
740 4 _aDet osynliga barnet
775 1 _z951-50-0385-7
_w9515003857
_907
841 _5Li
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5SEE
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5L
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5NB
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5Q
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5S
_axa
_b0201080u 0 4000uu |000000
_e1
852 _5NB
_bNB
_cNB98:12
_hplikt
_jR, 980520
852 _5Li
_bLi
_cCNB
_hh,u
852 _5SEE
_bSEE
852 _5Q
_bQ
_j98947
852 _5L
_bL
_c0100
_h98/
_j3043 H
852 _5S
_bS
_hSv97
_j7235
900 1s _aYanson, Tobe,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanssonov,̀ Tove,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJansone, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanson, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJansson, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanssonova, Tove,
_d1914-2001
_uJansson, Tove,
_d1914-2001
976 2 _aHcd,u
_bSkn̲litteratur
005 20050204111518.0
PK ! F-/ / tests/marc_field_002.phptnu [ --TEST--
marc_field_002: Create fields with invalid indicators
--SKIPIF--
--FILE--
getMessage()}\n";
}
--EXPECT--
Error: Illegal indicator "$@" in field "100" forced to blank
PK ! \ tests/marc_lint_001.phptnu [ --TEST--
marc_lint_001: Full test of Lint suite
--SKIPIF--
--FILE--
next()) {
$warnings = $marc_lint->checkRecord($marc_record);
foreach ($warnings as $warning) {
print $warning . "\n";
}
}
print "\nTest from a constructed record\n";
$rec = new File_MARC_Record();
$rec->setLeader("00000nam 22002538a 4500");
$rec->appendField(
new File_MARC_Data_Field(
'041',
array(
new File_MARC_Subfield('a', 'end'),
new File_MARC_Subfield('a', 'fren')
),
"0", ""
)
);
$rec->appendField(
new File_MARC_Data_Field(
'043',
array(
new File_MARC_Subfield('a', 'n-us-pn')
),
"", ""
)
);
$rec->appendField(
new File_MARC_Data_Field(
'082',
array(
new File_MARC_Subfield('a', '005.13/3'),
// typo 'R' for 'W' and missing 'b' subfield
new File_MARC_Subfield('R', 'all'),
new File_MARC_Subfield('2', '21')
),
"0", "4"
)
);
$rec->appendField(
new File_MARC_Data_Field(
'082',
array(
new File_MARC_Subfield('a', '005.13'),
new File_MARC_Subfield('b', 'Wall'),
new File_MARC_Subfield('2', '14')
),
"1", "4"
)
);
$rec->appendField(
new File_MARC_Data_Field(
'100',
array(
new File_MARC_Subfield('a', 'Wall, Larry')
),
"1", "4"
)
);
$rec->appendField(
new File_MARC_Data_Field(
'110',
array(
new File_MARC_Subfield('a', "O'Reilly & Associates.")
),
"1", ""
)
);
$rec->appendField(
new File_MARC_Data_Field(
'245',
array(
new File_MARC_Subfield('a', 'Programming Perl / '),
new File_MARC_Subfield('a', 'Big Book of Perl /'),
new File_MARC_Subfield('c', 'Larry Wall, Tom Christiansen & Jon Orwant.')
),
"9", "0"
)
);
$rec->appendField(
new File_MARC_Data_Field(
'250',
array(
new File_MARC_Subfield('a', '3rd ed.')
),
"", ""
)
);
$rec->appendField(
new File_MARC_Data_Field(
'250',
array(
new File_MARC_Subfield('a', '3rd ed.')
),
"", ""
)
);
$rec->appendField(
new File_MARC_Data_Field(
'260',
array(
new File_MARC_Subfield('a', 'Cambridge, Mass. : '),
new File_MARC_Subfield('b', "O'Reilly, "),
new File_MARC_Subfield('r', '2000.')
),
"", ""
)
);
$rec->appendField(
new File_MARC_Data_Field(
'590',
array(
new File_MARC_Subfield('a', 'Personally signed by Larry.')
),
"4", ""
)
);
$rec->appendField(
new File_MARC_Data_Field(
'650',
array(
new File_MARC_Subfield('a', 'Perl (Computer program language)'),
new File_MARC_Subfield('0', '(DLC)sh 95010633')
),
"", "0"
)
);
$rec->appendField(
new File_MARC_Data_Field(
'856',
array(
new File_MARC_Subfield('u', 'http://www.perl.com/')
),
"4", "3"
)
);
$rec->appendField(
new File_MARC_Data_Field(
'886',
array(
new File_MARC_Subfield('4', 'Some foreign thing'),
new File_MARC_Subfield('q', 'Another foreign thing')
),
"0", ""
)
);
$warnings = $marc_lint->checkRecord($rec);
foreach ($warnings as $warning) {
print $warning . "\n";
}
?>
--EXPECT--
Test records in camel.mrc
100: Indicator 1 must be 0, 1 or 3 but it's "2"
007: Subfields are not allowed in fields lower than 010
Test from a constructed record
1XX: Only one 1XX tag is allowed, but I found 2 of them.
041: Subfield _a, end (end), is not valid.
041: Subfield _a must be evenly divisible by 3 or exactly three characters if ind2 is not 7, (fren).
043: Subfield _a, n-us-pn, is not valid.
082: Subfield _R is not allowed.
100: Indicator 2 must be blank but it's "4"
245: Indicator 1 must be 0 or 1 but it's "9"
245: Subfield _a is not repeatable.
260: Subfield _r is not allowed.
856: Indicator 2 must be blank, 0, 1, 2 or 8 but it's "3"
PK ! rP tests/marc_xml_004.phptnu [ --TEST--
marc_xml_004: test conversion to XML of subfields that need to be escaped
--SKIPIF--
--FILE--
next()) {
print $marc_record->toXML();
print "\n";
}
?>
--EXPECT--
00727nam 2200205 a 4500
03-0016458
19971103184734.0
970701s1997 oru u000 0 eng u
(Sirsi) a351664
ML270.2
.A6 1997
Anthony, James R.
French baroque music from Beaujoyeulx to Rameau
Rev. and expanded ed.
Portland, OR :
Amadeus Press,
1997.
586 p. :
music
Music
France
16th century
History and criticism.
Music
France
17th century
History and criticism.
Music
France
18th century
History and criticism.
ML 270.2 A6 1997
LC
30007006841505
Y
BOOKS
HUNT-CIRC
HUNTINGTON
1
PK ! 0S tests/marc_subfield_001.phptnu [ --TEST--
marc_subfield_001: Exercise basic methods for File_MARC_Subfield class
--SKIPIF--
--FILE--
getCode() . "\n";
print "Data: " . $subfield->getData() . "\n";
// test __toString implementation
print $subfield;
print "\n";
// test raw output implementation
print $subfield->toRaw() . "\n";
// test isEmpty()
if ($subfield->isEmpty()) {
print "Subfield is empty\n";
}
else {
print "Subfield is not empty\n";
}
?>
--EXPECT--
Code: a
Data: wasssup
[a]: wasssup
awasssup
Subfield is not empty
PK ! x;# # tests/marc_006.phptnu [ --TEST--
marc_006: test read.php
--SKIPIF--
--FILE--
next();
// Retrieve a personal name field from the record
$names = $marc_record->getFields('100');
foreach ($names as $name_field) {
// Now print the $a subfield
switch ($name_field->getIndicator(1)) {
case 0:
print "Forename: ";
break;
case 1:
print "Surname: ";
break;
case 2:
print "Family name: ";
break;
}
$name = $name_field->getSubfields('a');
if (count($name) == 1) {
print $name[0]->getData() . "\n";
}
else {
print "Error -- \$a subfield appears more than once in this field!";
}
}
// Retrieve all series statement fields
// Series statement fields start with a 4 (PCRE)
$subjects = $marc_record->getFields('^4', true);
// Iterate through all of the returned series statement fields
foreach ($subjects as $field) {
// print with File_MARC_Field_Data's magic __toString() method
print $field;
}
?>
--EXPECT--
Surname: Jansson, Tove,
440 0 _aMumin-biblioteket,
_x99-0698931-9
PK ! }&
G G tests/marc_lint_004.phptnu [ --TEST--
marc_lint_004: Tests check_245() called separately
--SKIPIF--
--FILE--
check245($field);
}
?>
--EXPECT--
245: Must have a subfield _a.
245: First subfield must be _a, but it is _b
245: Must end with . (period).
245: MARC21 allows ? or ! as final punctuation but LCRI 1.0C, Nov. 2003 (LCPS 1.7.1 for RDA records), requires period.
245: MARC21 allows ? or ! as final punctuation but LCRI 1.0C, Nov. 2003 (LCPS 1.7.1 for RDA records), requires period.
245: Subfield _c must be preceded by /
245: Subfield _c must be preceded by /
245: Subfield _c initials should not have a space.
245: Subfield _b should be preceded by space-colon, space-semicolon, or space-equals sign.
245: Subfield _b should be preceded by space-colon, space-semicolon, or space-equals sign.
245: Subfield _b should be preceded by space-colon, space-semicolon, or space-equals sign.
245: Subfield _b should be preceded by space-colon, space-semicolon, or space-equals sign.
245: Subfield _h should not be preceded by space.
245: Subfield _h must have matching square brackets, videorecording :.
245: Subfield _n must be preceded by . (period).
245: Subfield _p must be preceded by , (comma) when it follows subfield _n.
245: Subfield _p must be preceded by . (period) when it follows a subfield other than _n.
245: Non-filing indicator is non-numeric
245: First word, the, may be an article, check 2nd indicator (0).
245: First word, an, may be an article, check 2nd indicator (2).
245: First word, l, may be an article, check 2nd indicator (0).
245: First word, a, does not appear to be an article, check 2nd indicator (2).
PK ! cܯ tests/marc_xml_006.phptnu [ --TEST--
marc_xml_006: test getFields() in XML
--SKIPIF--
--FILE--
next();
// Retrieve a personal name field from the record
$names = $marc_record->getFields('100');
foreach ($names as $name_field) {
// Now print the $a subfield
switch ($name_field->getIndicator(1)) {
case 0:
print "Forename: ";
break;
case 1:
print "Surname: ";
break;
case 2:
print "Family name: ";
break;
}
$name = $name_field->getSubfields('a');
if (count($name) == 1) {
print $name[0]->getData() . "\n";
}
else {
print "Error -- \$a subfield appears more than once in this field!";
}
}
// Retrieve all subject and genre fields
// Series statement fields start with a 6 (PCRE)
$subjects = $marc_record->getFields('^6', true);
// Iterate through all of the returned subject fields
foreach ($subjects as $field) {
// print with File_MARC_Field_Data's magic __toString() method
print "$field\n";
}
?>
--EXPECT--
Surname: Sandburg, Carl,
650 0 _aArithmetic
_xJuvenile poetry.
650 0 _aChildren's poetry, American.
650 1 _aArithmetic
_xPoetry.
650 1 _aAmerican poetry.
650 1 _aVisual perception.
PK ! %Hh h tests/marc_003.phptnu [ --TEST--
marc_003: getFields() with various regular expressions
--SKIPIF--
--FILE--
next()) {
print "\nNext record:\n";
$fields = $marc_record->getFields('650');
foreach ($fields as $field) {
print $field;
print "\n";
}
}
print "\nTest with regular expression\n";
$marc_file = new File_MARC($dir . '/' . 'music.mrc');
while ($marc_record = $marc_file->next()) {
print "\nNext record:\n";
$fields = $marc_record->getFields('00\d', true);
foreach ($fields as $field) {
print $field;
print "\n";
}
}
?>
--EXPECT--
Test with a simple string
Next record:
650 0 _aJazz.
650 0 _aMotion picture music
_vExcerpts
_vScores.
Next record:
650 0 _aJazz
_y1971-1980.
Next record:
650 0 _aJazz.
Test with regular expression
Next record:
001 000073594
004 AAJ5802
005 20030415102100.0
008 801107s1977 nyujza
Next record:
001 001878039
005 20050110174900.0
007 sd fungnn|||e|
008 940202r19931981nyujzn i d
Next record:
001 001964482
005 20060626132700.0
007 sd fzngnn|m|e|
008 871211p19871957nyujzn d
PK ! (N N tests/camel.mrcnu [ 00755cam 22002414a 4500001001300000003000600013005001700019008004100036010001700077020004300094040001800137042000800155050002600163082001700189100003100206245005400237260004200291300007200333500003300405650003700438630002500475630001300500 fol05731351 IMchF 20000613133448.0 000107s2000 nyua 001 0 eng a 00020737 a0471383147 (paper/cd-rom : alk. paper) aDLC cDLC dDLC apcc 00 aQA76.73.P22 bM33 2000 00 a005.13/3 221 1 aMartinsson, Tobias, d1976- 10 aActivePerl with ASP and ADO / cTobias Martinsson. aNew York : bJohn Wiley & Sons, c2000. axxi, 289 p. : bill. ; c23 cm. + e1 computer laser disc (4 3/4 in.) a"Wiley Computer Publishing." 0 aPerl (Computer program language) 00 aActive server pages. 00 aActiveX. 00647pam 2200241 a 4500001001300000003000600013005001700019008004100036010001700077020001500094040001800109042000800127050002600135082001500161100002600176245006700202260003800269263000900307300001100316650003700327650002500364700001600389 fol05754809 IMchF 20000601115601.0 000203s2000 mau 001 0 eng a 00022023 a1565926994 aDLC cDLC dDLC apcc 00 aQA76.73.P22 bD47 2000 00 a005.74 221 1 aDescartes, Alligator. 10 aProgramming the Perl DBI / cAlligator Descartes and Tim Bunce. aCmabridge, MA : bO'Reilly, c2000. a1111 ap. cm. 0 aPerl (Computer program language) 0 aDatabase management. 1 aBunce, Tim. 00605cam 22002054a 4500001001300000003000600013005001700019008004100036010001700077040001800094042000800112050002700120082001700147100002100164245005500185260004500240300002600285504005100311650003700362 fol05843555 IMchF 20000525142739.0 000318s1999 cau b 001 0 eng a 00501349 aDLC cDLC dDLC apcc 00 aQA76.73.P22 bB763 1999 00 a005.13/3 221 1 aBrown, Martin C. 10 aPerl : bprogrammer's reference / cMartin C. Brown. aBerkeley : bOsborne/McGraw-Hill, cc1999. axix, 380 p. ; c22 cm. aIncludes bibliographical references and index. 0 aPerl (Computer program language) 00579cam 22002054a 4500001001300000003000600013005001700019008004100036010001700077020001500094040001800109042000800127050002700135082001700162100002100179245005500200260004500255300003600300650003700336 fol05843579 IMchF 20000525142716.0 000318s1999 caua 001 0 eng a 00502116 a0072120002 aDLC cDLC dDLC apcc 00 aQA76.73.P22 bB762 1999 00 a005.13/3 221 1 aBrown, Martin C. 10 aPerl : bthe complete reference / cMartin C. Brown. aBerkeley : bOsborne/McGraw-Hill, cc1999. axxxv, 1179 p. : bill. ; c24 cm. 0 aPerl (Computer program language) 00801nam 22002778a 4500001001300000003000600013005001700019008004100036010001700077020001500094040001300109042000800122050002600130082001800156100002000174245008800194250003200282260004100314263000900355300001100364650003700375650003600412650002600448700002500474700002400499 fol05848297 IMchF 20000524125727.0 000518s2000 mau 001 0 eng a 00041664 a1565924193 aDLC cDLC apcc 00 aQA76.73.P22 bG84 2000 00 a005.2/762 221 1 aGuelich, Scott. 10 aCGI programming with Perl / cScott Guelich, Shishir Gundavaram & Gunther Birznieks. a2nd ed., expanded & updated aCambridge, Mass. : bO'Reilly, c2000. a0006 ap. cm. 0 aPerl (Computer program language) 0 aCGI (Computer network protocol) 0 aInternet programming. 1 aGundavaram, Shishir. 1 aBirznieks, Gunther. 00665nam 22002298a 4500001001300000003000600013005001700019008004100036010001700077020001500094040001300109042000800122050002700130082001700157111005200174245008600226250001200312260004100324263000900365300001100374650005000385 fol05865950 IMchF 20000615103017.0 000612s2000 mau 100 0 eng a 00055759 a0596000138 aDLC cDLC apcc 00 aQA76.73.P22 bP475 2000 00 a005.13/3 221 2 aPerl Conference 4.0 d(2000 : cMonterey, Calif.) 10 aProceedings of the Perl Conference 4.0 : bJuly 17-20, 2000, Monterey, California. a1st ed. aCambridge, Mass. : bO'Reilly, c2000. a0006 ap. cm. 0 aPerl (Computer program language) vCongresses. 00579nam 22002178a 4500001001300000003000600013005001700019008004100036010001700077020001500094040001300109042000800122050002600130082001700156100002800173245006200201260004100263263000900304300001100313650003700324 fol05865956 IMchF 20000615102948.0 000612s2000 mau 000 0 eng a 00055770 a1565926099 aDLC cDLC apcc 00 aQA76.73.P22 bB43 2000 00 a005.13/3 221 1 aBlank-Edelman, David N. 10 aPerl for system administration / cDavid N. Blank-Edelman. aCambridge, Mass. : bO'Reilly, c2000. a0006 ap. cm. 0 aPerl (Computer program language) 00661nam 22002538a 4500001001300000003000600013005001700019008004100036010001700077020001500094040001300109042000800122050002600130082001700156100001700173245006700190250001200257260004100269263000900310300001100319650003700330700002300367700001700390 fol05865967 IMchF 20000615102611.0 000614s2000 mau 000 0 eng a 00055799 a0596000278 aDLC cDLC apcc 00 aQA76.73.P22 bW35 2000 00 a005.13/3 221 1 aWall, Larry. 10 aProgramming Perl / cLarry Wall, Tom Christiansen & Jon Orwant. a3rd ed. aCambridge, Mass. : bO'Reilly, c2000. a0007 ap. cm. 0 aPerl (Computer program language) 1 aChristiansen, Tom. 1 aOrwant, Jon. 00603cam 22002054a 4500001001300000003000600013005001700019008004100036010001700077020001500094040001800109042000800127050002600135082001700161100003200178245006000210260005700270300003300327650003700360 fol05872355 IMchF 20000706095105.0 000315s1999 njua 001 0 eng a 00500678 a013020868X aDLC cDLC dDLC apcc 00 aQA76.73.P22 bL69 1999 00 a005.13/3 221 1 aLowe, Vincent q(Vincent D.) 10 aPerl programmer's interactive workbook / cVincent Lowe. aUpper Saddle River, NJ : bPrentice Hall PTP, cc1999. axx, 633 p. : bill. ; c23 cm. 0 aPerl (Computer program language) 00696nam 22002538a 4500001001300000003000600013005001700019008004100036010001700077020002800094040001300122042000800135050002600143082001700169100002600186245004400212260005100256263000900307300001100316500002000327650003700347650001700384650004100401 fol05882032 IMchF 20000707091904.0 000630s2000 cau 001 0 eng a 00058174 a0764547291 (alk. paper) aDLC cDLC apcc 00 aQA76.73.P22 bF64 2000 00 a005.13/3 221 2 aFoster-Johnson, Eric. 10 aCross-platform Perl / cEric F. Johnson. aFoster City, CA : bIDG Books Worldwide, c2000. a0009 ap. cm. aIncludes index. 0 aPerl (Computer program language) 0 aWeb servers. 0 aCross-platform software development. 00399ngm 2200121 a 4500001001300000003000700013007002800020008004100048245005600089260003800145300006000183538003400243 ttt05000099 TEST av bf c dc eb fa gh ho iu 050224s2005 ilu999 vleng d 00 aTest subfields in control fields h[videorecording]. aOregon, Ill. : bB. Baldus, c2005. a1 videocassette (ca. 1000 min.) : bsd., col. ; c1/2 in. aVHS format, SP playback mode. PK ! p tests/marc_007.phptnu [ --TEST--
marc_007: Use key=>value iteration for tags and codes
--SKIPIF--
--FILE--
next()) {
foreach ($marc_record->getFields() as $tag=>$value) {
print "$tag: ";
if ($value instanceof File_MARC_Control_Field) {
print $value->getData();
}
else {
foreach ($value->getSubfields() as $code=>$subdata) {
print "_$code";
}
}
print "\n";
}
}
?>
--EXPECT--
001: 0000000044
003: EMILDA
008: 980120s1998 fi j 000 0 swe
020: _a_c
035: _9
040: _a
042: _9_9
084: _a_2
084: _5_a_2
084: _5_a_2
084: _5_a_2
100: _a_d
245: _a_c
250: _a
260: _a_b_c_e_f
300: _a_b_c
440: _a_x
500: _a
599: _a
740: _a
775: _z_w_9
841: _5_a_b_e
841: _5_a_b_e
841: _5_a_b_e
841: _5_a_b_e
841: _5_a_b_e
841: _5_a_b_e
852: _5_b_c_h_j
852: _5_b_c_h
852: _5_b
852: _5_b_j
852: _5_b_c_h_j
852: _5_b_h_j
900: _a_d_u_d
900: _a_d_u_d
900: _a_d_u_d
900: _a_d_u_d
900: _a_d_u_d
900: _a_d_u_d
976: _a_b
005: 20050204111518.0
PK ! 1 1 tests/marc_xml_008.phptnu [ --TEST--
marc_xml_008: generate a single collection of MARCXML records from a MARCXML record
--SKIPIF--
--FILE--
element
$records->toXMLHeader();
// Iterate through the retrieved records
while ($record = $records->next()) {
// Change each 852 $c to "Audio-Visual"
$holdings = $record->getFields('852');
foreach ($holdings as $holding) {
// Get the $c subfields from this field
$formats = $holding->getSubfields('c');
foreach ($formats as $format) {
if ($format->getData('AV')) {
$format->setData('Audio-Visual');
}
}
}
// Generate the XML output for this record
print $record->toXML('UTF-8', true, false);
}
// Add the closing element and dump the XMLWriter contents
print $records->toXMLFooter();
--EXPECT--
01145ncm a2200277 i 4500
000073594
AAJ5802
20030415102100.0
801107s1977 nyujza
77771106
(CaOTUIC)15460184
AAJ5802
LC
M1366
.M62
M1527.2
The Modern Jazz Quartet :
The legendary profile. --
New York :
M.J.Q. Music,
c1977.
score (72 p.) ;
31 cm.
For piano, vibraphone, drums, and double bass.
Lewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B́Ư.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
Jazz.
Motion picture music
Excerpts
Scores.
Lewis, John,
1920-
Selections.
1977.
Jackson, Milt.
Martyrs.
1977.
Jackson, Milt.
Legendary profile.
1977.
The legendary profile.
MUSIC
Audio-Visual
folio
M1366
M62
1
Marvin Duchow Music
01293cjm a2200289 a 4500
001878039
20050110174900.0
sd fungnn|||e|
940202r19931981nyujzn i d
7464573372
JK 57337
Red Baron
(OCoLC)29737267
SVP
SVP
LGG
Desmond, Paul,
1924-
Paul Desmond & the Modern Jazz Quartet
[sound recording]
New York, N.Y. :
Red Baron :
Manufactured by Sony Music Entertainment,
p1993.
1 sound disc (39 min.) :
digital ;
4 3/4 in.
Paul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
All arrangements by John Lewis.
Recorded live on December 25, 1971 at Town Hall, NYC.
Originally released in 1981 by Finesse as LP FW 27487.
Program notes by Irving Townsend, June 1981, on container insert.
Greensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
Jazz
1971-1980.
Lewis, John,
1920-
Modern Jazz Quartet.
Paul Desmond and the Modern Jazz Quartet.
01829cjm a2200385 a 4500
001964482
20060626132700.0
sd fzngnn|m|e|
871211p19871957nyujzn d
4228332902
833 290-2
Verve
19571027
6299
D56
196112--
3804
N4
19571019
4104
C6
197107--
6299
V7
(OCoLC)17222092
CPL
CPL
OCL
LGG
pz01
ka01
sd01
pd01
Modern Jazz Quartet.
prf
The Modern Jazz Quartet plus
[sound recording].
[New York] :
Verve,
p1987.
1 sound disc :
digital ;
4 3/4 in.
Compact jazz
Modern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
Recorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
Compact disc.
Analog recording.
The golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cort©·ge (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
Jazz.
Jackson, Milt.
prf
Peterson, Oscar,
1925-
prf
Brown, Ray,
1926-2002.
prf
Thigpen, Ed.
prf
Hayes, Louis,
1937-
prf
MUSIC
Audio-Visual
CD 1131
Marvin Duchow Music
Audio-Visual
PK ! )]
tests/marc_005.phptnu [ --TEST--
marc_005: Ensure a duplicated record is a deep copy; test deleteFields()
--SKIPIF--
--FILE--
next();
$copy_record = $marc_record;
$duplicate_record = clone $marc_record;
$num_deleted1 = $marc_record->deleteFields('020');
print "Deleted $num_deleted1 fields from the original record.\n";
$num_deleted2 = $copy_record->deleteFields('8\\d\\d', true);
print "Deleted $num_deleted2 fields from the shallow copy record.\n";
$num_deleted3 = $duplicate_record->deleteFields('9\\d\\d', true);
print "Deleted $num_deleted3 fields from the duplicate record.\n";
print "Original:\n";
print $marc_record;
print "\nCopy:\n";
print $copy_record;
print "\nDuplicate:\n";
print $duplicate_record;
print "\n";
?>
--EXPECT--
Deleted 1 fields from the original record.
Deleted 12 fields from the shallow copy record.
Deleted 7 fields from the duplicate record.
Original:
LDR 01850 2200517 4500
001 0000000044
003 EMILDA
008 980120s1998 fi j 000 0 swe
035 _99515008808
040 _aNB
042 _9NB
_9SEE
084 _aHcd,u
_2kssb/6
084 _5NB
_auHc
_2kssb
084 _5SEE
_aHcf
_2kssb/6
084 _5Q
_aHcd,uf
_2kssb/6
100 1 _aJansson, Tove,
_d1914-2001
245 04 _aDet osynliga barnet och andra berttelser /
_cTove Jansson
250 _a7. uppl.
260 _aHelsingfors :
_bSchildt,
_c1998 ;
_e(Falun :
_fScandbook)
300 _a166, [4] s. :
_bill. ;
_c21 cm
440 0 _aMumin-biblioteket,
_x99-0698931-9
500 _aOriginaluppl. 1962
599 _aLi: S
740 4 _aDet osynliga barnet
775 1 _z951-50-0385-7
_w9515003857
_907
005 20050204111518.0
Copy:
LDR 01850 2200517 4500
001 0000000044
003 EMILDA
008 980120s1998 fi j 000 0 swe
035 _99515008808
040 _aNB
042 _9NB
_9SEE
084 _aHcd,u
_2kssb/6
084 _5NB
_auHc
_2kssb
084 _5SEE
_aHcf
_2kssb/6
084 _5Q
_aHcd,uf
_2kssb/6
100 1 _aJansson, Tove,
_d1914-2001
245 04 _aDet osynliga barnet och andra berttelser /
_cTove Jansson
250 _a7. uppl.
260 _aHelsingfors :
_bSchildt,
_c1998 ;
_e(Falun :
_fScandbook)
300 _a166, [4] s. :
_bill. ;
_c21 cm
440 0 _aMumin-biblioteket,
_x99-0698931-9
500 _aOriginaluppl. 1962
599 _aLi: S
740 4 _aDet osynliga barnet
775 1 _z951-50-0385-7
_w9515003857
_907
005 20050204111518.0
Duplicate:
LDR 01850 2200517 4500
001 0000000044
003 EMILDA
008 980120s1998 fi j 000 0 swe
035 _99515008808
040 _aNB
042 _9NB
_9SEE
084 _aHcd,u
_2kssb/6
084 _5NB
_auHc
_2kssb
084 _5SEE
_aHcf
_2kssb/6
084 _5Q
_aHcd,uf
_2kssb/6
100 1 _aJansson, Tove,
_d1914-2001
245 04 _aDet osynliga barnet och andra berttelser /
_cTove Jansson
250 _a7. uppl.
260 _aHelsingfors :
_bSchildt,
_c1998 ;
_e(Falun :
_fScandbook)
300 _a166, [4] s. :
_bill. ;
_c21 cm
440 0 _aMumin-biblioteket,
_x99-0698931-9
500 _aOriginaluppl. 1962
599 _aLi: S
740 4 _aDet osynliga barnet
775 1 _z951-50-0385-7
_w9515003857
_907
005 20050204111518.0
PK ! _|6 6 tests/marc_lint_002.phptnu [ --TEST--
marc_lint_002: Tests check041() and check043() called separately
--SKIPIF--
--FILE--
check041($field);
$field = new File_MARC_Data_Field(
'041',
array(
new File_MARC_Subfield('a', 'endorviwo'), // invalid
new File_MARC_Subfield('a', 'spanowpalasba') // too long and invalid
),
"1", ""
);
$marc_lint->check041($field);
$field = new File_MARC_Data_Field(
'043',
array(
new File_MARC_Subfield('a', 'n-----'), // 6 chars vs. 7
new File_MARC_Subfield('a', 'n-us----'), // 8 chars vs. 7
new File_MARC_Subfield('a', 'n-ma-us'), // invalid code
new File_MARC_Subfield('a', 'e-ur-ai') // obsolete code
),
"", ""
);
$marc_lint->check043($field);
?>
--EXPECT--
041: Subfield _a, end (end), is not valid.
041: Subfield _a must be evenly divisible by 3 or exactly three characters if ind2 is not 7, (span).
041: Subfield _h, far, may be obsolete.
041: Subfield _a, endorviwo (end), is not valid.
041: Subfield _a, endorviwo (orv), is not valid.
041: Subfield _a, endorviwo (iwo), is not valid.
041: Subfield _a must be evenly divisible by 3 or exactly three characters if ind2 is not 7, (spanowpalasba).
043: Subfield _a must be exactly 7 characters, n-----
043: Subfield _a must be exactly 7 characters, n-us----
043: Subfield _a, n-ma-us, is not valid.
043: Subfield _a, e-ur-ai, may be obsolete.
PK ! =O
tests/sandburg.xmlnu [
01142cam 2200301 a 4500
92005291
DLC
19930521155141.9
920219s1993 caua j 000 0 eng
92005291
0152038655 :
$15.95
DLC
DLC
DLC
lcac
PS3537.A618
A88 1993
811/.52
20
Sandburg, Carl,
1878-1967.
Arithmetic /
Carl Sandburg ; illustrated as an anamorphic adventure by Ted Rand.
1st ed.
San Diego :
Harcourt Brace Jovanovich,
c1993.
1 v. (unpaged) :
ill. (some col.) ;
26 cm.
One Mylar sheet included in pocket.
A poem about numbers and their characteristics. Features anamorphic, or distorted, drawings which can be restored to normal by viewing from a particular angle or by viewing the image's reflection in the provided Mylar cone.
Arithmetic
Juvenile poetry.
Children's poetry, American.
Arithmetic
Poetry.
American poetry.
Visual perception.
Rand, Ted,
ill.
PK ! !Ņ\ tests/marc_xml_001.phptnu [ --TEST--
marc_xml_001: iterate and pretty print a MARC record
--SKIPIF--
--FILE--
next()) {
/* Note that this adds characters to the leader to satisfy MARCXML schema */
print $marc_record->toXML();
print "\n";
}
?>
--EXPECT--
01850na 2200517 4500
0000000044
EMILDA
980120s1998 fi j 000 0 swe
9515008808
FIM 72:00
9515008808
NB
NB
SEE
Hcd,u
kssb/6
NB
uHc
kssb
SEE
Hcf
kssb/6
Q
Hcd,uf
kssb/6
Jansson, Tove,
1914-2001
Det osynliga barnet och andra berttelser /
Tove Jansson
7. uppl.
Helsingfors :
Schildt,
1998 ;
(Falun :
Scandbook)
166, [4] s. :
ill. ;
21 cm
Mumin-biblioteket,
99-0698931-9
Originaluppl. 1962
Li: S
Det osynliga barnet
951-50-0385-7
9515003857
07
Li
xa
0201080u 0 4000uu |000000
1
SEE
xa
0201080u 0 4000uu |000000
1
L
xa
0201080u 0 4000uu |000000
1
NB
xa
0201080u 0 4000uu |000000
1
Q
xa
0201080u 0 4000uu |000000
1
S
xa
0201080u 0 4000uu |000000
1
NB
NB
NB98:12
plikt
R, 980520
Li
Li
CNB
h,u
SEE
SEE
Q
Q
98947
L
L
0100
98/
3043 H
S
S
Sv97
7235
Yanson, Tobe,
1914-2001
Jansson, Tove,
1914-2001
Janssonov, Tove,
1914-2001
Jansson, Tove,
1914-2001
Jansone, Tuve,
1914-2001
Jansson, Tove,
1914-2001
Janson, Tuve,
1914-2001
Jansson, Tove,
1914-2001
Jansson, Tuve,
1914-2001
Jansson, Tove,
1914-2001
Janssonova, Tove,
1914-2001
Jansson, Tove,
1914-2001
Hcd,u
Sknlitteratur
20050204111518.0
PK ! F;Re% e% tests/marc_004.phptnu [ --TEST--
marc_004: Delete fields and subfields
--SKIPIF--
--FILE--
next()) {
print "\nNext record:\n";
$fields = $marc_record->getFields('650');
foreach ($fields as $field) {
$field->delete();
}
print $marc_record;
}
$marc_file = null;
$marc_file = new File_MARC($dir . '/' . 'music.mrc');
print "\nDelete all subfields with code 'a' from fields with tag 650\n";
while ($marc_record = $marc_file->next()) {
print "\nNext record:\n";
$fields = $marc_record->getFields('650');
foreach ($fields as $field) {
$sf = $field->getSubfields('a');
foreach ($sf as $subfield) {
$field->deleteSubfield($subfield);
}
}
print $marc_record;
}
?>
--EXPECT--
Delete all fields with tag 650
Next record:
LDR 01145ncm 2200277 i 4500
001 000073594
004 AAJ5802
005 20030415102100.0
008 801107s1977 nyujza
010 _a 77771106
035 _a(CaOTUIC)15460184
035 9 _aAAJ5802
040 _aLC
050 00 _aM1366
_b.M62
_dM1527.2
245 04 _aThe Modern Jazz Quartet :
_bThe legendary profile. --
260 _aNew York :
_bM.J.Q. Music,
_cc1977.
300 _ascore (72 p.) ;
_c31 cm.
500 _aFor piano, vibraphone, drums, and double bass.
505 0 _aLewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
700 12 _aLewis, John,
_d1920-
_tSelections.
_f1977.
700 12 _aJackson, Milt.
_tMartyrs.
_f1977.
700 12 _aJackson, Milt.
_tLegendary profile.
_f1977.
740 4 _aThe legendary profile.
852 00 _bMUSIC
_cMAIN
_kfolio
_hM1366
_iM62
_91
_4Marvin Duchow Music
_5
Next record:
LDR 01293cjm 2200289 a 4500
001 001878039
005 20050110174900.0
007 sd fungnn|||e|
008 940202r19931981nyujzn i d
024 1 _a7464573372
028 02 _aJK 57337
_bRed Baron
035 _a(OCoLC)29737267
040 _aSVP
_cSVP
_dLGG
100 1 _aDesmond, Paul,
_d1924-
245 10 _aPaul Desmond & the Modern Jazz Quartet
_h[sound recording]
260 _aNew York, N.Y. :
_bRed Baron :
_bManufactured by Sony Music Entertainment,
_cp1993.
300 _a1 sound disc (39 min.) :
_bdigital ;
_c4 3/4 in.
511 0 _aPaul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
500 _aAll arrangements by John Lewis.
518 _aRecorded live on December 25, 1971 at Town Hall, NYC.
500 _aOriginally released in 1981 by Finesse as LP FW 27487.
500 _aProgram notes by Irving Townsend, June 1981, on container insert.
505 0 _aGreensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
700 1 _aLewis, John,
_d1920-
710 2 _aModern Jazz Quartet.
740 0 _aPaul Desmond and the Modern Jazz Quartet.
Next record:
LDR 01829cjm 2200385 a 4500
001 001964482
005 20060626132700.0
007 sd fzngnn|m|e|
008 871211p19871957nyujzn d
024 1 _a4228332902
028 01 _a833 290-2
_bVerve
033 0 _a19571027
_b6299
_cD56
033 0 _a196112--
_b3804
_cN4
033 0 _a19571019
_b4104
_cC6
033 0 _a197107--
_b6299
_cV7
035 _a(OCoLC)17222092
040 _aCPL
_cCPL
_dOCL
_dLGG
048 _apz01
_aka01
_asd01
_apd01
110 2 _aModern Jazz Quartet.
_4prf
245 14 _aThe Modern Jazz Quartet plus
_h[sound recording].
260 _a[New York] :
_bVerve,
_cp1987.
300 _a1 sound disc :
_bdigital ;
_c4 3/4 in.
440 0 _aCompact jazz
511 0 _aModern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
518 _aRecorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
500 _aCompact disc.
500 _aAnalog recording.
505 0 _aThe golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cortège (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
700 1 _aJackson, Milt.
_4prf
700 1 _aPeterson, Oscar,
_d1925-
_4prf
700 1 _aBrown, Ray,
_d1926-2002.
_4prf
700 1 _aThigpen, Ed.
_4prf
700 1 _aHayes, Louis,
_d1937-
_4prf
852 80 _bMUSIC
_cAV
_hCD 1131
_4Marvin Duchow Music
_5Audio-Visual
Delete all subfields with code 'a' from fields with tag 650
Next record:
LDR 01145ncm 2200277 i 4500
001 000073594
004 AAJ5802
005 20030415102100.0
008 801107s1977 nyujza
010 _a 77771106
035 _a(CaOTUIC)15460184
035 9 _aAAJ5802
040 _aLC
050 00 _aM1366
_b.M62
_dM1527.2
245 04 _aThe Modern Jazz Quartet :
_bThe legendary profile. --
260 _aNew York :
_bM.J.Q. Music,
_cc1977.
300 _ascore (72 p.) ;
_c31 cm.
500 _aFor piano, vibraphone, drums, and double bass.
505 0 _aLewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
650 0 _vExcerpts
_vScores.
700 12 _aLewis, John,
_d1920-
_tSelections.
_f1977.
700 12 _aJackson, Milt.
_tMartyrs.
_f1977.
700 12 _aJackson, Milt.
_tLegendary profile.
_f1977.
740 4 _aThe legendary profile.
852 00 _bMUSIC
_cMAIN
_kfolio
_hM1366
_iM62
_91
_4Marvin Duchow Music
_5
Next record:
LDR 01293cjm 2200289 a 4500
001 001878039
005 20050110174900.0
007 sd fungnn|||e|
008 940202r19931981nyujzn i d
024 1 _a7464573372
028 02 _aJK 57337
_bRed Baron
035 _a(OCoLC)29737267
040 _aSVP
_cSVP
_dLGG
100 1 _aDesmond, Paul,
_d1924-
245 10 _aPaul Desmond & the Modern Jazz Quartet
_h[sound recording]
260 _aNew York, N.Y. :
_bRed Baron :
_bManufactured by Sony Music Entertainment,
_cp1993.
300 _a1 sound disc (39 min.) :
_bdigital ;
_c4 3/4 in.
511 0 _aPaul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
500 _aAll arrangements by John Lewis.
518 _aRecorded live on December 25, 1971 at Town Hall, NYC.
500 _aOriginally released in 1981 by Finesse as LP FW 27487.
500 _aProgram notes by Irving Townsend, June 1981, on container insert.
505 0 _aGreensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
650 0 _y1971-1980.
700 1 _aLewis, John,
_d1920-
710 2 _aModern Jazz Quartet.
740 0 _aPaul Desmond and the Modern Jazz Quartet.
Next record:
LDR 01829cjm 2200385 a 4500
001 001964482
005 20060626132700.0
007 sd fzngnn|m|e|
008 871211p19871957nyujzn d
024 1 _a4228332902
028 01 _a833 290-2
_bVerve
033 0 _a19571027
_b6299
_cD56
033 0 _a196112--
_b3804
_cN4
033 0 _a19571019
_b4104
_cC6
033 0 _a197107--
_b6299
_cV7
035 _a(OCoLC)17222092
040 _aCPL
_cCPL
_dOCL
_dLGG
048 _apz01
_aka01
_asd01
_apd01
110 2 _aModern Jazz Quartet.
_4prf
245 14 _aThe Modern Jazz Quartet plus
_h[sound recording].
260 _a[New York] :
_bVerve,
_cp1987.
300 _a1 sound disc :
_bdigital ;
_c4 3/4 in.
440 0 _aCompact jazz
511 0 _aModern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
518 _aRecorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
500 _aCompact disc.
500 _aAnalog recording.
505 0 _aThe golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cortège (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
700 1 _aJackson, Milt.
_4prf
700 1 _aPeterson, Oscar,
_d1925-
_4prf
700 1 _aBrown, Ray,
_d1926-2002.
_4prf
700 1 _aThigpen, Ed.
_4prf
700 1 _aHayes, Louis,
_d1937-
_4prf
852 80 _bMUSIC
_cAV
_hCD 1131
_4Marvin Duchow Music
_5Audio-Visual
PK ! jS tests/marc_015.phptnu [ --TEST--
marc_015: ensure that pandemonium does not occur if a record doesn't have a given field
--SKIPIF--
--FILE--
next()) {
// Record #2 doesn't contain an 852; getField() returns false
$mfhd = $marc_record->getField('852');
if ($mfhd) {
$mfhd = $mfhd->getSubfield('b');
}
print $marc_record;
print "\n";
}
?>
--EXPECT--
LDR 01145ncm 2200277 i 4500
001 000073594
004 AAJ5802
005 20030415102100.0
008 801107s1977 nyujza
010 _a 77771106
035 _a(CaOTUIC)15460184
035 9 _aAAJ5802
040 _aLC
050 00 _aM1366
_b.M62
_dM1527.2
245 04 _aThe Modern Jazz Quartet :
_bThe legendary profile. --
260 _aNew York :
_bM.J.Q. Music,
_cc1977.
300 _ascore (72 p.) ;
_c31 cm.
500 _aFor piano, vibraphone, drums, and double bass.
505 0 _aLewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
650 0 _aJazz.
650 0 _aMotion picture music
_vExcerpts
_vScores.
700 12 _aLewis, John,
_d1920-
_tSelections.
_f1977.
700 12 _aJackson, Milt.
_tMartyrs.
_f1977.
700 12 _aJackson, Milt.
_tLegendary profile.
_f1977.
740 4 _aThe legendary profile.
852 00 _bMUSIC
_cMAIN
_kfolio
_hM1366
_iM62
_91
_4Marvin Duchow Music
_5
LDR 01293cjm 2200289 a 4500
001 001878039
005 20050110174900.0
007 sd fungnn|||e|
008 940202r19931981nyujzn i d
024 1 _a7464573372
028 02 _aJK 57337
_bRed Baron
035 _a(OCoLC)29737267
040 _aSVP
_cSVP
_dLGG
100 1 _aDesmond, Paul,
_d1924-
245 10 _aPaul Desmond & the Modern Jazz Quartet
_h[sound recording]
260 _aNew York, N.Y. :
_bRed Baron :
_bManufactured by Sony Music Entertainment,
_cp1993.
300 _a1 sound disc (39 min.) :
_bdigital ;
_c4 3/4 in.
511 0 _aPaul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
500 _aAll arrangements by John Lewis.
518 _aRecorded live on December 25, 1971 at Town Hall, NYC.
500 _aOriginally released in 1981 by Finesse as LP FW 27487.
500 _aProgram notes by Irving Townsend, June 1981, on container insert.
505 0 _aGreensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
650 0 _aJazz
_y1971-1980.
700 1 _aLewis, John,
_d1920-
710 2 _aModern Jazz Quartet.
740 0 _aPaul Desmond and the Modern Jazz Quartet.
LDR 01829cjm 2200385 a 4500
001 001964482
005 20060626132700.0
007 sd fzngnn|m|e|
008 871211p19871957nyujzn d
024 1 _a4228332902
028 01 _a833 290-2
_bVerve
033 0 _a19571027
_b6299
_cD56
033 0 _a196112--
_b3804
_cN4
033 0 _a19571019
_b4104
_cC6
033 0 _a197107--
_b6299
_cV7
035 _a(OCoLC)17222092
040 _aCPL
_cCPL
_dOCL
_dLGG
048 _apz01
_aka01
_asd01
_apd01
110 2 _aModern Jazz Quartet.
_4prf
245 14 _aThe Modern Jazz Quartet plus
_h[sound recording].
260 _a[New York] :
_bVerve,
_cp1987.
300 _a1 sound disc :
_bdigital ;
_c4 3/4 in.
440 0 _aCompact jazz
511 0 _aModern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
518 _aRecorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
500 _aCompact disc.
500 _aAnalog recording.
505 0 _aThe golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cortège (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
650 0 _aJazz.
700 1 _aJackson, Milt.
_4prf
700 1 _aPeterson, Oscar,
_d1925-
_4prf
700 1 _aBrown, Ray,
_d1926-2002.
_4prf
700 1 _aThigpen, Ed.
_4prf
700 1 _aHayes, Louis,
_d1937-
_4prf
852 80 _bMUSIC
_cAV
_hCD 1131
_4Marvin Duchow Music
_5Audio-Visual
PK ! 7 tests/marc_009.phptnu [ --TEST--
marc_009: Parse a record where leader record length != real record length
--SKIPIF--
--FILE--
next()) {
print $marc_record;
print "\n";
print "WARNINGS:\n";
foreach ($marc_record->getWarnings() as $warning) {
print " * $warning\n";
}
}
?>
--EXPECT--
LDR 00727nam 2200205 a 4500
001 03-0016458
005 19971103184734.0
008 970701s1997 oru u000 0 eng u
035 _a(Sirsi) a351664
050 00 _aML270.2
_b.A6 1997
100 1 _aAnthony, James R.
245 00 _aFrench baroque music from Beaujoyeulx to Rameau
250 _aRev. and expanded ed.
260 _aPortland, OR :
_bAmadeus Press,
_c1997.
300 _a586 p. :
_bmusic
650 0 _aMusic
_
--FILE--
next()) {
print $marc_record->toJSONHash();
print "\n";
}
?>
--EXPECT--
{"type":"marc-hash","version":[1,0],"leader":"01850 2200517 4500","fields":[["001","0000000044"],["003","EMILDA"],["008","980120s1998 fi j 000 0 swe"],["020"," "," ",[["a","9515008808"],["c","FIM 72:00"]]],["035"," "," ",[["9","9515008808"]]],["040"," "," ",[["a","NB"]]],["042"," "," ",[["9","NB"],["9","SEE"]]],["084"," "," ",[["a","Hcd,u"],["2","kssb\/6"]]],["084"," "," ",[["5","NB"],["a","uHc"],["2","kssb"]]],["084"," "," ",[["5","SEE"],["a","Hcf"],["2","kssb\/6"]]],["084"," "," ",[["5","Q"],["a","Hcd,uf"],["2","kssb\/6"]]],["100","1"," ",[["a","Jansson, Tove,"],["d","1914-2001"]]],["245","0","4",[["a","Det osynliga barnet och andra ber\u00e4ttelser \/"],["c","Tove Jansson"]]],["250"," "," ",[["a","7. uppl."]]],["260"," "," ",[["a","Helsingfors :"],["b","Schildt,"],["c","1998 ;"],["e","(Falun :"],["f","Scandbook)"]]],["300"," "," ",[["a","166, [4] s. :"],["b","ill. ;"],["c","21 cm"]]],["440"," ","0",[["a","Mumin-biblioteket,"],["x","99-0698931-9"]]],["500"," "," ",[["a","Originaluppl. 1962"]]],["599"," "," ",[["a","Li: S"]]],["740","4"," ",[["a","Det osynliga barnet"]]],["775","1"," ",[["z","951-50-0385-7"],["w","9515003857"],["9","07"]]],["841"," "," ",[["5","Li"],["a","xa"],["b","0201080u 0 4000uu |000000"],["e","1"]]],["841"," "," ",[["5","SEE"],["a","xa"],["b","0201080u 0 4000uu |000000"],["e","1"]]],["841"," "," ",[["5","L"],["a","xa"],["b","0201080u 0 4000uu |000000"],["e","1"]]],["841"," "," ",[["5","NB"],["a","xa"],["b","0201080u 0 4000uu |000000"],["e","1"]]],["841"," "," ",[["5","Q"],["a","xa"],["b","0201080u 0 4000uu |000000"],["e","1"]]],["841"," "," ",[["5","S"],["a","xa"],["b","0201080u 0 4000uu |000000"],["e","1"]]],["852"," "," ",[["5","NB"],["b","NB"],["c","NB98:12"],["h","plikt"],["j","R, 980520"]]],["852"," "," ",[["5","Li"],["b","Li"],["c","CNB"],["h","h,u"]]],["852"," "," ",[["5","SEE"],["b","SEE"]]],["852"," "," ",[["5","Q"],["b","Q"],["j","98947"]]],["852"," "," ",[["5","L"],["b","L"],["c","0100"],["h","98\/"],["j","3043 H"]]],["852"," "," ",[["5","S"],["b","S"],["h","Sv97"],["j","7235"]]],["900","1","s",[["a","Yanson, Tobe,"],["d","1914-2001"],["u","Jansson, Tove,"],["d","1914-2001"]]],["900","1","s",[["a","Janssonov\u00e1, Tove,"],["d","1914-2001"],["u","Jansson, Tove,"],["d","1914-2001"]]],["900","1","s",[["a","Jansone, Tuve,"],["d","1914-2001"],["u","Jansson, Tove,"],["d","1914-2001"]]],["900","1","s",[["a","Janson, Tuve,"],["d","1914-2001"],["u","Jansson, Tove,"],["d","1914-2001"]]],["900","1","s",[["a","Jansson, Tuve,"],["d","1914-2001"],["u","Jansson, Tove,"],["d","1914-2001"]]],["900","1","s",[["a","Janssonova, Tove,"],["d","1914-2001"],["u","Jansson, Tove,"],["d","1914-2001"]]],["976"," ","2",[["a","Hcd,u"],["b","Sk\u00f6nlitteratur"]]],["005","20050204111518.0"]]}
PK ! 81 1 tests/marc_record_001.phptnu [ --TEST--
marc_record_001: create a MARC record from scratch
--SKIPIF--
--FILE--
appendField(new File_MARC_Data_Field('245', array(
new File_MARC_Subfield('a', 'Main title: '),
new File_MARC_Subfield('b', 'subtitle'),
new File_MARC_Subfield('c', 'author')
), null, null
));
print $marc;
?>
--EXPECT--
LDR
245 _aMain title:
_bsubtitle
_cauthor
PK ! 2 tests/skipif.incnu [
PK ! \.iv v tests/sandburg.mrcnu [ 01142cam 2200301 a 4500001001300000003000400013005001700017008004100034010001700075020002500092040001800117042000900135050002600144082001600170100003200186245008600218250001200304260005200316300004900368500004000417520022800457650003300685650003300718650002400751650002100775650002300796700002100819 92005291 DLC 19930521155141.9 920219s1993 caua j 000 0 eng a 92005291 a0152038655 : c$15.95 aDLC cDLC dDLC alcac 00 aPS3537.A618 bA88 1993 00 a811/.52 220 1 aSandburg, Carl, d1878-1967. 10 aArithmetic / cCarl Sandburg ; illustrated as an anamorphic adventure by Ted Rand. a1st ed. aSan Diego : bHarcourt Brace Jovanovich, cc1993. a1 v. (unpaged) : bill. (some col.) ; c26 cm. aOne Mylar sheet included in pocket. aA poem about numbers and their characteristics. Features anamorphic, or distorted, drawings which can be restored to normal by viewing from a particular angle or by viewing the image's reflection in the provided Mylar cone. 0 aArithmetic xJuvenile poetry. 0 aChildren's poetry, American. 1 aArithmetic xPoetry. 1 aAmerican poetry. 1 aVisual perception. 1 aRand, Ted, eill. PK ! #c tests/onerecord.xmlnu [
01142cam 2200301 a 4500
92005291
DLC
19930521155141.9
920219s1993 caua j 000 0 eng
92005291
0152038655 :
$15.95
DLC
DLC
DLC
lcac
PS3537.A618
A88 1993
811/.52
20
Sandburg, Carl,
1878-1967.
Arithmetic /
Carl Sandburg ; illustrated as an anamorphic adventure by Ted Rand.
1st ed.
San Diego :
Harcourt Brace Jovanovich,
c1993.
1 v. (unpaged) :
ill. (some col.) ;
26 cm.
One Mylar sheet included in pocket.
A poem about numbers and their characteristics. Features anamorphic, or distorted, drawings which can be restored to normal by viewing from a particular angle or by viewing the image's reflection in the provided Mylar cone.
Arithmetic
Juvenile poetry.
Children's poetry, American.
Arithmetic
Poetry.
American poetry.
Visual perception.
Rand, Ted,
ill.
PK ! _X tests/marc_field_004.phptnu [ --TEST--
marc_field_004: Add subfields to an existing field (corner case)
--SKIPIF--
--FILE--
getSubfields('a');
// we might get an array back; in this case, we want the first subfield
if (is_array($sf)) {
$field->insertSubfield($subfield1, $sf[0], true);
}
else {
$field->insertSubfield($subfield1, $sf, true);
}
// let's see the results
print $field;
print "\n";
?>
--EXPECT--
100 0 _ga little
_anothing
_zeverything
PK ! .%` ` tests/marc_010.phptnu [ --TEST--
marc_010: iterate and pretty print MARC records from a stream
--SKIPIF--
--FILE--
next()) {
print $marc_record;
print "\n";
}
?>
--EXPECT--
LDR 01145ncm 2200277 i 4500
001 000073594
004 AAJ5802
005 20030415102100.0
008 801107s1977 nyujza
010 _a 77771106
035 _a(CaOTUIC)15460184
035 9 _aAAJ5802
040 _aLC
050 00 _aM1366
_b.M62
_dM1527.2
245 04 _aThe Modern Jazz Quartet :
_bThe legendary profile. --
260 _aNew York :
_bM.J.Q. Music,
_cc1977.
300 _ascore (72 p.) ;
_c31 cm.
500 _aFor piano, vibraphone, drums, and double bass.
505 0 _aLewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
650 0 _aJazz.
650 0 _aMotion picture music
_vExcerpts
_vScores.
700 12 _aLewis, John,
_d1920-
_tSelections.
_f1977.
700 12 _aJackson, Milt.
_tMartyrs.
_f1977.
700 12 _aJackson, Milt.
_tLegendary profile.
_f1977.
740 4 _aThe legendary profile.
852 00 _bMUSIC
_cMAIN
_kfolio
_hM1366
_iM62
_91
_4Marvin Duchow Music
_5
LDR 01293cjm 2200289 a 4500
001 001878039
005 20050110174900.0
007 sd fungnn|||e|
008 940202r19931981nyujzn i d
024 1 _a7464573372
028 02 _aJK 57337
_bRed Baron
035 _a(OCoLC)29737267
040 _aSVP
_cSVP
_dLGG
100 1 _aDesmond, Paul,
_d1924-
245 10 _aPaul Desmond & the Modern Jazz Quartet
_h[sound recording]
260 _aNew York, N.Y. :
_bRed Baron :
_bManufactured by Sony Music Entertainment,
_cp1993.
300 _a1 sound disc (39 min.) :
_bdigital ;
_c4 3/4 in.
511 0 _aPaul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
500 _aAll arrangements by John Lewis.
518 _aRecorded live on December 25, 1971 at Town Hall, NYC.
500 _aOriginally released in 1981 by Finesse as LP FW 27487.
500 _aProgram notes by Irving Townsend, June 1981, on container insert.
505 0 _aGreensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
650 0 _aJazz
_y1971-1980.
700 1 _aLewis, John,
_d1920-
710 2 _aModern Jazz Quartet.
740 0 _aPaul Desmond and the Modern Jazz Quartet.
LDR 01829cjm 2200385 a 4500
001 001964482
005 20060626132700.0
007 sd fzngnn|m|e|
008 871211p19871957nyujzn d
024 1 _a4228332902
028 01 _a833 290-2
_bVerve
033 0 _a19571027
_b6299
_cD56
033 0 _a196112--
_b3804
_cN4
033 0 _a19571019
_b4104
_cC6
033 0 _a197107--
_b6299
_cV7
035 _a(OCoLC)17222092
040 _aCPL
_cCPL
_dOCL
_dLGG
048 _apz01
_aka01
_asd01
_apd01
110 2 _aModern Jazz Quartet.
_4prf
245 14 _aThe Modern Jazz Quartet plus
_h[sound recording].
260 _a[New York] :
_bVerve,
_cp1987.
300 _a1 sound disc :
_bdigital ;
_c4 3/4 in.
440 0 _aCompact jazz
511 0 _aModern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
518 _aRecorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
500 _aCompact disc.
500 _aAnalog recording.
505 0 _aThe golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cortège (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
650 0 _aJazz.
700 1 _aJackson, Milt.
_4prf
700 1 _aPeterson, Oscar,
_d1925-
_4prf
700 1 _aBrown, Ray,
_d1926-2002.
_4prf
700 1 _aThigpen, Ed.
_4prf
700 1 _aHayes, Louis,
_d1937-
_4prf
852 80 _bMUSIC
_cAV
_hCD 1131
_4Marvin Duchow Music
_5Audio-Visual
PK ! B1
tests/marc_lint_005.phptnu [ --TEST--
marc_lint_005: Tests check_020() called separately
--SKIPIF--
--FILE--
"154879473"), //too few digits
array('a' => "1548794743"), //invalid checksum
array('a' => "15487947443"), //11 digits
array('a' => "15487947443324"), //14 digits
array('a' => "9781548794743"), //13 digit valid
array('a' => "9781548794745"), //13 digit invalid
array('a' => "1548794740 (10 : good checksum)"), //10 digit valid with qualifier
array('a' => "1548794745 (10 : bad checksum)"), //10 digit invalid with qualifier
array('a' => "1-54879-474-0 (hyphens and good checksum)"), //10 digit invalid with hyphens and qualifier
array('a' => "1-54879-474-5 (hyphens and bad checksum)"), //10 digit invalid with hyphens and qualifier
array('a' => "1548794740(10 : unspaced qualifier)"), //10 valid without space before qualifier
array('a' => "1548794745(10 : unspaced qualifier : bad checksum)"), //10 invalid without space before qualifier
array('z' => "1548794743"), //subfield z
);
foreach ($testData as $current) {
$subfields = array();
foreach ($current as $key => $value) {
$subfields[] = new File_MARC_Subfield($key, $value);
}
$field = new File_MARC_Data_Field('020', $subfields, '', '');
$marc_lint->check020($field);
}
?>
--EXPECT--
020: Subfield a has the wrong number of digits, 154879473.
020: Subfield a has bad checksum, 1548794743.
020: Subfield a has the wrong number of digits, 15487947443.
020: Subfield a has the wrong number of digits, 15487947443324.
020: Subfield a has bad checksum (13 digit), 9781548794745.
020: Subfield a has bad checksum, 1548794745 (10 : bad checksum).
020: Subfield a may have invalid characters.
020: Subfield a may have invalid characters.
020: Subfield a has bad checksum, 1-54879-474-5 (hyphens and bad checksum).
020: Subfield a qualifier must be preceded by space, 1548794740(10 : unspaced qualifier).
020: Subfield a qualifier must be preceded by space, 1548794745(10 : unspaced qualifier : bad checksum).
020: Subfield a has bad checksum, 1548794745(10 : unspaced qualifier : bad checksum).
PK ! ye@ tests/marc_xml_007.phptnu [ --TEST--
marc_xml_007: test getTag(), isControlField(), and isDataField() convenience methods on MARCXML
--SKIPIF--
--FILE--
next()) {
$fields = $marc_record->getFields();
foreach ($fields as $field) {
print $field->getTag();
if ($field->isControlField()) {
print "\tControl field!";
}
if ($field->isDataField()) {
print "\tData field!";
}
print "\n";
}
}
?>
--EXPECT--
001 Control field!
003 Control field!
005 Control field!
006 Control field!
007 Control field!
008 Control field!
037 Data field!
040 Data field!
245 Data field!
246 Data field!
260 Data field!
300 Data field!
500 Data field!
500 Data field!
500 Data field!
510 Data field!
510 Data field!
533 Data field!
651 Data field!
830 Data field!
856 Data field!
909 Data field!
PK ! tests/marc_008.phptnu [ --TEST--
marc_008: Attempt to open a file that does not exist
--SKIPIF--
--FILE--
getMessage();
}
?>
--EXPECTF--
Warning: fopen(super_bogus_file): failed to open stream: No such file or directory in %sMARC.php on line %d
Invalid input file "super_bogus_file"
PK ! +W
tests/bigarchive.xmlnu [
00000nam 2200277 450099865026eUnM19961010163452.0m g dcr bn |||a|bb|940112s1649 enk s 00| | eng dCL0051000003ProQuest Information and Learning. 300 N. Zeeb Rd., Ann Arbor, MI 48106Cu-RivESCu-RivESCStRLINdcrbWaOLNThe VVelsh embassador, or the happy newes his vvorship hath brought to London.[electronic resource] :Togetherwith her thirteen articles of acreements, which her propounds to all her cousens in her principality of Wales,and her Cities of London.Happy newes his vvorship hath brought to London[London] :Printed for George Roberts, and are to be soldat the Maiden Head on Snow-Hill neer Holborn Conduit,1649.[2], 6 p.Place of publication from Wing.Annotation on Thomason copy: "May 4th".Reproduction of the original in the British Library.Wing (2nd ed.)W1315.ThomasonE.552[19].Electronic reproduction.Ann Arbor, Mich. :UMI,1999-(Early English books online)Digital version of: (Thomason Tracts ; 85:E552[19])s1999 miun sGreat BritainPolitics and government1642-1649Early works to 1800.Early English books online.E-book (Onsite access at NYPL Research Libraries)http://gateway.proquest.com/openurl?ctx_ver=Z39.88-2003&res_id=xri:eebo&rft_val_fmt=&rft_id=xri:eebo:image:117259Not for export in OCLC Reclamation Project
PK ! ԛ
tests/marc_014.phptnu [ --TEST--
marc_014: Add fields to a MARC record
--SKIPIF--
--FILE--
next();
// create some subfields
$subfields[] = new File_MARC_Subfield('a', 'nothing');
$subfields[] = new File_MARC_Subfield('z', 'everything');
// create a data field
$data_field = new File_MARC_Data_Field('100', $subfields, '0');
// append the data field
$marc_record->appendField($data_field);
// create a control field
$ctrl_field = new File_MARC_Control_Field('001', '01234567890');
// prepend the control field
$marc_record->prependField($ctrl_field);
// reproduce test case reported by Mark Jordan
$subfields_966_2[] = new File_MARC_Subfield('l', 'web');
$subfields_966_2[] = new File_MARC_Subfield('r', '0');
$subfields_966_2[] = new File_MARC_Subfield('s', 'b');
$subfields_966_2[] = new File_MARC_Subfield('i', '49');
$subfields_966_2[] = new File_MARC_Subfield('c', '1');
$field_966_2 = new File_MARC_Data_Field('966', $subfields_966_2, null, null);
$marc_record->appendField($field_966_2);
// let's see the results
print utf8_encode($marc_record);
print "\n";
?>
--EXPECT--
LDR 01850 2200517 4500
001 01234567890
001 0000000044
003 EMILDA
008 980120s1998 fi j 000 0 swe
020 _a9515008808
_cFIM 72:00
035 _99515008808
040 _aNB
042 _9NB
_9SEE
084 _aHcd,u
_2kssb/6
084 _5NB
_auHc
_2kssb
084 _5SEE
_aHcf
_2kssb/6
084 _5Q
_aHcd,uf
_2kssb/6
100 1 _aJansson, Tove,
_d1914-2001
245 04 _aDet osynliga barnet och andra berättelser /
_cTove Jansson
250 _a7. uppl.
260 _aHelsingfors :
_bSchildt,
_c1998 ;
_e(Falun :
_fScandbook)
300 _a166, [4] s. :
_bill. ;
_c21 cm
440 0 _aMumin-biblioteket,
_x99-0698931-9
500 _aOriginaluppl. 1962
599 _aLi: S
740 4 _aDet osynliga barnet
775 1 _z951-50-0385-7
_w9515003857
_907
841 _5Li
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5SEE
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5L
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5NB
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5Q
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5S
_axa
_b0201080u 0 4000uu |000000
_e1
852 _5NB
_bNB
_cNB98:12
_hplikt
_jR, 980520
852 _5Li
_bLi
_cCNB
_hh,u
852 _5SEE
_bSEE
852 _5Q
_bQ
_j98947
852 _5L
_bL
_c0100
_h98/
_j3043 H
852 _5S
_bS
_hSv97
_j7235
900 1s _aYanson, Tobe,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanssonová, Tove,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJansone, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanson, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJansson, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanssonova, Tove,
_d1914-2001
_uJansson, Tove,
_d1914-2001
976 2 _aHcd,u
_bSkönlitteratur
005 20050204111518.0
100 0 _anothing
_zeverything
966 _lweb
_r0
_sb
_i49
_c1
PK ! f~ tests/marc_field_001.phptnu [ --TEST--
marc_field_001: Exercise basic methods for File_MARC_Field class
--SKIPIF--
--FILE--
getTag() . "\n";
print "Get Ind1: " . $field->getIndicator(1) . "\n";
print "Get Ind2: " . $field->getIndicator(2) . "\n";
// test basic setter methods
print "Set Ind1: " . $field->setIndicator(1, '3') . "\n";
// test pretty print
print $field;
print "\n";
// test raw print
print $field->toRaw();
?>
--EXPECT--
Tag: 100
Get Ind1: 0
Get Ind2:
Set Ind1: 3
100 3 _anothing
_zeverything
3 anothing zeverything
PK ! Y Y tests/marc_xml_009.phptnu [ --TEST--
marc_xml_009: convert a MARCXML record with an overly long leader to MARC
--SKIPIF--
--FILE--
next()) {
print $marc_record->toRaw();
}
?>
--EXPECT--
00749cam a2200241 454500001001400000003000600014005001700020008004100037020001800078020001500096035002100111040003600132050002400168100002500192245007800217260003700295300002100332504004100353650001700394650002200411852004800433901002600481 LIBN539044247 OCoLC 20081030150430.0 070630||||| ||| 000 0 eng d a9781856075442 a1856075443 a(OCoLC)156822300 aBTCTA cBTCTA dYDXCP dBAKER dEMT 4 aBL2747.2 b.W45 2006 1 aWhite, Stephen Ross. 10 aSpace for unknowing : bthe place of agnosis in faith / cStephen R. White. aDublin : bColumba Press, cc2006. a160 p. ; c22 cm. aIncludes bibliographical references. 0 aAgnosticism. 0 aBelief and doubt. a1 h230 WHI p11111027105040 t6511254 9p26.95 aLIBN539044247 bSystem
PK ! ~N0: : tests/example.mrcnu [ 01850 2200517 4500001001100000003000700011008003900018020002600057035001500083040000700098042001200105084001800117084001800135084002100153084002200174100003000196245006200226250001300288260005800301300003300359440003700392500002300429599001000452740002400462775003400486841004800520841004900568841004700617841004800664841004700712841004700759852003800806852002100844852001300865852001600878852002800894852002100922900005600943900006000999900005701059900005601116900005701172900006001229976002601289005001701315 0000000044 EMILDA 980120s1998 fi j 000 0 swe a9515008808 cFIM 72:00 99515008808 aNB 9NB 9SEE aHcd,u 2kssb/6 5NB auHc 2kssb 5SEE aHcf 2kssb/6 5Q aHcd,uf 2kssb/6 1 aJansson, Tove, d1914-2001 04 aDet osynliga barnet och andra berttelser / cTove Jansson a7. uppl. aHelsingfors : bSchildt, c1998 ; e(Falun : fScandbook) a166, [4] s. : bill. ; c21 cm 0 aMumin-biblioteket, x99-0698931-9 aOriginaluppl. 1962 aLi: S 4 aDet osynliga barnet 1 z951-50-0385-7 w9515003857 907 5Li axa b0201080u 0 4000uu |000000 e1 5SEE axa b0201080u 0 4000uu |000000 e1 5L axa b0201080u 0 4000uu |000000 e1 5NB axa b0201080u 0 4000uu |000000 e1 5Q axa b0201080u 0 4000uu |000000 e1 5S axa b0201080u 0 4000uu |000000 e1 5NB bNB cNB98:12 hplikt jR, 980520 5Li bLi cCNB hh,u 5SEE bSEE 5Q bQ j98947 5L bL c0100 h98/ j3043 H 5S bS hSv97 j7235 1s aYanson, Tobe, d1914-2001 uJansson, Tove, d1914-2001 1s aJanssonov, Tove, d1914-2001 uJansson, Tove, d1914-2001 1s aJansone, Tuve, d1914-2001 uJansson, Tove, d1914-2001 1s aJanson, Tuve, d1914-2001 uJansson, Tove, d1914-2001 1s aJansson, Tuve, d1914-2001 uJansson, Tove, d1914-2001 1s aJanssonova, Tove, d1914-2001 uJansson, Tove, d1914-2001 2 aHcd,u bSknlitteratur 20050204111518.0 PK ! }۶\p p tests/bad_example.xmlnu [
01850 a2200517 4500
0000000044
EMILDA
980120s1998 fi j 000 0 swe
9515008808
FIM 72:00
9515008808
NB
NB
SEE
Hcd,u
kssb/6
NB
uHc
kssb
SEE
Hcf
kssb/6
Q
Hcd,uf
kssb/6
Jansson, Tove,
1914-2001
Det osynliga barnet och andra bert̃telser /
Tove Jansson
7. uppl.
Helsingfors :
Schildt,
1998 ;
(Falun :
Scandbook)
166, [4] s. :
ill. ;
21 cm
Mumin-biblioteket,
99-0698931-9
Originaluppl. 1962
Li: S
Det osynliga barnet
951-50-0385-7
9515003857
07
Li
xa
0201080u 0 4000uu |000000
1
SEE
xa
0201080u 0 4000uu |000000
1
L
xa
0201080u 0 4000uu |000000
1
NB
xa
0201080u 0 4000uu |000000
1
Q
xa
0201080u 0 4000uu |000000
1
S
xa
0201080u 0 4000uu |000000
1
NB
NB
NB98:12
plikt
R, 980520
Li
Li
CNB
h,u
SEE
SEE
Q
Q
98947
L
L
0100
98/
3043 H
S
S
Sv97
7235
Yanson, Tobe,
1914-2001
Jansson, Tove,
1914-2001
Janssonov,̀ Tove,
1914-2001
Jansson, Tove,
1914-2001
Jansone, Tuve,
1914-2001
Jansson, Tove,
1914-2001
Janson, Tuve,
1914-2001
Jansson, Tove,
1914-2001
Jansson, Tuve,
1914-2001
Jansson, Tove,
1914-2001
Janssonova, Tove,
1914-2001
Jansson, Tove,
1914-2001
Hcd,u
Skn̲litteratur
20050204111518.0
PK ! 9D D tests/marc_017.phptnu [ --TEST--
marc_017: iterate and print a MARC record to JSON format
--SKIPIF--
--FILE--
next()) {
print $marc_record->toJSON();
print "\n";
}
?>
--EXPECT--
{"leader":"01850 2200517 4500","fields":[{"001":"0000000044"},{"003":"EMILDA"},{"008":"980120s1998 fi j 000 0 swe"},{"020":{"ind1":" ","ind2":" ","subfields":[{"a":"9515008808"},{"c":"FIM 72:00"}]}},{"035":{"ind1":" ","ind2":" ","subfields":[{"9":"9515008808"}]}},{"040":{"ind1":" ","ind2":" ","subfields":[{"a":"NB"}]}},{"042":{"ind1":" ","ind2":" ","subfields":[{"9":"NB"},{"9":"SEE"}]}},{"084":{"ind1":" ","ind2":" ","subfields":[{"a":"Hcd,u"},{"2":"kssb\/6"}]}},{"084":{"ind1":" ","ind2":" ","subfields":[{"5":"NB"},{"a":"uHc"},{"2":"kssb"}]}},{"084":{"ind1":" ","ind2":" ","subfields":[{"5":"SEE"},{"a":"Hcf"},{"2":"kssb\/6"}]}},{"084":{"ind1":" ","ind2":" ","subfields":[{"5":"Q"},{"a":"Hcd,uf"},{"2":"kssb\/6"}]}},{"100":{"ind1":"1","ind2":" ","subfields":[{"a":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"245":{"ind1":"0","ind2":"4","subfields":[{"a":"Det osynliga barnet och andra ber\u00e4ttelser \/"},{"c":"Tove Jansson"}]}},{"250":{"ind1":" ","ind2":" ","subfields":[{"a":"7. uppl."}]}},{"260":{"ind1":" ","ind2":" ","subfields":[{"a":"Helsingfors :"},{"b":"Schildt,"},{"c":"1998 ;"},{"e":"(Falun :"},{"f":"Scandbook)"}]}},{"300":{"ind1":" ","ind2":" ","subfields":[{"a":"166, [4] s. :"},{"b":"ill. ;"},{"c":"21 cm"}]}},{"440":{"ind1":" ","ind2":"0","subfields":[{"a":"Mumin-biblioteket,"},{"x":"99-0698931-9"}]}},{"500":{"ind1":" ","ind2":" ","subfields":[{"a":"Originaluppl. 1962"}]}},{"599":{"ind1":" ","ind2":" ","subfields":[{"a":"Li: S"}]}},{"740":{"ind1":"4","ind2":" ","subfields":[{"a":"Det osynliga barnet"}]}},{"775":{"ind1":"1","ind2":" ","subfields":[{"z":"951-50-0385-7"},{"w":"9515003857"},{"9":"07"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"Li"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"SEE"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"L"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"NB"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"Q"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"S"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"NB"},{"b":"NB"},{"c":"NB98:12"},{"h":"plikt"},{"j":"R, 980520"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"Li"},{"b":"Li"},{"c":"CNB"},{"h":"h,u"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"SEE"},{"b":"SEE"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"Q"},{"b":"Q"},{"j":"98947"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"L"},{"b":"L"},{"c":"0100"},{"h":"98\/"},{"j":"3043 H"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"S"},{"b":"S"},{"h":"Sv97"},{"j":"7235"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Yanson, Tobe,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Janssonov\u00e1, Tove,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Jansone, Tuve,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Janson, Tuve,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Jansson, Tuve,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Janssonova, Tove,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"976":{"ind1":" ","ind2":"2","subfields":[{"a":"Hcd,u"},{"b":"Sk\u00f6nlitteratur"}]}},{"005":"20050204111518.0"}]}
PK ! &c c tests/marc_002.phptnu [ --TEST--
marc_002: iterate and pretty print MARC records from a file with multiple records
--SKIPIF--
--FILE--
next()) {
print $marc_record;
print "\n";
}
?>
--EXPECT--
LDR 01145ncm 2200277 i 4500
001 000073594
004 AAJ5802
005 20030415102100.0
008 801107s1977 nyujza
010 _a 77771106
035 _a(CaOTUIC)15460184
035 9 _aAAJ5802
040 _aLC
050 00 _aM1366
_b.M62
_dM1527.2
245 04 _aThe Modern Jazz Quartet :
_bThe legendary profile. --
260 _aNew York :
_bM.J.Q. Music,
_cc1977.
300 _ascore (72 p.) ;
_c31 cm.
500 _aFor piano, vibraphone, drums, and double bass.
505 0 _aLewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
650 0 _aJazz.
650 0 _aMotion picture music
_vExcerpts
_vScores.
700 12 _aLewis, John,
_d1920-
_tSelections.
_f1977.
700 12 _aJackson, Milt.
_tMartyrs.
_f1977.
700 12 _aJackson, Milt.
_tLegendary profile.
_f1977.
740 4 _aThe legendary profile.
852 00 _bMUSIC
_cMAIN
_kfolio
_hM1366
_iM62
_91
_4Marvin Duchow Music
_5
LDR 01293cjm 2200289 a 4500
001 001878039
005 20050110174900.0
007 sd fungnn|||e|
008 940202r19931981nyujzn i d
024 1 _a7464573372
028 02 _aJK 57337
_bRed Baron
035 _a(OCoLC)29737267
040 _aSVP
_cSVP
_dLGG
100 1 _aDesmond, Paul,
_d1924-
245 10 _aPaul Desmond & the Modern Jazz Quartet
_h[sound recording]
260 _aNew York, N.Y. :
_bRed Baron :
_bManufactured by Sony Music Entertainment,
_cp1993.
300 _a1 sound disc (39 min.) :
_bdigital ;
_c4 3/4 in.
511 0 _aPaul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
500 _aAll arrangements by John Lewis.
518 _aRecorded live on December 25, 1971 at Town Hall, NYC.
500 _aOriginally released in 1981 by Finesse as LP FW 27487.
500 _aProgram notes by Irving Townsend, June 1981, on container insert.
505 0 _aGreensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
650 0 _aJazz
_y1971-1980.
700 1 _aLewis, John,
_d1920-
710 2 _aModern Jazz Quartet.
740 0 _aPaul Desmond and the Modern Jazz Quartet.
LDR 01829cjm 2200385 a 4500
001 001964482
005 20060626132700.0
007 sd fzngnn|m|e|
008 871211p19871957nyujzn d
024 1 _a4228332902
028 01 _a833 290-2
_bVerve
033 0 _a19571027
_b6299
_cD56
033 0 _a196112--
_b3804
_cN4
033 0 _a19571019
_b4104
_cC6
033 0 _a197107--
_b6299
_cV7
035 _a(OCoLC)17222092
040 _aCPL
_cCPL
_dOCL
_dLGG
048 _apz01
_aka01
_asd01
_apd01
110 2 _aModern Jazz Quartet.
_4prf
245 14 _aThe Modern Jazz Quartet plus
_h[sound recording].
260 _a[New York] :
_bVerve,
_cp1987.
300 _a1 sound disc :
_bdigital ;
_c4 3/4 in.
440 0 _aCompact jazz
511 0 _aModern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
518 _aRecorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
500 _aCompact disc.
500 _aAnalog recording.
505 0 _aThe golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cortège (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
650 0 _aJazz.
700 1 _aJackson, Milt.
_4prf
700 1 _aPeterson, Oscar,
_d1925-
_4prf
700 1 _aBrown, Ray,
_d1926-2002.
_4prf
700 1 _aThigpen, Ed.
_4prf
700 1 _aHayes, Louis,
_d1937-
_4prf
852 80 _bMUSIC
_cAV
_hCD 1131
_4Marvin Duchow Music
_5Audio-Visual
PK ! tests/marc_xml_005.phptnu [ --TEST--
marc_xml_005: Round-trip a MARCXML record with a root element of "record" to MARC21
--SKIPIF--
--FILE--
next()) {
print $marc_record->toRaw();
}
?>
--EXPECT--
01142cam 2200301 a 4500001001300000003000400013005001700017008004100034010001700075020002500092040001800117042000900135050002600144082001600170100003200186245008600218250001200304260005200316300004900368500004000417520022800457650003300685650003300718650002400751650002100775650002300796700002100819 92005291 DLC 19930521155141.9 920219s1993 caua j 000 0 eng a 92005291 a0152038655 : c$15.95 aDLC cDLC dDLC alcac 00 aPS3537.A618 bA88 1993 00 a811/.52 220 1 aSandburg, Carl, d1878-1967. 10 aArithmetic / cCarl Sandburg ; illustrated as an anamorphic adventure by Ted Rand. a1st ed. aSan Diego : bHarcourt Brace Jovanovich, cc1993. a1 v. (unpaged) : bill. (some col.) ; c26 cm. aOne Mylar sheet included in pocket. aA poem about numbers and their characteristics. Features anamorphic, or distorted, drawings which can be restored to normal by viewing from a particular angle or by viewing the image's reflection in the provided Mylar cone. 0 aArithmetic xJuvenile poetry. 0 aChildren's poetry, American. 1 aArithmetic xPoetry. 1 aAmerican poetry. 1 aVisual perception. 1 aRand, Ted, eill.
PK ! 5;- - tests/music.xmlnu [
01145ncm a2200277 i 4500
000073594
AAJ5802
20030415102100.0
801107s1977 nyujza
77771106
(CaOTUIC)15460184
AAJ5802
LC
M1366
.M62
M1527.2
The Modern Jazz Quartet :
The legendary profile. --
New York :
M.J.Q. Music,
c1977.
score (72 p.) ;
31 cm.
For piano, vibraphone, drums, and double bass.
Lewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B́Ư.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
Jazz.
Motion picture music
Excerpts
Scores.
Lewis, John,
1920-
Selections.
1977.
Jackson, Milt.
Martyrs.
1977.
Jackson, Milt.
Legendary profile.
1977.
The legendary profile.
MUSIC
MAIN
folio
M1366
M62
1
Marvin Duchow Music
01293cjm a2200289 a 4500
001878039
20050110174900.0
sd fungnn|||e|
940202r19931981nyujzn i d
7464573372
JK 57337
Red Baron
(OCoLC)29737267
SVP
SVP
LGG
Desmond, Paul,
1924-
Paul Desmond & the Modern Jazz Quartet
[sound recording]
New York, N.Y. :
Red Baron :
Manufactured by Sony Music Entertainment,
p1993.
1 sound disc (39 min.) :
digital ;
4 3/4 in.
Paul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
All arrangements by John Lewis.
Recorded live on December 25, 1971 at Town Hall, NYC.
Originally released in 1981 by Finesse as LP FW 27487.
Program notes by Irving Townsend, June 1981, on container insert.
Greensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
Jazz
1971-1980.
Lewis, John,
1920-
Modern Jazz Quartet.
Paul Desmond and the Modern Jazz Quartet.
01829cjm a2200385 a 4500
001964482
20060626132700.0
sd fzngnn|m|e|
871211p19871957nyujzn d
4228332902
833 290-2
Verve
19571027
6299
D56
196112--
3804
N4
19571019
4104
C6
197107--
6299
V7
(OCoLC)17222092
CPL
CPL
OCL
LGG
pz01
ka01
sd01
pd01
Modern Jazz Quartet.
prf
The Modern Jazz Quartet plus
[sound recording].
[New York] :
Verve,
p1987.
1 sound disc :
digital ;
4 3/4 in.
Compact jazz
Modern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
Recorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
Compact disc.
Analog recording.
The golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cort©·ge (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
Jazz.
Jackson, Milt.
prf
Peterson, Oscar,
1925-
prf
Brown, Ray,
1926-2002.
prf
Thigpen, Ed.
prf
Hayes, Louis,
1937-
prf
MUSIC
AV
CD 1131
Marvin Duchow Music
Audio-Visual
PK ! ` tests/marc_012.phptnu [ --TEST--
marc_012: test isControlField() and isDataField() convenience methods
--SKIPIF--
--FILE--
next()) {
$fields = $marc_record->getFields();
foreach ($fields as $field) {
print $field->getTag();
if ($field->isControlField()) {
print "\tControl field!";
}
if ($field->isDataField()) {
print "\tData field!";
}
print "\n";
}
}
?>
--EXPECT--
001 Control field!
004 Control field!
005 Control field!
008 Control field!
010 Data field!
035 Data field!
035 Data field!
040 Data field!
050 Data field!
245 Data field!
260 Data field!
300 Data field!
500 Data field!
505 Data field!
650 Data field!
650 Data field!
700 Data field!
700 Data field!
700 Data field!
740 Data field!
852 Data field!
001 Control field!
005 Control field!
007 Control field!
008 Control field!
024 Data field!
028 Data field!
035 Data field!
040 Data field!
100 Data field!
245 Data field!
260 Data field!
300 Data field!
511 Data field!
500 Data field!
518 Data field!
500 Data field!
500 Data field!
505 Data field!
650 Data field!
700 Data field!
710 Data field!
740 Data field!
001 Control field!
005 Control field!
007 Control field!
008 Control field!
024 Data field!
028 Data field!
033 Data field!
033 Data field!
033 Data field!
033 Data field!
035 Data field!
040 Data field!
048 Data field!
110 Data field!
245 Data field!
260 Data field!
300 Data field!
440 Data field!
511 Data field!
518 Data field!
500 Data field!
500 Data field!
505 Data field!
650 Data field!
700 Data field!
700 Data field!
700 Data field!
700 Data field!
700 Data field!
852 Data field!
PK ! <- - tests/marc_subfield_002.phptnu [ --TEST--
marc_subfield_002: Exercise setter and isEmpty() methods for File_MARC_Subfield class
--SKIPIF--
--FILE--
isEmpty()) {
print "empty.\n";
}
else {
print "not empty.\n";
}
}
$subfield = new File_MARC_Subfield('a', 'wasssup');
// test isEmpty() scenarios
testEmpty($subfield);
$subfield->setData(null);
testEmpty($subfield);
$subfield->setData('just hangin');
testEmpty($subfield);
// test setCode() scenarios
print "\nSet code to 'z'...";
if ($subfield->setCode('z')) {
print "\n";
print $subfield;
}
print "\nSet code to ''...";
if ($subfield->setCode('')) {
print "\n";
print $subfield;
}
print "\nSet code to null...";
if ($subfield->setCode(null)) {
print "\n";
print $subfield;
}
?>
--EXPECT--
Subfield is not empty.
Subfield is empty.
Subfield is not empty.
Set code to 'z'...
[z]: just hangin
Set code to ''...
Set code to null...
PK ! f= = tests/bad_example.mrcnu [ 01853 a2200517 450000100110000000300070001100800390001802000260005703500150008304000070009804200120010508400180011708400180013508400210015308400220017410000300019624500630022625000130028926000580030230-003300360440003700393500002300430599001000453740002400463775003400487841004800521841004900569841004700618841004800665841004700713841004700760852003800807852002100845852001300866852001600879852002800895852002100923900005600944900006101000900005701061900005601118900005701174900006001231976002701291005001701318 0000000044 EMILDA 980120s1998 fi j 000 0 swe a9515008808 cFIM 72:00 99515008808 aNB 9NB 9SEE aHcd,u 2kssb/6 5NB auHc 2kssb 5SEE aHcf 2kssb/6 5Q aHcd,uf 2kssb/6 1 aJansson, Tove, d1914-2001 04 aDet osynliga barnet och andra bert̃telser / cTove Jansson a7. uppl. aHelsingfors : bSchildt, c1998 ; e(Falun : fScandbook) a166, [4] s. : bill. ; c21 cm 0 aMumin-biblioteket, x99-0698931-9 aOriginaluppl. 1962 aLi: S 4 aDet osynliga barnet 1 z951-50-0385-7 w9515003857 907 5Li axa b0201080u 0 4000uu |000000 e1 5SEE axa b0201080u 0 4000uu |000000 e1 5L axa b0201080u 0 4000uu |000000 e1 5NB axa b0201080u 0 4000uu |000000 e1 5Q axa b0201080u 0 4000uu |000000 e1 5S axa b0201080u 0 4000uu |000000 e1 5NB bNB cNB98:12 hplikt jR, 980520 5Li bLi cCNB hh,u 5SEE bSEE 5Q bQ j98947 5L bL c0100 h98/ j3043 H 5S bS hSv97 j7235 1s aYanson, Tobe, d1914-2001 uJansson, Tove, d1914-2001 1s aJanssonov,̀ Tove, d1914-2001 uJansson, Tove, d1914-2001 1s aJansone, Tuve, d1914-2001 uJansson, Tove, d1914-2001 1s aJanson, Tuve, d1914-2001 uJansson, Tove, d1914-2001 1s aJansson, Tuve, d1914-2001 uJansson, Tove, d1914-2001 1s aJanssonova, Tove, d1914-2001 uJansson, Tove, d1914-2001 2 aHcd,u bSkn̲litteratur 20050204111518.0 PK ! W) ) tests/marc_019.phptnu [ --TEST--
marc_019: generate a MARCXML record not in a collection element
--SKIPIF--
--FILE--
next();
// Change each 852 $c to "Audio-Visual"
$holdings = $record->getFields('852');
foreach ($holdings as $holding) {
// Get the $c subfields from this field
$formats = $holding->getSubfields('c');
foreach ($formats as $format) {
if ($format->getData('AV')) {
$format->setData('Audio-Visual');
}
}
}
// Generate the XML output for this record
print($record->toXML('UTF-8', true, true));
--EXPECT--
01145ncm 2200277 i 4500
000073594
AAJ5802
20030415102100.0
801107s1977 nyujza
77771106
(CaOTUIC)15460184
AAJ5802
LC
M1366
.M62
M1527.2
The Modern Jazz Quartet :
The legendary profile. --
New York :
M.J.Q. Music,
c1977.
score (72 p.) ;
31 cm.
For piano, vibraphone, drums, and double bass.
Lewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
Jazz.
Motion picture music
Excerpts
Scores.
Lewis, John,
1920-
Selections.
1977.
Jackson, Milt.
Martyrs.
1977.
Jackson, Milt.
Legendary profile.
1977.
The legendary profile.
MUSIC
Audio-Visual
folio
M1366
M62
1
Marvin Duchow Music
PK ! 泮 tests/music.mrcnu [ 01145ncm 2200277 i 4500001001000000004000800010005001700018008004100035010001700076035002200093035001200115040000700127050002500134245005700159260003800216300002800254500005100282505026600333650001000599650004400609700004400653700003600697700004600733740002700779852006100806 000073594 AAJ5802 20030415102100.0 801107s1977 nyujza a 77771106 a(CaOTUIC)15460184 9 aAAJ5802 aLC 00 aM1366 b.M62 dM1527.2 04 aThe Modern Jazz Quartet : bThe legendary profile. -- aNew York : bM.J.Q. Music, cc1977. ascore (72 p.) ; c31 cm. aFor piano, vibraphone, drums, and double bass. 0 aLewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile. 0 aJazz. 0 aMotion picture music vExcerpts vScores. 12 aLewis, John, d1920- tSelections. f1977. 12 aJackson, Milt. tMartyrs. f1977. 12 aJackson, Milt. tLegendary profile. f1977. 4 aThe legendary profile. 00 bMUSIC cMAIN kfolio hM1366 iM62 91 4Marvin Duchow Music 5
01293cjm 2200289 a 4500001001000000005001700010007001500027008004100042024001500083028002400098035002000122040001800142100002600160245006200186260008500248300005100333511013800384500003600522518005800558500005900616500007000675505014200745650002100887700002400908710002500932740004600957 001878039 20050110174900.0 sd fungnn|||e| 940202r19931981nyujzn i d 1 a7464573372 02 aJK 57337 bRed Baron a(OCoLC)29737267 aSVP cSVP dLGG 1 aDesmond, Paul, d1924- 10 aPaul Desmond & the Modern Jazz Quartet h[sound recording] aNew York, N.Y. : bRed Baron : bManufactured by Sony Music Entertainment, cp1993. a1 sound disc (39 min.) : bdigital ; c4 3/4 in. 0 aPaul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums. aAll arrangements by John Lewis. aRecorded live on December 25, 1971 at Town Hall, NYC. aOriginally released in 1981 by Finesse as LP FW 27487. aProgram notes by Irving Townsend, June 1981, on container insert. 0 aGreensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove. 0 aJazz y1971-1980. 1 aLewis, John, d1920- 2 aModern Jazz Quartet. 0 aPaul Desmond and the Modern Jazz Quartet.
01829cjm 2200385 a 4500001001000000005001700010007001500027008004100042024001500083028002100098033002400119033002300143033002300166033002300189035002000212040002300232048002700255110003000282245005300312260003300365300004100398440001700439511022300456518026400679500001800943500002200961505025000983650001001233700002401243700003301267700003301300700002201333700003001355852005801385 001964482 20060626132700.0 sd fzngnn|m|e| 871211p19871957nyujzn d 1 a4228332902 01 a833 290-2 bVerve 0 a19571027 b6299 cD56 0 a196112-- b3804 cN4 0 a19571019 b4104 cC6 0 a197107-- b6299 cV7 a(OCoLC)17222092 aCPL cCPL dOCL dLGG apz01 aka01 asd01 apd01 2 aModern Jazz Quartet. 4prf 14 aThe Modern Jazz Quartet plus h[sound recording]. a[New York] : bVerve, cp1987. a1 sound disc : bdigital ; c4 3/4 in. 0 aCompact jazz 0 aModern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums. aRecorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work). aCompact disc. aAnalog recording. 0 aThe golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cortège (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20). 0 aJazz. 1 aJackson, Milt. 4prf 1 aPeterson, Oscar, d1925- 4prf 1 aBrown, Ray, d1926-2002. 4prf 1 aThigpen, Ed. 4prf 1 aHayes, Louis, d1937- 4prf 80 bMUSIC cAV hCD 1131 4Marvin Duchow Music 5Audio-Visual
PK ! E4kL tests/marc_001.phptnu [ --TEST--
marc_001: iterate and pretty print a MARC record
--SKIPIF--
--FILE--
next()) {
print $marc_record;
print "\n";
}
?>
--EXPECT--
LDR 01850 2200517 4500
001 0000000044
003 EMILDA
008 980120s1998 fi j 000 0 swe
020 _a9515008808
_cFIM 72:00
035 _99515008808
040 _aNB
042 _9NB
_9SEE
084 _aHcd,u
_2kssb/6
084 _5NB
_auHc
_2kssb
084 _5SEE
_aHcf
_2kssb/6
084 _5Q
_aHcd,uf
_2kssb/6
100 1 _aJansson, Tove,
_d1914-2001
245 04 _aDet osynliga barnet och andra berttelser /
_cTove Jansson
250 _a7. uppl.
260 _aHelsingfors :
_bSchildt,
_c1998 ;
_e(Falun :
_fScandbook)
300 _a166, [4] s. :
_bill. ;
_c21 cm
440 0 _aMumin-biblioteket,
_x99-0698931-9
500 _aOriginaluppl. 1962
599 _aLi: S
740 4 _aDet osynliga barnet
775 1 _z951-50-0385-7
_w9515003857
_907
841 _5Li
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5SEE
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5L
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5NB
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5Q
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5S
_axa
_b0201080u 0 4000uu |000000
_e1
852 _5NB
_bNB
_cNB98:12
_hplikt
_jR, 980520
852 _5Li
_bLi
_cCNB
_hh,u
852 _5SEE
_bSEE
852 _5Q
_bQ
_j98947
852 _5L
_bL
_c0100
_h98/
_j3043 H
852 _5S
_bS
_hSv97
_j7235
900 1s _aYanson, Tobe,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanssonov, Tove,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJansone, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanson, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJansson, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanssonova, Tove,
_d1914-2001
_uJansson, Tove,
_d1914-2001
976 2 _aHcd,u
_bSknlitteratur
005 20050204111518.0
PK ! p̎u1 u1 tests/marc_016.phptnu [ --TEST--
marc_016: generate a single collection of MARCXML records from a MARC record
--SKIPIF--
--FILE--
element
$records->toXMLHeader();
// Iterate through the retrieved records
while ($record = $records->next()) {
// Change each 852 $c to "Audio-Visual"
$holdings = $record->getFields('852');
foreach ($holdings as $holding) {
// Get the $c subfields from this field
$formats = $holding->getSubfields('c');
foreach ($formats as $format) {
if ($format->getData('AV')) {
$format->setData('Audio-Visual');
}
}
}
// Generate the XML output for this record
print $record->toXML('UTF-8', true, false);
}
// Add the closing element and dump the XMLWriter contents
print $records->toXMLFooter();
--EXPECT--
01145ncm 2200277 i 4500
000073594
AAJ5802
20030415102100.0
801107s1977 nyujza
77771106
(CaOTUIC)15460184
AAJ5802
LC
M1366
.M62
M1527.2
The Modern Jazz Quartet :
The legendary profile. --
New York :
M.J.Q. Music,
c1977.
score (72 p.) ;
31 cm.
For piano, vibraphone, drums, and double bass.
Lewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
Jazz.
Motion picture music
Excerpts
Scores.
Lewis, John,
1920-
Selections.
1977.
Jackson, Milt.
Martyrs.
1977.
Jackson, Milt.
Legendary profile.
1977.
The legendary profile.
MUSIC
Audio-Visual
folio
M1366
M62
1
Marvin Duchow Music
01293cjm 2200289 a 4500
001878039
20050110174900.0
sd fungnn|||e|
940202r19931981nyujzn i d
7464573372
JK 57337
Red Baron
(OCoLC)29737267
SVP
SVP
LGG
Desmond, Paul,
1924-
Paul Desmond & the Modern Jazz Quartet
[sound recording]
New York, N.Y. :
Red Baron :
Manufactured by Sony Music Entertainment,
p1993.
1 sound disc (39 min.) :
digital ;
4 3/4 in.
Paul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
All arrangements by John Lewis.
Recorded live on December 25, 1971 at Town Hall, NYC.
Originally released in 1981 by Finesse as LP FW 27487.
Program notes by Irving Townsend, June 1981, on container insert.
Greensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
Jazz
1971-1980.
Lewis, John,
1920-
Modern Jazz Quartet.
Paul Desmond and the Modern Jazz Quartet.
01829cjm 2200385 a 4500
001964482
20060626132700.0
sd fzngnn|m|e|
871211p19871957nyujzn d
4228332902
833 290-2
Verve
19571027
6299
D56
196112--
3804
N4
19571019
4104
C6
197107--
6299
V7
(OCoLC)17222092
CPL
CPL
OCL
LGG
pz01
ka01
sd01
pd01
Modern Jazz Quartet.
prf
The Modern Jazz Quartet plus
[sound recording].
[New York] :
Verve,
p1987.
1 sound disc :
digital ;
4 3/4 in.
Compact jazz
Modern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
Recorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
Compact disc.
Analog recording.
The golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cortège (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
Jazz.
Jackson, Milt.
prf
Peterson, Oscar,
1925-
prf
Brown, Ray,
1926-2002.
prf
Thigpen, Ed.
prf
Hayes, Louis,
1937-
prf
MUSIC
Audio-Visual
CD 1131
Marvin Duchow Music
Audio-Visual
PK ! O~iK! K! tests/marc_013.phptnu [ --TEST--
marc_013: test formatField() convenience method
--SKIPIF--
--FILE--
next()) {
$fields = $marc_record->getFields();
foreach ($fields as $field) {
print $field;
print "\n";
print $field->formatField();
print "\n";
print $field->formatField(array('a', '2', 'c'));
print "\n";
}
}
?>
--EXPECT--
001 000073594
000073594
000073594
004 AAJ5802
AAJ5802
AAJ5802
005 20030415102100.0
20030415102100.0
20030415102100.0
008 801107s1977 nyujza
801107s1977 nyujza
801107s1977 nyujza
010 _a 77771106
77771106
035 _a(CaOTUIC)15460184
(CaOTUIC)15460184
035 9 _aAAJ5802
AAJ5802
040 _aLC
LC
050 00 _aM1366
_b.M62
_dM1527.2
M1366 .M62 M1527.2
.M62 M1527.2
245 04 _aThe Modern Jazz Quartet :
_bThe legendary profile. --
The Modern Jazz Quartet : The legendary profile. --
The legendary profile. --
260 _aNew York :
_bM.J.Q. Music,
_cc1977.
New York : M.J.Q. Music, c1977.
M.J.Q. Music,
300 _ascore (72 p.) ;
_c31 cm.
score (72 p.) ; 31 cm.
500 _aFor piano, vibraphone, drums, and double bass.
For piano, vibraphone, drums, and double bass.
505 0 _aLewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
Lewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
650 0 _aJazz.
Jazz.
650 0 _aMotion picture music
_vExcerpts
_vScores.
Motion picture music -- Excerpts -- Scores.
-- Excerpts -- Scores.
700 12 _aLewis, John,
_d1920-
_tSelections.
_f1977.
Lewis, John, 1920- Selections. 1977.
1920- Selections. 1977.
700 12 _aJackson, Milt.
_tMartyrs.
_f1977.
Jackson, Milt. Martyrs. 1977.
Martyrs. 1977.
700 12 _aJackson, Milt.
_tLegendary profile.
_f1977.
Jackson, Milt. Legendary profile. 1977.
Legendary profile. 1977.
740 4 _aThe legendary profile.
The legendary profile.
852 00 _bMUSIC
_cMAIN
_kfolio
_hM1366
_iM62
_91
_4Marvin Duchow Music
_5
MUSIC MAIN folio M1366 M62 1 Marvin Duchow Music
MUSIC folio M1366 M62 1 Marvin Duchow Music
001 001878039
001878039
001878039
005 20050110174900.0
20050110174900.0
20050110174900.0
007 sd fungnn|||e|
sd fungnn|||e|
sd fungnn|||e|
008 940202r19931981nyujzn i d
940202r19931981nyujzn i d
940202r19931981nyujzn i d
024 1 _a7464573372
7464573372
028 02 _aJK 57337
_bRed Baron
JK 57337 Red Baron
Red Baron
035 _a(OCoLC)29737267
(OCoLC)29737267
040 _aSVP
_cSVP
_dLGG
SVP SVP LGG
LGG
100 1 _aDesmond, Paul,
_d1924-
Desmond, Paul, 1924-
1924-
245 10 _aPaul Desmond & the Modern Jazz Quartet
_h[sound recording]
Paul Desmond & the Modern Jazz Quartet [sound recording]
[sound recording]
260 _aNew York, N.Y. :
_bRed Baron :
_bManufactured by Sony Music Entertainment,
_cp1993.
New York, N.Y. : Red Baron : Manufactured by Sony Music Entertainment, p1993.
Red Baron : Manufactured by Sony Music Entertainment,
300 _a1 sound disc (39 min.) :
_bdigital ;
_c4 3/4 in.
1 sound disc (39 min.) : digital ; 4 3/4 in.
digital ;
511 0 _aPaul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
Paul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
500 _aAll arrangements by John Lewis.
All arrangements by John Lewis.
518 _aRecorded live on December 25, 1971 at Town Hall, NYC.
Recorded live on December 25, 1971 at Town Hall, NYC.
500 _aOriginally released in 1981 by Finesse as LP FW 27487.
Originally released in 1981 by Finesse as LP FW 27487.
500 _aProgram notes by Irving Townsend, June 1981, on container insert.
Program notes by Irving Townsend, June 1981, on container insert.
505 0 _aGreensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
Greensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
650 0 _aJazz
_y1971-1980.
Jazz -- 1971-1980.
-- 1971-1980.
700 1 _aLewis, John,
_d1920-
Lewis, John, 1920-
1920-
710 2 _aModern Jazz Quartet.
Modern Jazz Quartet.
740 0 _aPaul Desmond and the Modern Jazz Quartet.
Paul Desmond and the Modern Jazz Quartet.
001 001964482
001964482
001964482
005 20060626132700.0
20060626132700.0
20060626132700.0
007 sd fzngnn|m|e|
sd fzngnn|m|e|
sd fzngnn|m|e|
008 871211p19871957nyujzn d
871211p19871957nyujzn d
871211p19871957nyujzn d
024 1 _a4228332902
4228332902
028 01 _a833 290-2
_bVerve
833 290-2 Verve
Verve
033 0 _a19571027
_b6299
_cD56
19571027 6299 D56
6299
033 0 _a196112--
_b3804
_cN4
196112-- 3804 N4
3804
033 0 _a19571019
_b4104
_cC6
19571019 4104 C6
4104
033 0 _a197107--
_b6299
_cV7
197107-- 6299 V7
6299
035 _a(OCoLC)17222092
(OCoLC)17222092
040 _aCPL
_cCPL
_dOCL
_dLGG
CPL CPL OCL LGG
OCL LGG
048 _apz01
_aka01
_asd01
_apd01
pz01 ka01 sd01 pd01
110 2 _aModern Jazz Quartet.
_4prf
Modern Jazz Quartet. prf
prf
245 14 _aThe Modern Jazz Quartet plus
_h[sound recording].
The Modern Jazz Quartet plus [sound recording].
[sound recording].
260 _a[New York] :
_bVerve,
_cp1987.
[New York] : Verve, p1987.
Verve,
300 _a1 sound disc :
_bdigital ;
_c4 3/4 in.
1 sound disc : digital ; 4 3/4 in.
digital ;
440 0 _aCompact jazz
Compact jazz
511 0 _aModern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
Modern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
518 _aRecorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
Recorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
500 _aCompact disc.
Compact disc.
500 _aAnalog recording.
Analog recording.
505 0 _aThe golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cortège (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
The golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cortège (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
650 0 _aJazz.
Jazz.
700 1 _aJackson, Milt.
_4prf
Jackson, Milt. prf
prf
700 1 _aPeterson, Oscar,
_d1925-
_4prf
Peterson, Oscar, 1925- prf
1925- prf
700 1 _aBrown, Ray,
_d1926-2002.
_4prf
Brown, Ray, 1926-2002. prf
1926-2002. prf
700 1 _aThigpen, Ed.
_4prf
Thigpen, Ed. prf
prf
700 1 _aHayes, Louis,
_d1937-
_4prf
Hayes, Louis, 1937- prf
1937- prf
852 80 _bMUSIC
_cAV
_hCD 1131
_4Marvin Duchow Music
_5Audio-Visual
MUSIC AV CD 1131 Marvin Duchow Music Audio-Visual
MUSIC CD 1131 Marvin Duchow Music Audio-Visual
PK ! e
tests/marc_011.phptnu [ --TEST--
marc_011: iterate and pretty print a MARC record (SOURCE_STRING)
--SKIPIF--
--FILE--
next()) {
print $marc_record;
print "\n";
}
?>
--EXPECT--
LDR 01850 2200517 4500
001 0000000044
003 EMILDA
008 980120s1998 fi j 000 0 swe
020 _a9515008808
_cFIM 72:00
035 _99515008808
040 _aNB
042 _9NB
_9SEE
084 _aHcd,u
_2kssb/6
084 _5NB
_auHc
_2kssb
084 _5SEE
_aHcf
_2kssb/6
084 _5Q
_aHcd,uf
_2kssb/6
100 1 _aJansson, Tove,
_d1914-2001
245 04 _aDet osynliga barnet och andra berttelser /
_cTove Jansson
250 _a7. uppl.
260 _aHelsingfors :
_bSchildt,
_c1998 ;
_e(Falun :
_fScandbook)
300 _a166, [4] s. :
_bill. ;
_c21 cm
440 0 _aMumin-biblioteket,
_x99-0698931-9
500 _aOriginaluppl. 1962
599 _aLi: S
740 4 _aDet osynliga barnet
775 1 _z951-50-0385-7
_w9515003857
_907
841 _5Li
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5SEE
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5L
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5NB
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5Q
_axa
_b0201080u 0 4000uu |000000
_e1
841 _5S
_axa
_b0201080u 0 4000uu |000000
_e1
852 _5NB
_bNB
_cNB98:12
_hplikt
_jR, 980520
852 _5Li
_bLi
_cCNB
_hh,u
852 _5SEE
_bSEE
852 _5Q
_bQ
_j98947
852 _5L
_bL
_c0100
_h98/
_j3043 H
852 _5S
_bS
_hSv97
_j7235
900 1s _aYanson, Tobe,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanssonov, Tove,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJansone, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanson, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJansson, Tuve,
_d1914-2001
_uJansson, Tove,
_d1914-2001
900 1s _aJanssonova, Tove,
_d1914-2001
_uJansson, Tove,
_d1914-2001
976 2 _aHcd,u
_bSknlitteratur
005 20050204111518.0
PK ! > tests/marc_xml_003.phptnu [ --TEST--
marc_xml_003: Round-trip a MARCXML record to MARC21 (LOC standard)
--SKIPIF--
--FILE--
next()) {
print $marc_record->toRaw();
}
?>
--EXPECT--
01142cam 2200301 a 4500001001300000003000400013005001700017008004100034010001700075020002500092040001800117042000900135050002600144082001600170100003200186245008600218250001200304260005200316300004900368500004000417520022800457650003300685650003300718650002400751650002100775650002300796700002100819 92005291 DLC 19930521155141.9 920219s1993 caua j 000 0 eng a 92005291 a0152038655 : c$15.95 aDLC cDLC dDLC alcac 00 aPS3537.A618 bA88 1993 00 a811/.52 220 1 aSandburg, Carl, d1878-1967. 10 aArithmetic / cCarl Sandburg ; illustrated as an anamorphic adventure by Ted Rand. a1st ed. aSan Diego : bHarcourt Brace Jovanovich, cc1993. a1 v. (unpaged) : bill. (some col.) ; c26 cm. aOne Mylar sheet included in pocket. aA poem about numbers and their characteristics. Features anamorphic, or distorted, drawings which can be restored to normal by viewing from a particular angle or by viewing the image's reflection in the provided Mylar cone. 0 aArithmetic xJuvenile poetry. 0 aChildren's poetry, American. 1 aArithmetic xPoetry. 1 aAmerican poetry. 1 aVisual perception. 1 aRand, Ted, eill.
PK ! N& & tests/marc_xml_002.phptnu [ --TEST--
marc_xml_002: iterate and pretty print a MARC record (LOC standard)
--SKIPIF--
--FILE--
next()) {
print $marc_record->toXML();
print "\n";
}
?>
--EXPECT--
01142cam 2200301 a 4500
92005291
DLC
19930521155141.9
920219s1993 caua j 000 0 eng
92005291
0152038655 :
$15.95
DLC
DLC
DLC
lcac
PS3537.A618
A88 1993
811/.52
20
Sandburg, Carl,
1878-1967.
Arithmetic /
Carl Sandburg ; illustrated as an anamorphic adventure by Ted Rand.
1st ed.
San Diego :
Harcourt Brace Jovanovich,
c1993.
1 v. (unpaged) :
ill. (some col.) ;
26 cm.
One Mylar sheet included in pocket.
A poem about numbers and their characteristics. Features anamorphic, or distorted, drawings which can be restored to normal by viewing from a particular angle or by viewing the image's reflection in the provided Mylar cone.
Arithmetic
Juvenile poetry.
Children's poetry, American.
Arithmetic
Poetry.
American poetry.
Visual perception.
Rand, Ted,
ill.
PK ! y
tests/marc_lint_003.phptnu [ --TEST--
marc_lint_003: Tests for field 880 and for subfield 6
--SKIPIF--
--FILE--
setLeader("00000nam 22002538a 4500");
$rec->appendField(
new File_MARC_Control_Field(
'001', 'ttt07000001 '
)
);
$rec->appendField(
new File_MARC_Control_Field(
'003', 'TEST '
)
);
$rec->appendField(
new File_MARC_Control_Field(
'008', '070520s2007 ilu 000 0 eng d'
)
);
$rec->appendField(
new File_MARC_Data_Field(
'040',
array(
new File_MARC_Subfield('a', 'TEST'),
new File_MARC_Subfield('c', 'TEST')
),
"", ""
)
);
$rec->appendField(
new File_MARC_Data_Field(
'050',
array(
new File_MARC_Subfield('a', 'RZ999'),
new File_MARC_Subfield('b', '.J66 2007')
),
"", "4"
)
);
$rec->appendField(
new File_MARC_Data_Field(
'082',
array(
new File_MARC_Subfield('a', '615.8/9'),
new File_MARC_Subfield('2', '22')
),
"0", "4"
)
);
$rec->appendField(
new File_MARC_Data_Field(
'100',
array(
new File_MARC_Subfield('a', 'Jones, John')
),
"1", ""
)
);
$rec->appendField(
new File_MARC_Data_Field(
'245',
array(
new File_MARC_Subfield('6', '880-02'),
new File_MARC_Subfield('a', 'Test 880.')
),
"1", "0"
)
);
$rec->appendField(
new File_MARC_Data_Field(
'260',
array(
new File_MARC_Subfield('a', 'Mount Morris, Ill. :'),
new File_MARC_Subfield('b', "B. Baldus,"),
new File_MARC_Subfield('c', '2007.')
),
"", ""
)
);
$rec->appendField(
new File_MARC_Data_Field(
'300',
array(
new File_MARC_Subfield('a', '1 v. ;'),
new File_MARC_Subfield('c', '23 cm.')
),
"", ""
)
);
$rec->appendField(
new File_MARC_Data_Field(
'880',
array(
new File_MARC_Subfield('6', '245-02/$1'),
new File_MARC_Subfield('a', '.')
),
"1", "0"
)
);
$rec->appendField(
new File_MARC_Data_Field(
'880',
array(
new File_MARC_Subfield('6', '245-02/$1'),
new File_MARC_Subfield('a', 'Illegal duplicate field.')
),
"1", "0"
)
);
$warnings = $marc_lint->checkRecord($rec);
foreach ($warnings as $warning) {
print $warning . "\n";
}
?>
--EXPECT--
245: Field is not repeatable.
PK ! a! tests/namespace.xmlnu [ <?xml version="1.0" encoding="UTF-8"?>
<!-- edited with XML Spy v4.3 U (http://www.xmlspy.com) by Morgan Cundiff (Library of Congress) -->
<marc:collection xmlns:marc="http://www.loc.gov/MARC21/slim" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.loc.gov/MARC21/slim http://www.loc.gov/standards/marcxml/schema/MARC21slim.xsd">
<marc:record>
<marc:leader>00925njm 22002777a 4500</marc:leader>
<marc:controlfield tag="001">5637241</marc:controlfield>
<marc:controlfield tag="003">DLC</marc:controlfield>
<marc:controlfield tag="005">19920826084036.0</marc:controlfield>
<marc:controlfield tag="007">sdubumennmplu</marc:controlfield>
<marc:controlfield tag="008">910926s1957 nyuuun eng </marc:controlfield>
<marc:datafield tag="010" ind1=" " ind2=" ">
<marc:subfield code="a"> 91758335 </marc:subfield>
</marc:datafield>
<marc:datafield tag="028" ind1="0" ind2="0">
<marc:subfield code="a">1259</marc:subfield>
<marc:subfield code="b">Atlantic</marc:subfield>
</marc:datafield>
<marc:datafield tag="040" ind1=" " ind2=" ">
<marc:subfield code="a">DLC</marc:subfield>
<marc:subfield code="c">DLC</marc:subfield>
</marc:datafield>
<marc:datafield tag="050" ind1="0" ind2="0">
<marc:subfield code="a">Atlantic 1259</marc:subfield>
</marc:datafield>
<marc:datafield tag="245" ind1="0" ind2="4">
<marc:subfield code="a">The Great Ray Charles</marc:subfield>
<marc:subfield code="h">[sound recording].</marc:subfield>
</marc:datafield>
<marc:datafield tag="260" ind1=" " ind2=" ">
<marc:subfield code="a">New York, N.Y. :</marc:subfield>
<marc:subfield code="b">Atlantic,</marc:subfield>
<marc:subfield code="c">[1957?]</marc:subfield>
</marc:datafield>
<marc:datafield tag="300" ind1=" " ind2=" ">
<marc:subfield code="a">1 sound disc :</marc:subfield>
<marc:subfield code="b">analog, 33 1/3 rpm ;</marc:subfield>
<marc:subfield code="c">12 in.</marc:subfield>
</marc:datafield>
<marc:datafield tag="511" ind1="0" ind2=" ">
<marc:subfield code="a">Ray Charles, piano & celeste.</marc:subfield>
</marc:datafield>
<marc:datafield tag="505" ind1="0" ind2=" ">
<marc:subfield code="a">The Ray -- My melancholy baby -- Black coffee -- There's no you -- Doodlin' -- Sweet sixteen bars -- I surrender dear -- Undecided.</marc:subfield>
</marc:datafield>
<marc:datafield tag="500" ind1=" " ind2=" ">
<marc:subfield code="a">Brief record.</marc:subfield>
</marc:datafield>
<marc:datafield tag="650" ind1=" " ind2="0">
<marc:subfield code="a">Jazz</marc:subfield>
<marc:subfield code="y">1951-1960.</marc:subfield>
</marc:datafield>
<marc:datafield tag="650" ind1=" " ind2="0">
<marc:subfield code="a">Piano with jazz ensemble.</marc:subfield>
</marc:datafield>
<marc:datafield tag="700" ind1="1" ind2=" ">
<marc:subfield code="a">Charles, Ray,</marc:subfield>
<marc:subfield code="d">1930-</marc:subfield>
<marc:subfield code="4">prf</marc:subfield>
</marc:datafield>
</marc:record>
<marc:record>
<marc:leader>01832cmma 2200349 a 4500</marc:leader>
<marc:controlfield tag="001">12149120</marc:controlfield>
<marc:controlfield tag="005">20001005175443.0</marc:controlfield>
<marc:controlfield tag="007">cr |||</marc:controlfield>
<marc:controlfield tag="008">000407m19949999dcu g m eng d</marc:controlfield>
<marc:datafield tag="906" ind1=" " ind2=" ">
<marc:subfield code="a">0</marc:subfield>
<marc:subfield code="b">ibc</marc:subfield>
<marc:subfield code="c">copycat</marc:subfield>
<marc:subfield code="d">1</marc:subfield>
<marc:subfield code="e">ncip</marc:subfield>
<marc:subfield code="f">20</marc:subfield>
<marc:subfield code="g">y-gencompf</marc:subfield>
</marc:datafield>
<marc:datafield tag="925" ind1="0" ind2=" ">
<marc:subfield code="a">undetermined</marc:subfield>
<marc:subfield code="x">web preservation project (wpp)</marc:subfield>
</marc:datafield>
<marc:datafield tag="955" ind1=" " ind2=" ">
<marc:subfield code="a">vb07 (stars done) 08-19-00 to HLCD lk00; AA3s lk29 received for subject Aug 25, 2000; to DEWEY 08-25-00; aa11 08-28-00</marc:subfield>
</marc:datafield>
<marc:datafield tag="010" ind1=" " ind2=" ">
<marc:subfield code="a"> 00530046 </marc:subfield>
</marc:datafield>
<marc:datafield tag="035" ind1=" " ind2=" ">
<marc:subfield code="a">(OCoLC)ocm44279786</marc:subfield>
</marc:datafield>
<marc:datafield tag="040" ind1=" " ind2=" ">
<marc:subfield code="a">IEU</marc:subfield>
<marc:subfield code="c">IEU</marc:subfield>
<marc:subfield code="d">N@F</marc:subfield>
<marc:subfield code="d">DLC</marc:subfield>
</marc:datafield>
<marc:datafield tag="042" ind1=" " ind2=" ">
<marc:subfield code="a">lccopycat</marc:subfield>
</marc:datafield>
<marc:datafield tag="043" ind1=" " ind2=" ">
<marc:subfield code="a">n-us-dc</marc:subfield>
<marc:subfield code="a">n-us---</marc:subfield>
</marc:datafield>
<marc:datafield tag="050" ind1="0" ind2="0">
<marc:subfield code="a">F204.W5</marc:subfield>
</marc:datafield>
<marc:datafield tag="082" ind1="1" ind2="0">
<marc:subfield code="a">975.3</marc:subfield>
<marc:subfield code="2">13</marc:subfield>
</marc:datafield>
<marc:datafield tag="245" ind1="0" ind2="4">
<marc:subfield code="a">The White House</marc:subfield>
<marc:subfield code="h">[computer file].</marc:subfield>
</marc:datafield>
<marc:datafield tag="256" ind1=" " ind2=" ">
<marc:subfield code="a">Computer data.</marc:subfield>
</marc:datafield>
<marc:datafield tag="260" ind1=" " ind2=" ">
<marc:subfield code="a">Washington, D.C. :</marc:subfield>
<marc:subfield code="b">White House Web Team,</marc:subfield>
<marc:subfield code="c">1994-</marc:subfield>
</marc:datafield>
<marc:datafield tag="538" ind1=" " ind2=" ">
<marc:subfield code="a">Mode of access: Internet.</marc:subfield>
</marc:datafield>
<marc:datafield tag="500" ind1=" " ind2=" ">
<marc:subfield code="a">Title from home page as viewed on Aug. 19, 2000.</marc:subfield>
</marc:datafield>
<marc:datafield tag="520" ind1="8" ind2=" ">
<marc:subfield code="a">Features the White House. Highlights the Executive Office of the President, which includes senior policy advisors and offices responsible for the President's correspondence and communications, the Office of the Vice President, and the Office of the First Lady. Posts contact information via mailing address, telephone and fax numbers, and e-mail. Contains the Interactive Citizens' Handbook with information on health, travel and tourism, education and training, and housing. Provides a tour and the history of the White House. Links to White House for Kids.</marc:subfield>
</marc:datafield>
<marc:datafield tag="610" ind1="2" ind2="0">
<marc:subfield code="a">White House (Washington, D.C.)</marc:subfield>
</marc:datafield>
<marc:datafield tag="610" ind1="1" ind2="0">
<marc:subfield code="a">United States.</marc:subfield>
<marc:subfield code="b">Executive Office of the President.</marc:subfield>
</marc:datafield>
<marc:datafield tag="610" ind1="1" ind2="0">
<marc:subfield code="a">United States.</marc:subfield>
<marc:subfield code="b">Office of the Vice President.</marc:subfield>
</marc:datafield>
<marc:datafield tag="610" ind1="1" ind2="0">
<marc:subfield code="a">United States.</marc:subfield>
<marc:subfield code="b">Office of the First Lady.</marc:subfield>
</marc:datafield>
<marc:datafield tag="710" ind1="2" ind2=" ">
<marc:subfield code="a">White House Web Team.</marc:subfield>
</marc:datafield>
<marc:datafield tag="856" ind1="4" ind2="0">
<marc:subfield code="u">http://www.whitehouse.gov</marc:subfield>
</marc:datafield>
<marc:datafield tag="856" ind1="4" ind2="0">
<marc:subfield code="u">http://lcweb.loc.gov/staff/wpp/whitehouse.html</marc:subfield>
<marc:subfield code="z">Web site archive</marc:subfield>
</marc:datafield>
</marc:record>
</marc:collection>PK ! è { { tests/marc_020.phptnu [ --TEST--
marc_020: Test MARC binary output
--SKIPIF--
<?php include('tests/skipif.inc'); ?>
--FILE--
<?php
$dir = dirname(__FILE__);
require __DIR__ . '/bootstrap.php';
// Get ourselves a MARC record
$marc_file = new File_MARC($dir . '/' . 'example.mrc');
$marc_record = $marc_file->next();
// create some subfields
$subfields[] = new File_MARC_Subfield('a', 'nothing');
$subfields[] = new File_MARC_Subfield('z', 'everything');
// create a data field
$data_field = new File_MARC_Data_Field('100', $subfields, '0');
// append the data field
$marc_record->appendField($data_field);
// create a control field
$ctrl_field = new File_MARC_Control_Field('001', '01234567890');
// prepend the control field
$marc_record->prependField($ctrl_field);
// reproduce test case reported by Mark Jordan
$subfields_966_2[] = new File_MARC_Subfield('l', 'web');
$subfields_966_2[] = new File_MARC_Subfield('r', '0');
$subfields_966_2[] = new File_MARC_Subfield('s', 'b');
$subfields_966_2[] = new File_MARC_Subfield('i', '49');
$subfields_966_2[] = new File_MARC_Subfield('c', '1');
$field_966_2 = new File_MARC_Data_Field('966', $subfields_966_2, null, null);
$marc_record->appendField($field_966_2);
// let's see the results
print convert_uuencode($marc_record->toRaw());
?>
--EXPECT--
M,#$Y-#,@("`@(#(R,#`U-3,@("`T-3`P,#`Q,#`Q,C`P,#`P,#`Q,#`Q,3`P
M,#$R,#`S,#`P-S`P,#(S,#`X,#`S.3`P,#,P,#(P,#`R-C`P,#8Y,#,U,#`Q
M-3`P,#DU,#0P,#`P-S`P,3$P,#0R,#`Q,C`P,3$W,#@T,#`Q.#`P,3(Y,#@T
M,#`Q.#`P,30W,#@T,#`R,3`P,38U,#@T,#`R,C`P,3@V,3`P,#`S,#`P,C`X
M,C0U,#`V,C`P,C,X,C4P,#`Q,S`P,S`P,C8P,#`U.#`P,S$S,S`P,#`S,S`P
M,S<Q-#0P,#`S-S`P-#`T-3`P,#`R,S`P-#0Q-3DY,#`Q,#`P-#8T-S0P,#`R
M-#`P-#<T-S<U,#`S-#`P-#DX.#0Q,#`T.#`P-3,R.#0Q,#`T.3`P-3@P.#0Q
M,#`T-S`P-C(Y.#0Q,#`T.#`P-C<V.#0Q,#`T-S`P-S(T.#0Q,#`T-S`P-S<Q
M.#4R,#`S.#`P.#$X.#4R,#`R,3`P.#4V.#4R,#`Q,S`P.#<W.#4R,#`Q-C`P
M.#DP.#4R,#`R.#`P.3`V.#4R,#`R,3`P.3,T.3`P,#`U-C`P.34U.3`P,#`V
M,#`Q,#$Q.3`P,#`U-S`Q,#<Q.3`P,#`U-C`Q,3(X.3`P,#`U-S`Q,3@T.3`P
M,#`V,#`Q,C0Q.3<V,#`R-C`Q,S`Q,#`U,#`Q-S`Q,S(W,3`P,#`R-#`Q,S0T
M.38V,#`R,3`Q,S8X'C`Q,C,T-38W.#DP'C`P,#`P,#`P-#0>14U)3$1!'CDX
M,#$R,',Q.3DX("`@(&9I("`@("!J("`@("`@,#`P(#`@<W=E'B`@'V$Y-3$U
M,#`X.#`X'V-&24T@-S(Z,#`>("`?.3DU,34P,#@X,#@>("`?84Y"'B`@'SE.
M0A\Y4T5%'B`@'V%(8V0L=1\R:W-S8B\V'B`@'S5.0A]A=4AC'S)K<W-B'B`@
M'S53144?84AC9A\R:W-S8B\V'B`@'S51'V%(8V0L=68?,FMS<V(O-AXQ(!]A
M2F%N<W-O;BP@5&]V92P?9#$Y,30M,C`P,1XP-!]A1&5T(&]S>6YL:6=A(&)A
M<FYE="!O8V@@86YD<F$@8F5RY'1T96QS97(@+Q]C5&]V92!*86YS<V]N'B`@
M'V$W+B!U<'!L+AX@(!]A2&5L<VEN9V9O<G,@.A]B4V-H:6QD="P?8S$Y.3@@
M.Q]E*$9A;'5N(#H?9E-C86YD8F]O:RD>("`?83$V-BP@6S1=(',N(#H?8FEL
M;"X@.Q]C,C$@8VT>(#`?84UU;6EN+6)I8FQI;W1E:V5T+!]X.3DM,#8Y.#DS
M,2TY'B`@'V%/<FEG:6YA;'5P<&PN(#$Y-C(>("`?84QI.B!3'C0@'V%$970@
M;W-Y;FQI9V$@8F%R;F5T'C$@'WHY-3$M-3`M,#,X-2TW'W<Y-3$U,#`S.#4W
M'SDP-QX@(!\U3&D?87AA'V(P,C`Q,#@P=2`@("`P("`@-#`P,'5U("`@?#`P
M,#`P,!]E,1X@(!\U4T5%'V%X81]B,#(P,3`X,'4@("`@,"`@(#0P,#!U=2`@
M('PP,#`P,#`?93$>("`?-4P?87AA'V(P,C`Q,#@P=2`@("`P("`@-#`P,'5U
M("`@?#`P,#`P,!]E,1X@(!\U3D(?87AA'V(P,C`Q,#@P=2`@("`P("`@-#`P
M,'5U("`@?#`P,#`P,!]E,1X@(!\U41]A>&$?8C`R,#$P.#!U("`@(#`@("`T
M,#`P=74@("!\,#`P,#`P'V4Q'B`@'S53'V%X81]B,#(P,3`X,'4@("`@,"`@
M(#0P,#!U=2`@('PP,#`P,#`?93$>("`?-4Y"'V).0A]C3D(Y.#HQ,A]H<&QI
M:W0?:E(L(#DX,#4R,!X@(!\U3&D?8DQI'V-#3D(?:&@L=1X@(!\U4T5%'V)3
M144>("`?-5$?8E$?:CDX.30W'B`@'S5,'V),'V,P,3`P'V@Y."\?:C,P-#,@
M2!X@(!\U4Q]B4Q]H4W8Y-Q]J-S(S-1XQ<Q]A66%N<V]N+"!4;V)E+!]D,3DQ
M-"TR,#`Q'W5*86YS<V]N+"!4;W9E+!]D,3DQ-"TR,#`Q'C%S'V%*86YS<V]N
M;W;A+"!4;W9E+!]D,3DQ-"TR,#`Q'W5*86YS<V]N+"!4;W9E+!]D,3DQ-"TR
M,#`Q'C%S'V%*86YS;VYE+"!4=79E+!]D,3DQ-"TR,#`Q'W5*86YS<V]N+"!4
M;W9E+!]D,3DQ-"TR,#`Q'C%S'V%*86YS;VXL(%1U=F4L'V0Q.3$T+3(P,#$?
M=4IA;G-S;VXL(%1O=F4L'V0Q.3$T+3(P,#$>,7,?84IA;G-S;VXL(%1U=F4L
M'V0Q.3$T+3(P,#$?=4IA;G-S;VXL(%1O=F4L'V0Q.3$T+3(P,#$>,7,?84IA
M;G-S;VYO=F$L(%1O=F4L'V0Q.3$T+3(P,#$?=4IA;G-S;VXL(%1O=F4L'V0Q
M.3$T+3(P,#$>(#(?84AC9"QU'V)3:_9N;&ET=&5R871U<AXR,#`U,#(P-#$Q
M,34Q."XP'C`@'V%N;W1H:6YG'WIE=F5R>71H:6YG'B`@'VQW96(?<C`?<V(?
(:30Y'V,Q'AT`
`
PK !
tests/marc_field_005.phptnu [ --TEST--
marc_field_005: Test method getContents
--SKIPIF--
<?php include('tests/skipif.inc'); ?>
--FILE--
<?php
$dir = dirname(__FILE__);
require __DIR__ . '/bootstrap.php';
// create some subfields
$subfields[] = new File_MARC_Subfield('a', 'nothing');
$subfields[] = new File_MARC_Subfield('z', 'everything');
// create a field
$field = new File_MARC_Data_Field('100', $subfields, '0');
// create some new subfields
$subfield1 = new File_MARC_Subfield('g', 'a little');
// test the fieldpost corner case by inserting prior to the first subfield
$sf = $field->getSubfields('a');
// we might get an array back; in this case, we want the first subfield
if (is_array($sf)) {
$field->insertSubfield($subfield1, $sf[0], true);
}
else {
$field->insertSubfield($subfield1, $sf, true);
}
// let's see the results
print $field->getContents();
print "\n";
print $field->getContents('###');
print "\n";
?>
--EXPECT--
a littlenothingeverything
a little###nothing###everything
PK ! VU, , tests/marc_field_21246.phptnu [ --TEST--
marc_field_21246: Delete multiple subfields
--SKIPIF--
<?php include('tests/skipif.inc'); ?>
--FILE--
<?php
$dir = dirname(__FILE__);
require __DIR__ . '/bootstrap.php';
$field = new File_MARC_Data_Field(650, [
new File_MARC_Subfield('9', 'test1'),
new File_MARC_Subfield('9', 'test2'),
new File_MARC_Subfield('0', 'test3'),
new File_MARC_Subfield('9', 'test4'),
]
);
echo "--- Before: ---\n$field\n\n";
foreach ($field->getSubfields('9') as $subfield) {
echo "Deleting subfield: $subfield\n";
$field->deleteSubfield($subfield);
}
echo "\n--- After: ---\n$field\n\n";
?>
--EXPECT--
--- Before: ---
650 _9test1
_9test2
_0test3
_9test4
Deleting subfield: [9]: test1
Deleting subfield: [9]: test2
Deleting subfield: [9]: test4
--- After: ---
650 _0test3
PK ! s} $ tests/marc_xml_namespace_prefix.phptnu [ --TEST--
marc_xml_namespace: iterate and pretty print a MARC record
--SKIPIF--
<?php include('tests/skipif.inc'); ?>
--FILE--
<?php
$dir = dirname(__FILE__);
require __DIR__ . '/bootstrap.php';
$marc_file = new File_MARCXML($dir . '/' . 'namespace.xml',File_MARC::SOURCE_FILE,"marc",true);
while ($marc_record = $marc_file->next()) {
print $marc_record->getLeader();
print "\n";
$field = $marc_record->getField('050');
print $field->getIndicator(1);
print "\n";
print $field->getIndicator(2);
print "\n";
$subfield = $field->getSubfield('a');
print $subfield->getData();
print "\n";
}
?>
--EXPECT--
00925njm 22002777a 4500
0
0
Atlantic 1259
01832cmma 2200349 a 4500
0
0
F204.W5
PK ! tests/marc_xml_namespace.phptnu [ --TEST--
marc_xml_namespace: iterate and pretty print a MARC record
--SKIPIF--
<?php include('tests/skipif.inc'); ?>
--FILE--
<?php
$dir = dirname(__FILE__);
require __DIR__ . '/bootstrap.php';
$marc_file = new File_MARCXML($dir . '/' . 'namespace.xml',File_MARC::SOURCE_FILE,"http://www.loc.gov/MARC21/slim");
while ($marc_record = $marc_file->next()) {
print $marc_record->getLeader();
print "\n";
$field = $marc_record->getField('050');
print $field->getIndicator(1);
print "\n";
print $field->getIndicator(2);
print "\n";
$subfield = $field->getSubfield('a');
print $subfield->getData();
print "\n";
}
?>
--EXPECT--
00925njm 22002777a 4500
0
0
Atlantic 1259
01832cmma 2200349 a 4500
0
0
F204.W5
PK ! S3 tests/marc_021.phptnu [ --TEST--
marc_021: test MARC-in-JSON serialization with subfield 0
--SKIPIF--
<?php include('tests/skipif.inc'); ?>
--FILE--
<?php
$dir = dirname(__FILE__);
require __DIR__ . '/bootstrap.php';
$marc_file = new File_MARC($dir . '/' . 'example.mrc');
while ($marc_record = $marc_file->next()) {
// create some subfields
$subfields[] = new File_MARC_Subfield('0', 'nothing');
$subfields[] = new File_MARC_Subfield('1', 'everything');
$field = new File_MARC_Data_Field('999', $subfields, '', '');
$marc_record->appendField($field);
$subfields = null;
$field = null;
$subfields[] = new File_MARC_Subfield('a', 'bee');
$subfields[] = new File_MARC_Subfield('0', 'cee');
$subfields[] = new File_MARC_Subfield('d', 'eee');
$field = new File_MARC_Data_Field('999', $subfields, '', '');
$marc_record->appendField($field);
print $marc_record->toJSON();
print "\n";
}
?>
--EXPECT--
{"leader":"01850 2200517 4500","fields":[{"001":"0000000044"},{"003":"EMILDA"},{"008":"980120s1998 fi j 000 0 swe"},{"020":{"ind1":" ","ind2":" ","subfields":[{"a":"9515008808"},{"c":"FIM 72:00"}]}},{"035":{"ind1":" ","ind2":" ","subfields":[{"9":"9515008808"}]}},{"040":{"ind1":" ","ind2":" ","subfields":[{"a":"NB"}]}},{"042":{"ind1":" ","ind2":" ","subfields":[{"9":"NB"},{"9":"SEE"}]}},{"084":{"ind1":" ","ind2":" ","subfields":[{"a":"Hcd,u"},{"2":"kssb\/6"}]}},{"084":{"ind1":" ","ind2":" ","subfields":[{"5":"NB"},{"a":"uHc"},{"2":"kssb"}]}},{"084":{"ind1":" ","ind2":" ","subfields":[{"5":"SEE"},{"a":"Hcf"},{"2":"kssb\/6"}]}},{"084":{"ind1":" ","ind2":" ","subfields":[{"5":"Q"},{"a":"Hcd,uf"},{"2":"kssb\/6"}]}},{"100":{"ind1":"1","ind2":" ","subfields":[{"a":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"245":{"ind1":"0","ind2":"4","subfields":[{"a":"Det osynliga barnet och andra ber\u00e4ttelser \/"},{"c":"Tove Jansson"}]}},{"250":{"ind1":" ","ind2":" ","subfields":[{"a":"7. uppl."}]}},{"260":{"ind1":" ","ind2":" ","subfields":[{"a":"Helsingfors :"},{"b":"Schildt,"},{"c":"1998 ;"},{"e":"(Falun :"},{"f":"Scandbook)"}]}},{"300":{"ind1":" ","ind2":" ","subfields":[{"a":"166, [4] s. :"},{"b":"ill. ;"},{"c":"21 cm"}]}},{"440":{"ind1":" ","ind2":"0","subfields":[{"a":"Mumin-biblioteket,"},{"x":"99-0698931-9"}]}},{"500":{"ind1":" ","ind2":" ","subfields":[{"a":"Originaluppl. 1962"}]}},{"599":{"ind1":" ","ind2":" ","subfields":[{"a":"Li: S"}]}},{"740":{"ind1":"4","ind2":" ","subfields":[{"a":"Det osynliga barnet"}]}},{"775":{"ind1":"1","ind2":" ","subfields":[{"z":"951-50-0385-7"},{"w":"9515003857"},{"9":"07"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"Li"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"SEE"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"L"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"NB"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"Q"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"841":{"ind1":" ","ind2":" ","subfields":[{"5":"S"},{"a":"xa"},{"b":"0201080u 0 4000uu |000000"},{"e":"1"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"NB"},{"b":"NB"},{"c":"NB98:12"},{"h":"plikt"},{"j":"R, 980520"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"Li"},{"b":"Li"},{"c":"CNB"},{"h":"h,u"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"SEE"},{"b":"SEE"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"Q"},{"b":"Q"},{"j":"98947"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"L"},{"b":"L"},{"c":"0100"},{"h":"98\/"},{"j":"3043 H"}]}},{"852":{"ind1":" ","ind2":" ","subfields":[{"5":"S"},{"b":"S"},{"h":"Sv97"},{"j":"7235"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Yanson, Tobe,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Janssonov\u00e1, Tove,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Jansone, Tuve,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Janson, Tuve,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Jansson, Tuve,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"900":{"ind1":"1","ind2":"s","subfields":[{"a":"Janssonova, Tove,"},{"d":"1914-2001"},{"u":"Jansson, Tove,"},{"d":"1914-2001"}]}},{"976":{"ind1":" ","ind2":"2","subfields":[{"a":"Hcd,u"},{"b":"Sk\u00f6nlitteratur"}]}},{"005":"20050204111518.0"},{"999":{"ind1":" ","ind2":" ","subfields":[{"0":"nothing"},{"1":"everything"}]}},{"999":{"ind1":" ","ind2":" ","subfields":[{"a":"bee"},{"0":"cee"},{"d":"eee"}]}}]}
PK ! kP tests/marc_023.phptnu [ --TEST--
marc_023: test extended Record interface
--SKIPIF--
<?php include('tests/skipif.inc'); ?>
--FILE--
<?php
$dir = dirname(__FILE__);
require __DIR__ . '/bootstrap.php';
class MyRecord extends File_MARC_Record {
public function myNewMethod() {
return $this->getField('040')->getSubfield('a')->getData();
}
}
$marc_file = new File_MARC($dir . '/' . 'example.mrc', File_MARC::SOURCE_FILE, MyRecord::class);
$rec = $marc_file->next();
print get_class($rec) . "\n";
print $rec->myNewMethod() . "\n";
?>
--EXPECT--
MyRecord
NB
PK ! #"
)
) tests/marc_022.phptnu [ --TEST--
marc_022: Insert fields
--SKIPIF--
<?php include('tests/skipif.inc'); ?>
--FILE--
<?php
$dir = dirname(__FILE__);
require __DIR__ . '/bootstrap.php';
$marc_file = new File_MARC($dir . '/' . 'music.mrc');
print "\nInsert a new 100 field before the first 650\n";
while ($record = $marc_file->next()) {
print "\nNext record:\n";
// Create the new field
$subfields = null;
$subfields[] = new File_MARC_Subfield('a', 'Scott, Daniel.');
$new_field = new File_MARC_Data_Field('100', $subfields, 0, null);
// Retrieve the target field for our insertion point
$subject = $record->getFields('650');
// Insert the new field
if (is_array($subject)) {
$record->insertField($new_field, $subject[0], true);
}
elseif ($subject) {
$record->insertField($new_field, $subject, true);
}
print $record;
}
$record = null;
$marc_file = new File_MARC($dir . '/' . 'music.mrc');
print "\nInsert a new 100 field after the first 650\n";
while ($record = $marc_file->next()) {
print "\nNext record:\n";
// Create the new field
$subfields = null;
$subfields[] = new File_MARC_Subfield('a', 'Scott, Daniel.');
$new_field = new File_MARC_Data_Field('100', $subfields, 0, null);
// Retrieve the target field for our insertion point
$subject = $record->getFields('650');
// Insert the new field
if (is_array($subject)) {
$record->insertField($new_field, $subject[0]);
}
elseif ($subject) {
$record->insertField($new_field, $subject);
}
print $record;
}
?>
--EXPECT--
Insert a new 100 field before the first 650
Next record:
LDR 01145ncm 2200277 i 4500
001 000073594
004 AAJ5802
005 20030415102100.0
008 801107s1977 nyujza
010 _a 77771106
035 _a(CaOTUIC)15460184
035 9 _aAAJ5802
040 _aLC
050 00 _aM1366
_b.M62
_dM1527.2
245 04 _aThe Modern Jazz Quartet :
_bThe legendary profile. --
260 _aNew York :
_bM.J.Q. Music,
_cc1977.
300 _ascore (72 p.) ;
_c31 cm.
500 _aFor piano, vibraphone, drums, and double bass.
505 0 _aLewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
100 _aScott, Daniel.
650 0 _aJazz.
650 0 _aMotion picture music
_vExcerpts
_vScores.
700 12 _aLewis, John,
_d1920-
_tSelections.
_f1977.
700 12 _aJackson, Milt.
_tMartyrs.
_f1977.
700 12 _aJackson, Milt.
_tLegendary profile.
_f1977.
740 4 _aThe legendary profile.
852 00 _bMUSIC
_cMAIN
_kfolio
_hM1366
_iM62
_91
_4Marvin Duchow Music
_5
Next record:
LDR 01293cjm 2200289 a 4500
001 001878039
005 20050110174900.0
007 sd fungnn|||e|
008 940202r19931981nyujzn i d
024 1 _a7464573372
028 02 _aJK 57337
_bRed Baron
035 _a(OCoLC)29737267
040 _aSVP
_cSVP
_dLGG
100 1 _aDesmond, Paul,
_d1924-
245 10 _aPaul Desmond & the Modern Jazz Quartet
_h[sound recording]
260 _aNew York, N.Y. :
_bRed Baron :
_bManufactured by Sony Music Entertainment,
_cp1993.
300 _a1 sound disc (39 min.) :
_bdigital ;
_c4 3/4 in.
511 0 _aPaul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
500 _aAll arrangements by John Lewis.
518 _aRecorded live on December 25, 1971 at Town Hall, NYC.
500 _aOriginally released in 1981 by Finesse as LP FW 27487.
500 _aProgram notes by Irving Townsend, June 1981, on container insert.
505 0 _aGreensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
100 _aScott, Daniel.
650 0 _aJazz
_y1971-1980.
700 1 _aLewis, John,
_d1920-
710 2 _aModern Jazz Quartet.
740 0 _aPaul Desmond and the Modern Jazz Quartet.
Next record:
LDR 01829cjm 2200385 a 4500
001 001964482
005 20060626132700.0
007 sd fzngnn|m|e|
008 871211p19871957nyujzn d
024 1 _a4228332902
028 01 _a833 290-2
_bVerve
033 0 _a19571027
_b6299
_cD56
033 0 _a196112--
_b3804
_cN4
033 0 _a19571019
_b4104
_cC6
033 0 _a197107--
_b6299
_cV7
035 _a(OCoLC)17222092
040 _aCPL
_cCPL
_dOCL
_dLGG
048 _apz01
_aka01
_asd01
_apd01
110 2 _aModern Jazz Quartet.
_4prf
245 14 _aThe Modern Jazz Quartet plus
_h[sound recording].
260 _a[New York] :
_bVerve,
_cp1987.
300 _a1 sound disc :
_bdigital ;
_c4 3/4 in.
440 0 _aCompact jazz
511 0 _aModern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
518 _aRecorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
500 _aCompact disc.
500 _aAnalog recording.
505 0 _aThe golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cortège (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
100 _aScott, Daniel.
650 0 _aJazz.
700 1 _aJackson, Milt.
_4prf
700 1 _aPeterson, Oscar,
_d1925-
_4prf
700 1 _aBrown, Ray,
_d1926-2002.
_4prf
700 1 _aThigpen, Ed.
_4prf
700 1 _aHayes, Louis,
_d1937-
_4prf
852 80 _bMUSIC
_cAV
_hCD 1131
_4Marvin Duchow Music
_5Audio-Visual
Insert a new 100 field after the first 650
Next record:
LDR 01145ncm 2200277 i 4500
001 000073594
004 AAJ5802
005 20030415102100.0
008 801107s1977 nyujza
010 _a 77771106
035 _a(CaOTUIC)15460184
035 9 _aAAJ5802
040 _aLC
050 00 _aM1366
_b.M62
_dM1527.2
245 04 _aThe Modern Jazz Quartet :
_bThe legendary profile. --
260 _aNew York :
_bM.J.Q. Music,
_cc1977.
300 _ascore (72 p.) ;
_c31 cm.
500 _aFor piano, vibraphone, drums, and double bass.
505 0 _aLewis, J. Django.--Lewis, J. Plastic dreams (music from the film Kemek).--Lewis, J. Dancing (music from the film Kemek).--Lewis, J. Blues in A minor.--Lewis, J. Blues in B♭.--Lewis, J. Precious joy.--Jackson, M. The martyr.--Jackson, M. The legendary profile.
650 0 _aJazz.
100 _aScott, Daniel.
650 0 _aMotion picture music
_vExcerpts
_vScores.
700 12 _aLewis, John,
_d1920-
_tSelections.
_f1977.
700 12 _aJackson, Milt.
_tMartyrs.
_f1977.
700 12 _aJackson, Milt.
_tLegendary profile.
_f1977.
740 4 _aThe legendary profile.
852 00 _bMUSIC
_cMAIN
_kfolio
_hM1366
_iM62
_91
_4Marvin Duchow Music
_5
Next record:
LDR 01293cjm 2200289 a 4500
001 001878039
005 20050110174900.0
007 sd fungnn|||e|
008 940202r19931981nyujzn i d
024 1 _a7464573372
028 02 _aJK 57337
_bRed Baron
035 _a(OCoLC)29737267
040 _aSVP
_cSVP
_dLGG
100 1 _aDesmond, Paul,
_d1924-
245 10 _aPaul Desmond & the Modern Jazz Quartet
_h[sound recording]
260 _aNew York, N.Y. :
_bRed Baron :
_bManufactured by Sony Music Entertainment,
_cp1993.
300 _a1 sound disc (39 min.) :
_bdigital ;
_c4 3/4 in.
511 0 _aPaul Desmond, alto saxophone; Modern Jazz Quartet: John Lewis, piano; Milt Jackson, vibraphone; Percy Heath, bass; Connie Kay, drums.
500 _aAll arrangements by John Lewis.
518 _aRecorded live on December 25, 1971 at Town Hall, NYC.
500 _aOriginally released in 1981 by Finesse as LP FW 27487.
500 _aProgram notes by Irving Townsend, June 1981, on container insert.
505 0 _aGreensleeves -- You go to my head -- Blue dove -- Jesus Christ Superstar -- Here's that rainy day -- East of the sun -- Bags' new groove.
650 0 _aJazz
_y1971-1980.
100 _aScott, Daniel.
700 1 _aLewis, John,
_d1920-
710 2 _aModern Jazz Quartet.
740 0 _aPaul Desmond and the Modern Jazz Quartet.
Next record:
LDR 01829cjm 2200385 a 4500
001 001964482
005 20060626132700.0
007 sd fzngnn|m|e|
008 871211p19871957nyujzn d
024 1 _a4228332902
028 01 _a833 290-2
_bVerve
033 0 _a19571027
_b6299
_cD56
033 0 _a196112--
_b3804
_cN4
033 0 _a19571019
_b4104
_cC6
033 0 _a197107--
_b6299
_cV7
035 _a(OCoLC)17222092
040 _aCPL
_cCPL
_dOCL
_dLGG
048 _apz01
_aka01
_asd01
_apd01
110 2 _aModern Jazz Quartet.
_4prf
245 14 _aThe Modern Jazz Quartet plus
_h[sound recording].
260 _a[New York] :
_bVerve,
_cp1987.
300 _a1 sound disc :
_bdigital ;
_c4 3/4 in.
440 0 _aCompact jazz
511 0 _aModern Jazz Quartet (principally) ; Milt Jackson, vibraphone (2nd and 8th works) ; Oscar Peterson, piano (2nd and 8th works) ; Ray Brown, bass (2nd and 8th works) ; Ed Thigpen (2nd work), Louis Hayes (8th work), drums.
518 _aRecorded live, Oct. 27, 1957, at the Donaueschingen Jazz Festival (1st, 5th, 7th, and 10th works); Dec. 1961, in New York (2nd work); live, Oct. 19, 1957, at the Opera House, Chicago (3rd, 4th, 6th, and 9th works); July 1971, in Villingen, Germany (8th work).
500 _aCompact disc.
500 _aAnalog recording.
505 0 _aThe golden striker (4:08) -- On Green Dolphin Street (7:28) -- D & E (4:55) -- I'll remember April (4:51) -- Cortège (7:15) -- Now's the time (4:43) -- J.B. blues (5:09) -- Reunion blues (6:35) -- 'Round midnight (3:56) -- Three windows (7:20).
650 0 _aJazz.
100 _aScott, Daniel.
700 1 _aJackson, Milt.
_4prf
700 1 _aPeterson, Oscar,
_d1925-
_4prf
700 1 _aBrown, Ray,
_d1926-2002.
_4prf
700 1 _aThigpen, Ed.
_4prf
700 1 _aHayes, Louis,
_d1937-
_4prf
852 80 _bMUSIC
_cAV
_hCD 1131
_4Marvin Duchow Music
_5Audio-Visual
PK ! { tests/marc_xml_rsinger.phptnu [ PK ! 44-
tests/marc_field_003.phptnu [ PK ! c tests/marc_xml_16642.phptnu [ PK ! Ҕ tests/marc_16783.phptnu [ PK ! F-/ / tests/marc_field_002.phptnu [ PK ! \ e! tests/marc_lint_001.phptnu [ PK ! rP R3 tests/marc_xml_004.phptnu [ PK ! 0S > tests/marc_subfield_001.phptnu [ PK ! x;# # A tests/marc_006.phptnu [ PK ! }&
G G 6G tests/marc_lint_004.phptnu [ PK ! cܯ [ tests/marc_xml_006.phptnu [ PK ! %Hh h a tests/marc_003.phptnu [ PK ! (N N fg tests/camel.mrcnu [ PK ! p tests/marc_007.phptnu [ PK ! 1 1 tests/marc_xml_008.phptnu [ PK ! )]
tests/marc_005.phptnu [ PK ! _|6 6 tests/marc_lint_002.phptnu [ PK ! =O
' tests/sandburg.xmlnu [ PK ! !Ņ\ r tests/marc_xml_001.phptnu [ PK ! F;Re% e% tests/marc_004.phptnu [ PK ! jS >" tests/marc_015.phptnu [ PK ! 7 5 tests/marc_009.phptnu [ PK ! (Y ; tests/xmlescape.mrcnu [ PK ! 2.i i > tests/marc_018.phptnu [ PK ! 81 1 K tests/marc_record_001.phptnu [ PK ! 2 N tests/skipif.incnu [ PK ! \.iv v O tests/sandburg.mrcnu [ PK ! #c S tests/onerecord.xmlnu [ PK ! _X ` tests/marc_field_004.phptnu [ PK ! .%` ` d tests/marc_010.phptnu [ PK ! B1
w tests/marc_lint_005.phptnu [ PK ! ye@ Q tests/marc_xml_007.phptnu [ PK ! r tests/marc_008.phptnu [ PK ! +W
tests/bigarchive.xmlnu [ PK ! ԛ
tests/marc_014.phptnu [ PK ! f~ Ǥ tests/marc_field_001.phptnu [ PK ! Y Y tests/marc_xml_009.phptnu [ PK ! ~N0: : / tests/example.mrcnu [ PK ! }۶\p p tests/bad_example.xmlnu [ PK ! 9D D _ tests/marc_017.phptnu [ PK ! &c c tests/marc_002.phptnu [ PK ! tests/marc_xml_005.phptnu [ PK ! 5;- - tests/music.xmlnu [ PK ! ` ( tests/marc_012.phptnu [ PK ! <- - / tests/marc_subfield_002.phptnu [ PK ! f= = 84 tests/bad_example.mrcnu [ PK ! W) ) ; tests/marc_019.phptnu [ PK ! 泮 &L tests/music.mrcnu [ PK ! E4kL ] tests/marc_001.phptnu [ PK ! p̎u1 u1 !g tests/marc_016.phptnu [ PK ! O~iK! K! ٘ tests/marc_013.phptnu [ PK ! e
g tests/marc_011.phptnu [ PK ! > m tests/marc_xml_003.phptnu [ PK ! N& & tests/marc_xml_002.phptnu [ PK ! y
tests/marc_lint_003.phptnu [ PK ! a! - tests/namespace.xmlnu [ PK ! è { { tests/marc_020.phptnu [ PK !
tests/marc_field_005.phptnu [ PK ! VU, , tests/marc_field_21246.phptnu [ PK ! s} $ ~ tests/marc_xml_namespace_prefix.phptnu [ PK ! tests/marc_xml_namespace.phptnu [ PK ! S3 " tests/marc_021.phptnu [ PK ! kP 5 tests/marc_023.phptnu [ PK ! #"
)
) X8 tests/marc_022.phptnu [ PK @ @ Y a