source: pmb4.1/trunk/fuentes/pmb/catalog/z3950/z_frame.php @ 478

Last change on this file since 478 was 478, checked in by mabarracus, 4 years ago

copy trusty code 4.1

  • Property svn:executable set to *
File size: 1.0 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: z_frame.php,v 1.9 2012-08-01 09:48:51 ngantier Exp $
6
7if ( ($clause=="") && (count($bibli)==0) ) {
8        echo "$msg[z3950_no_bib_selectetd]<br />";
9        echo "<a href=\"#\" onclick='history.go(-1); return false;'>$msg[z3950_autre_rech]</a>&nbsp;";
10        die();
11        }
12
13if ($clause=="") {
14        for ($i=0; $i<count($bibli); $i++) {
15                if ($clause=="") {
16                        $clause.=$bibli[$i];
17                        } else {
18                                $clause.=",".$bibli[$i];
19                                }
20                }
21        }
22
23if ($clause!="") 
24        $selection_bib="where bib_id in (".$clause.") "; 
25else 
26        $selection_bib;
27
28print "
29<br />
30<iframe name=\"framedepartz3950\" frameborder=\"0\" scrolling=\"yes\" width=\"800\" height=\"550\" src=\"./catalog/z3950/z_progression_main.php?clause=$clause&crit1=$crit1&val1=$val1&crit2=$crit2&val2=$val2&bool1=$bool1&selection_bib=$selection_bib&limite_notices=$limite_notices&id_notice=$id_notice\">";
Note: See TracBrowser for help on using the repository browser.