acqui.simple/addbooks.pl

   1 #!/usr/bin/perl
   2
   3 #
   4 # TODO
   5 #
   6 # Add info on biblioitems and items already entered as you enter new ones
   7 #
   8
   9 use CGI;
  10 use strict;
  11 use C4::Output;
  12
  13 my $input = new CGI;
  14 my $error = $input->param('error');
  15
  16 print $input->header;
  17 print startpage();
  18 print startmenu('acquisitions');
  19
  20 &searchscreen();
  21 print endmenu();
  22 print endpage();
  23
  24
  25 sub searchscreen {
  26     print << "EOF";
  27 <font size="6"><em>Adding new items to the Library Inventory</em></font>
  28 <p />
  29 EOF
  30
  31     if ($error eq "notfound") {
  32         print << "EOF";
  33 <font color="red" size="5">No items found</font>
  34 <p />
  35 EOF
  36     } # if
  37
  38     print << "EOF";
  39 <table bgcolor="#ffcc00" width="80%" cellpadding="5">
  40 <tr valign="center">
  41 <td><font size="5">To add a new item, scan or type the ISBN number:</font></td>
  42 </tr>
  43 </table>
  44
  45 <table>
  46 <tr>
  47 <form action="isbnsearch.pl">
  48 <td>ISBN:</td>
  49 <td><input type="text" name="isbn" /></td>
  50 <td><input type="submit" value="Go" /></td>
  51 </form>
  52 </tr>
  53 <tr>
  54 <form action="keywordsearch.pl">
  55 <td>Keyword:</td>
  56 <td><input type="text" name="keyword" /></td>
  57 <td><input type="submit" value="Go" /></td>
  58 </form>
  59 </tr>
  60 </table>
  61 <p />
  62 <hr />
  63 <p />
  64 <table bgcolor="#ffcc00" width="80%" cellpadding"5">
  65 <tr valign="center">
  66 <td><font size="5">Tools for importing MARC records into Koha</font></td>
  67 </tr>
  68 </table>
  69 <br />
  70 <ul>
  71 <li><a href=marcimport.pl?menu=z3950>Z39.50 Search Tool</a></li>
  72 <li><a href=marcimport.pl?menu=uploadmarc>Upload MARC records</a></li>
  73 </ul>
  74 <br clear="all">
  75 <p />
  76 <table bgcolor="#ffcc00" width="80%" cellpadding="5">
  77 <tr valign="center">
  78 <td><FONT SIZE=5>Add New Website</font></td>
  79 </tr>
  80 </table>
  81 <form action="websitesearch.pl" method="post">
  82 <table>
  83 <tr>
  84 <td>Keyword:</td>
  85 <td><input type="text" name="keyword" /></td>
  86 <td><input type="submit" value="Go" /></td>
  87 </tr>
  88 </table>
  89 </FORM>
  90 <p />
  91 <table bgcolor="#ffcc00" width="80%" cellpadding="5">
  92 <tr valign="center">
  93 <td><FONT SIZE=5>Help</font></td>
  94 </tr>
  95 </table>
  96 <FONT SIZE=5>Koha stores data in three sections</font>
  97 <p />
  98 <h2>Biblio</h2>
  99 The first section records bibliographic data such as title, author and copyright for a particular work.
 100 <p />
 101 <h2>Group</h2>
 102 The second records bibliographic data for a particular publication of that work, such as ISBN number, physical description, publisher information, etc
 103 <p />
 104 <h2>Item</h2>
 105 The third section holds specific item information, such as the bar code number
 106 <p />
 107 EOF
 108 } # sub searchscreen