source: pmb4.2/trunk/fuentes/pmb/acquisition/suggestions/suggestions.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: 3.4 KB
Line 
1<?php
2// +-------------------------------------------------+
3// © 2002-2004 PMB Services / www.sigb.net pmb@sigb.net et contributeurs (voir www.sigb.net)
4// +-------------------------------------------------+
5// $Id: suggestions.inc.php,v 1.36 2015-04-03 11:16:25 jpermanne Exp $
6
7if (stristr($_SERVER['REQUEST_URI'], ".inc.php")) die("no access");
8
9//URL de retour du form de création/modification de suggestion
10$back_url = "onClick=\"document.location='./acquisition.php?categ=sug&action=list'\"";
11
12require_once($base_path.'/acquisition/suggestions/func_suggestions.inc.php');
13require_once($class_path.'/suggestions_map.class.php');
14
15if ($acquisition_sugg_display) {
16        require_once($acquisition_sugg_display);
17} else {
18        require_once('suggestions_display.inc.php');
19}
20
21$sug_map = new suggestions_map();
22
23//Traitement des transitions
24if ($transition) {
25        $sug_map->doTransition($transition, $chk);
26
27        if ($sug_map->getState_DISPLAY($transition)!='NO') {
28                $statut = $sug_map->getState_ID($transition);
29        } else {
30                $statut=-1;
31        }
32} 
33
34//Traitement des changements de categories
35if ($acquisition_sugg_categ== '1' && $action == 'to_categ') {
36        $sug_map->changeCateg($chk, $to_categ);
37}
38
39
40//Traitement des actions
41print "<h1>".htmlentities($msg['acquisition_sug_ges'],ENT_QUOTES, $charset)."</h1>";
42
43switch($action) {
44
45        case 'list':
46                if($sug_map->has_unimarc){
47                        catalog_notice_form();
48                } else {
49                        if($catnoti){
50                                $ids =explode(",",$chk);
51                                require_once($class_path.'/serials.class.php');
52                                for($i=0;$i<count($ids);$i++){
53                                        $sug = new suggestions($ids[$i]);
54                                        if($sug->sugg_noti_unimarc){                                           
55                                                $sug->catalog_notice();
56                                        }
57                                }
58                        }
59                  show_list_sug();
60                }                       
61                break;
62
63        case 'modif':
64                $update_action ="./acquisition.php?categ=sug&action=update&id_bibli=".$id_bibli."&id_sug=".$id_sug;
65                show_form_sug($update_action);
66                break;
67       
68        case 'update' :
69                update_sug();
70                show_list_sug();
71                break;
72
73        case 'delete' :
74                sup_sug();
75                show_list_sug();
76                break;
77
78        case 'fusChk':
79                sug_fusChk();
80                break;
81
82        case 'fusVal':
83                sug_fusVal();
84                show_list_sug();
85                break;
86
87        case 'catalog':
88                update_sug();
89                if($catal_type)
90                        include($base_path.'/acquisition/suggestions/analysis_form.inc.php');
91                else include($base_path.'/acquisition/suggestions/notice_form.inc.php');       
92                break;         
93               
94        case 'upd_notice':
95                include($base_path.'/acquisition/suggestions/update_notice.inc.php');
96                $update_action ="./acquisition.php?categ=sug&action=update&id_bibli=".$id_bibli."&id_sug=".$id_sug;
97                show_form_sug($update_action);
98                break;         
99
100        case 'del_pj':
101                 $explnum_doc = new explnum_doc($id_pj);
102                 $explnum_doc->delete();
103                 $req="delete from explnum_doc_sugg where num_explnum_doc='".$id_pj."'";
104                 pmb_mysql_query($req,$dbh);             
105                 $del_url = "./acquisition.php?categ=sug&action=update&id_bibli=".$id_bibli."&id_sug=".$id_sug;
106                 show_form_sug($del_url);
107         break;
108        case 'empr_sug':
109                break;
110        case 'record_uni':             
111                //Recherche de la fonction auxiliaire d'intégration
112                if ($z3950_import_modele) { 
113                        if (file_exists($base_path."/catalog/z3950/".$z3950_import_modele)) {
114                                require_once($base_path."/catalog/z3950/".$z3950_import_modele);
115                        } else {
116                                error_message("", $msg["admin_error_file_import_modele_z3950"], 1, "./admin.php?categ=param");
117                                exit;
118                        }
119                } else require_once($base_path."/catalog/z3950/func_other.inc.php");
120               
121                require_once($class_path.'/mono_display.class.php');
122                require_once($class_path.'/serial_display.class.php');
123               
124                save_unimarc_notice();
125                break;         
126        default:
127                show_list_sug();       
128                break;
129               
130}
131
132?>
133
Note: See TracBrowser for help on using the repository browser.