source: pmb4.2/trunk/fuentes/pmb/admin/convert/imports/delphe2unimarciso/input_delphe.inc.php @ 815

Last change on this file since 815 was 815, checked in by jrpelegrina, 5 years ago

Initial release of pmb 4.2

  • Property svn:executable set to *
File size: 803 bytes
Line 
1<?php
2// +-------------------------------------------------+
3// © 2002-2004 PMB Services / www.sigb.net pmb@sigb.net et contributeurs (voir www.sigb.net)
4// +-------------------------------------------------+
5// $Id: input_delphe.inc.php,v 1.2 2015-04-03 11:16:29 jpermanne Exp $
6
7function _get_n_notices_($fi,$file_in,$input_params,$origine) {
8        global $base_path;
9       
10        $first=true;
11        $stop=false;
12        $content="";
13        $index=array();
14        $n=1;
15        $i=0;
16        //Lecture du fichier d'entrée
17        while (!feof($fi)) {
18                $notice=fgets($fi,4096);
19                if ($i>0 && $notice) {
20                        $requete="INSERT INTO import_marc (no_notice, notice, origine) VALUES ($n,'".addslashes($notice)."','$origine')";
21                        pmb_mysql_query($requete);
22                        $n++;
23                        $t=array();
24                        $t["POS"]=$n;
25                        $t["LENGHT"]=1;
26                        $index[]=$t;
27                }
28                $i++;
29        }
30        return $index;
31}
32?>
Note: See TracBrowser for help on using the repository browser.