[Koha-cvs] CVS: koha/acqui.simple addbooks.pl,1.5.2.6,1.5.2.7 marcimport.pl,1.6.2.37,1.6.2.38

[Steve Tonnesen]

Update of /cvsroot/koha/koha/acqui.simple
In directory sc8-pr-cvs1:/tmp/cvs-serv11778/acqui.simple

Modified Files:
      Tag: rel-1-2
	addbooks.pl marcimport.pl 
Log Message:
Added a basic serials module.  Currently only tested with simple acquisitions.


Index: addbooks.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/addbooks.pl,v
retrieving revision 1.5.2.6
retrieving revision 1.5.2.7
diff -C2 -r1.5.2.6 -r1.5.2.7
*** addbooks.pl	11 Jul 2002 18:05:29 -0000	1.5.2.6
--- addbooks.pl	25 Sep 2003 17:40:23 -0000	1.5.2.7
***************
*** 50,54 ****
      my $seriestitle=$input->param('seriestitle');
      my $serial=0;
!     ($seriestitle) && ($serial=1);
      my $q_seriestitle=$dbh->quote($seriestitle);
      my $copyrightdate=$input->param('copyrightdate');
--- 50,54 ----
      my $seriestitle=$input->param('seriestitle');
      my $serial=0;
!     $input->param('serial') and $serial=1;
      my $q_seriestitle=$dbh->quote($seriestitle);
      my $copyrightdate=$input->param('copyrightdate');
***************
*** 379,382 ****
--- 379,383 ----
  <tr><td>Series Title<br>(if applicable)</td><td><input name=seriestitle
      size=40></td></tr>
+ <tr><td>Serial (magazine or journal)</td><td><input name=serial type=checkbox></td></tr>
  <tr><td>Copyright Date</td><td><input name=copyrightdate size=10></td></tr>
  <tr><td>Notes</td><td><textarea name=notes rows=4 cols=40
***************
*** 396,400 ****
  </form>
  <p>
! <a href=addbooks.pl?isbn=NULL>Enter book with no ISBN</a>
  <hr>
  <p>
--- 397,402 ----
  </form>
  <p>
! <a href=addbooks.pl?isbn=NULL>Enter book with no ISBN</a><br>
! <a href=../serials.pl>Serials module</a>
  <hr>
  <p>

Index: marcimport.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/Attic/marcimport.pl,v
retrieving revision 1.6.2.37
retrieving revision 1.6.2.38
diff -C2 -r1.6.2.37 -r1.6.2.38
*** marcimport.pl	17 Jan 2003 17:21:47 -0000	1.6.2.37
--- marcimport.pl	25 Sep 2003 17:40:23 -0000	1.6.2.38
***************
*** 666,674 ****
  print << "EOF";
      <form action=$ENV{'SCRIPT_NAME'} method=GET>
-     <input type=hidden name=z3950queue value=1>
-     <input type=hidden name=menu value=$menu>
-     <p>
-     <input type=hidden name=test value=testvalue>
-     <input type=hidden name=rand value=$rand>
          <table border=1 bgcolor=#dddddd>
  	    <tr><th bgcolor=#bbbbbb colspan=2>Search for MARC records</th></tr>
--- 666,669 ----
***************
*** 683,686 ****
--- 678,686 ----
              <tr><td colspan=2 align=center> <input type=submit> </td></tr>
      </table>
+     <input type=hidden name=z3950queue value=1>
+     <input type=hidden name=menu value=$menu>
+     <p>
+     <input type=hidden name=test value=testvalue>
+     <input type=hidden name=rand value=$rand>
  
      </form>
***************
*** 1164,1167 ****
--- 1164,1170 ----
  #---------------
  # $Log$
+ # Revision 1.6.2.38  2003/09/25 17:40:23  tonnesen
+ # Added a basic serials module.  Currently only tested with simple acquisitions.
+ #
  # Revision 1.6.2.37  2003/01/17 17:21:47  tonnesen
  # Adds ability to clear the Z39.50 search query list.