<?xml version="1.0" encoding="UTF-8"?>
<record
    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"
    xmlns="http://www.loc.gov/MARC21/slim">

  <leader>01249cam a2200349 a 4500</leader>
  <datafield tag="999" ind1=" " ind2=" ">
    <subfield code="c">8228</subfield>
    <subfield code="d">8228</subfield>
  </datafield>
  <controlfield tag="001">12659572</controlfield>
  <controlfield tag="003">OSt</controlfield>
  <controlfield tag="005">20200907115050.0</controlfield>
  <controlfield tag="008">020128s2002    nyua          001 0 eng  </controlfield>
  <datafield tag="010" ind1=" " ind2=" ">
    <subfield code="a">  2002275909</subfield>
  </datafield>
  <datafield tag="020" ind1=" " ind2=" ">
    <subfield code="a">0471418463 (acidfree paper)</subfield>
  </datafield>
  <datafield tag="040" ind1=" " ind2=" ">
    <subfield code="a">DLC</subfield>
    <subfield code="c">DLC</subfield>
    <subfield code="d">DLC</subfield>
  </datafield>
  <datafield tag="050" ind1="0" ind2="0">
    <subfield code="a">QA76.8.I25919</subfield>
    <subfield code="b">C68 2002</subfield>
  </datafield>
  <datafield tag="082" ind1="0" ind2="0">
    <subfield code="a">005.2/45</subfield>
    <subfield code="2">22</subfield>
  </datafield>
  <datafield tag="100" ind1="1" ind2=" ">
    <subfield code="a">Cooper, James,</subfield>
    <subfield code="d">1948-</subfield>
  </datafield>
  <datafield tag="245" ind1="1" ind2="0">
    <subfield code="a">Programming in COBOL/400 /</subfield>
    <subfield code="c">James Cooper, Nancy Stern, Robert A. Stern.</subfield>
  </datafield>
  <datafield tag="246" ind1="3" ind2="0">
    <subfield code="a">COBOL/400</subfield>
  </datafield>
  <datafield tag="250" ind1=" " ind2=" ">
    <subfield code="a">2nd ed.</subfield>
  </datafield>
  <datafield tag="260" ind1=" " ind2=" ">
    <subfield code="a">[New York] :</subfield>
    <subfield code="b">Wiley,</subfield>
    <subfield code="c">c2002.</subfield>
  </datafield>
  <datafield tag="300" ind1=" " ind2=" ">
    <subfield code="a">viii, 722 p. :</subfield>
    <subfield code="b">ill. ;</subfield>
    <subfield code="c">28 cm.</subfield>
  </datafield>
  <datafield tag="500" ind1=" " ind2=" ">
    <subfield code="a">Includes index.</subfield>
  </datafield>
  <datafield tag="650" ind1=" " ind2="0">
    <subfield code="a">IBM AS/400 (Computer)</subfield>
    <subfield code="x">Programming.</subfield>
  </datafield>
  <datafield tag="650" ind1=" " ind2="0">
    <subfield code="a">COBOL (Computer program language)</subfield>
  </datafield>
  <datafield tag="650" ind1=" " ind2="0">
    <subfield code="a">Structured programming.</subfield>
  </datafield>
  <datafield tag="700" ind1="1" ind2=" ">
    <subfield code="a">Stern, Nancy B.</subfield>
  </datafield>
  <datafield tag="700" ind1="1" ind2=" ">
    <subfield code="a">Stern, Robert A.</subfield>
  </datafield>
  <datafield tag="856" ind1="4" ind2="2">
    <subfield code="3">Publisher description</subfield>
    <subfield code="u">http://www.loc.gov/catdir/description/wiley039/2002275909.html</subfield>
  </datafield>
  <datafield tag="856" ind1="4" ind2="1">
    <subfield code="3">Table of contents</subfield>
    <subfield code="u">http://www.loc.gov/catdir/toc/wiley022/2002275909.html</subfield>
  </datafield>
  <datafield tag="906" ind1=" " ind2=" ">
    <subfield code="a">7</subfield>
    <subfield code="b">cbc</subfield>
    <subfield code="c">origcop</subfield>
    <subfield code="d">3</subfield>
    <subfield code="e">ncip</subfield>
    <subfield code="f">20</subfield>
    <subfield code="g">y-gencatlg</subfield>
  </datafield>
  <datafield tag="942" ind1=" " ind2=" ">
    <subfield code="2">lcc</subfield>
    <subfield code="c">MON</subfield>
  </datafield>
  <datafield tag="952" ind1=" " ind2=" ">
    <subfield code="0">0</subfield>
    <subfield code="1">0</subfield>
    <subfield code="2">lcc</subfield>
    <subfield code="4">0</subfield>
    <subfield code="7">0</subfield>
    <subfield code="a">001</subfield>
    <subfield code="b">001</subfield>
    <subfield code="d">2020-09-07</subfield>
    <subfield code="e">DONATION FROM DELTA COLLEGE UK</subfield>
    <subfield code="l">0</subfield>
    <subfield code="o">QA76.8.I25919 C68 2002</subfield>
    <subfield code="p">2020-3467</subfield>
    <subfield code="r">2020-09-07 00:00:00</subfield>
    <subfield code="t">1</subfield>
    <subfield code="w">2020-09-07</subfield>
    <subfield code="y">MON</subfield>
  </datafield>
  <datafield tag="952" ind1=" " ind2=" ">
    <subfield code="0">0</subfield>
    <subfield code="1">0</subfield>
    <subfield code="2">lcc</subfield>
    <subfield code="4">0</subfield>
    <subfield code="7">0</subfield>
    <subfield code="a">001</subfield>
    <subfield code="b">001</subfield>
    <subfield code="d">2020-09-07</subfield>
    <subfield code="e">DONATION FROM DELTA COLLEGE UK</subfield>
    <subfield code="l">0</subfield>
    <subfield code="o">QA76.8.I25919 C68 2002</subfield>
    <subfield code="p">2020-3510</subfield>
    <subfield code="r">2020-09-07 00:00:00</subfield>
    <subfield code="t">2</subfield>
    <subfield code="w">2020-09-07</subfield>
    <subfield code="y">MON</subfield>
  </datafield>
</record>
