X7ROOT File Manager
Current Path:
/opt/alt/php73/usr/share/pear/test/File_MARC/tests
opt
/
alt
/
php73
/
usr
/
share
/
pear
/
test
/
File_MARC
/
tests
/
??
..
??
bad_example.mrc
(1.81 KB)
??
bad_example.xml
(7.11 KB)
??
bigarchive.xml
(3.43 KB)
??
camel.mrc
(6.83 KB)
??
example.mrc
(1.81 KB)
??
marc_001.phpt
(2.45 KB)
??
marc_002.phpt
(4.6 KB)
??
marc_003.phpt
(1.35 KB)
??
marc_004.phpt
(9.35 KB)
??
marc_005.phpt
(3.42 KB)
??
marc_006.phpt
(1.28 KB)
??
marc_007.phpt
(1.18 KB)
??
marc_008.phpt
(478 B)
??
marc_009.phpt
(1.51 KB)
??
marc_010.phpt
(4.59 KB)
??
marc_011.phpt
(2.69 KB)
??
marc_012.phpt
(1.74 KB)
??
marc_013.phpt
(8.32 KB)
??
marc_014.phpt
(3.49 KB)
??
marc_015.phpt
(4.76 KB)
??
marc_016.phpt
(12.36 KB)
??
marc_017.phpt
(4.07 KB)
??
marc_018.phpt
(3.1 KB)
??
marc_019.phpt
(4.04 KB)
??
marc_020.phpt
(3.87 KB)
??
marc_021.phpt
(4.76 KB)
??
marc_022.phpt
(10.26 KB)
??
marc_023.phpt
(540 B)
??
marc_16783.phpt
(2.43 KB)
??
marc_field_001.phpt
(895 B)
??
marc_field_002.phpt
(559 B)
??
marc_field_003.phpt
(1.65 KB)
??
marc_field_004.phpt
(937 B)
??
marc_field_005.phpt
(1015 B)
??
marc_field_21246.phpt
(812 B)
??
marc_lint_001.phpt
(4.41 KB)
??
marc_lint_002.phpt
(2.3 KB)
??
marc_lint_003.phpt
(2.73 KB)
??
marc_lint_004.phpt
(5.07 KB)
??
marc_lint_005.phpt
(2.63 KB)
??
marc_record_001.phpt
(561 B)
??
marc_subfield_001.phpt
(733 B)
??
marc_subfield_002.phpt
(1.04 KB)
??
marc_xml_001.phpt
(7.47 KB)
??
marc_xml_002.phpt
(3.54 KB)
??
marc_xml_003.phpt
(1.46 KB)
??
marc_xml_004.phpt
(2.76 KB)
??
marc_xml_005.phpt
(1.48 KB)
??
marc_xml_006.phpt
(1.42 KB)
??
marc_xml_007.phpt
(986 B)
??
marc_xml_008.phpt
(12.38 KB)
??
marc_xml_009.phpt
(1.09 KB)
??
marc_xml_16642.phpt
(930 B)
??
marc_xml_namespace.phpt
(720 B)
??
marc_xml_namespace_prefix.phpt
(699 B)
??
marc_xml_rsinger.phpt
(2.45 KB)
??
music.mrc
(4.17 KB)
??
music.xml
(11.38 KB)
??
namespace.xml
(7.9 KB)
??
onerecord.xml
(3.23 KB)
??
sandburg.mrc
(1.12 KB)
??
sandburg.xml
(3.26 KB)
??
skipif.inc
(177 B)
??
xmlescape.mrc
(728 B)
Editing: marc_014.phpt
--TEST-- marc_014: Add fields to a MARC record --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 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
Upload File
Create Folder