ꦫꦣꦺꦤ꧀ꦄꦤ꧀ꦠꦱꦺꦤ

PATH: opt / alt / php74 / usr / share / pear / test / File_MARC / tests

--TEST--
marc_lint_003: Tests for field 880 and for subfield 6
--SKIPIF--
<?php include('tests/skipif.inc'); ?>
<?php include('tests/skipif_noispn.inc'); ?>
--FILE--
<?php
$dir = dirname(__FILE__);
require __DIR__ . '/bootstrap.php';

$marc_lint = new File_MARC_Lint();

$rec = new File_MARC_Record();
$rec->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', '<Title in CJK script>.')
        ),
        "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.

[-] marc_lint_005.phpt [open]
[-] bad_example.xml [open]
[-] skipif.inc [open]
[-] marc_field_003.phpt [open]
[-] marc_014.phpt [open]
[-] music.xml [open]
[+] ..
[-] example.mrc [open]
[-] marc_016.phpt [open]
[-] marc_xml_007.phpt [open]
[-] marc_field_004.phpt [open]
[-] marc_lint_001.phpt [open]
[-] marc_004.phpt [open]
[-] sandburg.mrc [open]
[-] marc_002.phpt [open]
[-] marc_field_002.phpt [open]
[-] marc_subfield_001.phpt [open]
[-] marc_009.phpt [open]
[-] onerecord.xml [open]
[-] marc_xml_namespace_prefix.phpt [open]
[-] marc_xml_009.phpt [open]
[-] marc_023.phpt [open]
[-] marc_lint_004.phpt [open]
[-] bigarchive.xml [open]
[-] marc_015.phpt [open]
[-] marc_021.phpt [open]
[-] marc_020.phpt [open]
[-] marc_xml_16642.phpt [open]
[-] marc_xml_008.phpt [open]
[-] marc_xml_002.phpt [open]
[-] marc_subfield_002.phpt [open]
[-] marc_003.phpt [open]
[-] sandburg.xml [open]
[-] marc_018.phpt [open]
[-] namespace.xml [open]
[-] music.mrc [open]
[-] marc_lint_002.phpt [open]
[-] marc_xml_namespace.phpt [open]
[-] marc_010.phpt [open]
[-] marc_006.phpt [open]
[-] marc_xml_006.phpt [open]
[-] marc_017.phpt [open]
[-] marc_lint_003.phpt [open]
[-] marc_field_001.phpt [open]
[-] marc_xml_rsinger.phpt [open]
[-] marc_008.phpt [open]
[-] marc_007.phpt [open]
[-] marc_xml_005.phpt [open]
[-] marc_012.phpt [open]
[-] marc_16783.phpt [open]
[-] bad_example.mrc [open]
[-] marc_field_21246.phpt [open]
[-] marc_022.phpt [open]
[-] marc_005.phpt [open]
[-] marc_field_005.phpt [open]
[-] marc_xml_001.phpt [open]
[-] marc_xml_003.phpt [open]
[-] marc_record_001.phpt [open]
[-] marc_001.phpt [open]
[-] marc_019.phpt [open]
[-] marc_xml_004.phpt [open]
[-] marc_013.phpt [open]
[-] xmlescape.mrc [open]
[-] camel.mrc [open]
[-] marc_011.phpt [open]