source: pmb4.2/trunk/fuentes/pmb/catalog/z3950/notice.inc.php @ 815

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

Initial release of pmb 4.2

  • Property svn:executable set to *
File size: 2.1 KB
Line 
1<?php
2// +-------------------------------------------------+
3// © 2002-2004 PMB Services / www.sigb.net pmb@sigb.net et contributeurs (voir www.sigb.net)
4// | creator : Eric ROBERT                                                    |
5// | modified : ...                                                           |
6// +-------------------------------------------------+
7// $Id: notice.inc.php,v 1.6 2007-03-10 08:50:38 touraine37 Exp $
8
9if (stristr($_SERVER['REQUEST_URI'], ".inc.php")) die("no access");
10
11include("$class_path/marc_table.class.php");
12
13function convert_usmarc_unimarc_functions ($usmarc_func="") {
14        if ($usmarc_func == "") return "";
15        $usmarc_unimarc_func = array (
16                                "adp"=>"010",
17                                "ann"=>"020",
18                                "arr"=>"030",
19                                "art"=>"040",
20                                "asg"=>"050",
21                                "asn"=>"060",
22                                "aut"=>"070",
23                                "aui"=>"080",
24                                "aus"=>"090",
25                                "ant"=>"100",
26                                "bnd"=>"110",
27                                "bdd"=>"120",
28                                "bkd"=>"130",
29                                "bjd"=>"140",
30                                "bpd"=>"150",
31                                "bsl"=>"160",
32                                "cll"=>"170",
33                                "ctg"=>"180",
34                                "cns"=>"190",
35                                "chr"=>"200",
36                                "cmm"=>"210",
37                                "com"=>"220",
38                                "cmp"=>"230",
39                                "cmt"=>"240",
40                                "cnd"=>"250",
41                                "cph"=>"260",
42                                "crr"=>"270",
43                                "dte"=>"280",
44                                "dto"=>"290",
45                                "drt"=>"300",
46                                "dst"=>"310",
47                                "dnr"=>"320",
48                                "dub"=>"330",
49                                "edt"=>"340",
50                                "egr"=>"350",
51                                "etr"=>"360",
52                                "flm"=>"370",
53                                "frg"=>"380",
54                                "fmo"=>"390",
55                                "fnd"=>"400",
56                                "art"=>"410",
57                                "hnr"=>"420",
58                                "ilu"=>"430",
59                                "ill"=>"440",
60                                "ins"=>"450",
61                                "ive"=>"460",
62                                "ivr"=>"470",
63                                "lbt"=>"480",
64                                "lse"=>"490",
65                                "lso"=>"500",
66                                "ltg"=>"510",
67                                "lyr"=>"520",
68                                "mte"=>"530",
69                                "mon"=>"540",
70                                "nrt"=>"550",
71                                "org"=>"560",
72                                "oth"=>"570",
73                                "ppm"=>"580",
74                                "prf"=>"590",
75                                "pht"=>"600",
76                                "prt"=>"610",
77                                "pop"=>"620",
78                                "pro"=>"630",
79                                "pfr"=>"640",
80                                "pbl"=>"650",
81                                "rcp"=>"660",
82                                "rce"=>"670",
83                                "su"=>"675",
84                                "rbr"=>"680",
85                                "sce"=>"690",
86                                "scr"=>"700",
87                                "sec"=>"710",
88                                "sgn"=>"720",
89                                "trl"=>"730",
90                                "tyd"=>"740",
91                                "tyg"=>"750",
92                                "wde"=>"760",
93                                "wam"=>"770") ;
94        if ($usmarc_unimarc_func[$usmarc_func]) return $usmarc_unimarc_func[$usmarc_func];
95                else return "570" ;
96        }
Note: See TracBrowser for help on using the repository browser.