Пример #1
0
function LocalizarInventario()
{
    global $db_path, $Wxis, $xWxis, $arrHttp, $pft_totalitems, $pft_in, $pft_nc, $pft_typeofr, $prefix_in, $multa;
    $Expresion = "IN_" . $arrHttp["inventory"];
    // Se extraen las variables necesarias para extraer la información del título al cual pertenece el ejemplar
    // se toman de databases_configure_read.php
    // pft_totalitems= pft para extraer el número total de ejemplares del título
    // pft_in= pft para extraer el número de inventario
    // pft_nc= pft para extraer el número de clasificación
    // pft_typeofr= pft para extraer el tipo de registro
    //READ LOANOBJECT DATABASE TO GET THE RECORD WITH THE ITEMS OF THE TITLE
    $IsisScript = $xWxis . "loans/prestamo_disponibilidad.xis";
    $Expresion = urlencode($Expresion);
    if (isset($arrHttp["db"])) {
        $d = explode('|', $arrHttp["db"]);
        $arrHttp["base"] = $d[0];
        $arrHttp["db"] = $d[0];
        $pft_typeofrec = LeerPft("loans_typeofobject.pft");
        $formato_ex = "(v900^n'||" . $d[0] . "||',v900^n,'||',v900^l,'||',v900^b,'||'," . $pft_typeofrec . "'||',v900^v,'||',v900^t,'||'/)";
    } else {
        $arrHttp["base"] = "loanobjects";
        $formato_ex = "(v1[1]'||'v10[1],'||',v959^i,'||',v959^l,'||',v959^b,'||',v959^o,'||',v959^v,'||',v959^t,'||'/)";
        // control number||database||inventory||main||branch||type||volume||tome
    }
    $formato_obj = "";
    //	$formato_obj=$db_path."biblo/loans/".$_SESSION["lang"]."/loans_display.pft";
    //	if (!file_exists($formato_obj)) $formato_obj=$db_path."biblo/loans/".$lang_db."/loans_display.pft";
    $formato_obj .= urlencode($formato_ex);
    $query = "&Opcion=disponibilidad&base=" . $arrHttp["base"] . "&cipar={$db_path}" . "par/" . $arrHttp["base"] . ".par&Expresion=" . $Expresion . "&Pft={$formato_obj}";
    include "../common/wxis_llamar.php";
    $total = 0;
    $copies_title = array();
    $item = "";
    foreach ($contenido as $linea) {
        $linea = trim($linea);
        if ($linea != "") {
            if (substr($linea, 0, 8) == '$$TOTAL:') {
                $total = trim(substr($linea, 8));
            } else {
                $t = explode('||', $linea);
                if ($arrHttp["inventory"] == $t[2]) {
                    $item = $linea;
                }
                $copies_title[] = $linea;
            }
        }
    }
    return $copies_title;
}
Пример #2
0
            case "IN":
                $prefix_in = substr($value, $ix);
                break;
            case "NC":
                $prefix_nc = trim(substr($value, $ix));
                break;
        }
    }
}
$pft_totalitems = LeerPft("loans_totalitems.pft");
$pft_in = LeerPft("loans_inventorynumber.pft");
$pft_nc = LeerPft("loans_cn.pft");
$pft_dispobj = LeerPft("loans_display.pft");
$pft_storobj = LeerPft("loans_store.pft");
$pft_loandisp = LeerPft("loans_show.pft");
$pft_typeofr = LeerPft("loans_typeofobject.pft");
include "../common/header.php";
?>
<script>
function Guardar(){
	ix=document.forma1.base.selectedIndex
	if (ix<1){
		alert("<?php 
echo $msgstr["seldb"];
?>
")
		return
	}
	document.forma1.action="databases_configure_update.php"
	document.forma1.target="_self";
    document.forma1.submit()
    $archivo = $db_path . "circulation/def/" . $lang_db . "/items.tab";
}
$fp = file($archivo);
foreach ($fp as $value) {
    $value = trim($value);
    if ($value != "") {
        $t = explode('|', $value);
        if (!isset($t[1])) {
            $t[1] = $t[0];
        }
        $type_items[$t[0]] = $t[1];
    }
}
//GET THE INFORMATION OF THE DATABASE SELECTED
$b = explode('|', $arrHttp["db"]);
$catalog_db = $b[0];
$arrHttp["db"] = $catalog_db;
require_once "databases_configure_read.php";
$total = ReadCatalographicRecord($arrHttp["code"], $catalog_db);
if ($total > 1) {
    echo "<font color=red>" . $msgstr["dupctrl"] . "</font><p>";
}
echo '<font color=darkblue><strong>' . $msgstr["bd"] . ": " . $catalog_db . ". " . $msgstr["control_n"] . ": " . $arrHttp["code"] . "</strong></font><br>";
echo $titulo;
echo "<table bgcolor=#dddddd cellpadding=5>\r\n\t\t\t<th></th>\r\n\t\t\t<th>" . $msgstr["inventory"] . "</th>\r\n\t\t\t<th>" . $msgstr["volume"] . "</th>\r\n\t\t\t<th>" . $msgstr["tome"] . "</th>\r\n\t\t\t<th>" . $msgstr["typeofitems"] . "</th>\r\n\t\t\t<th>" . $msgstr["usercode"] . "</th>\r\n\t\t\t<th>" . $msgstr["devdate"] . "</th>";
//SE OBTIENEN LOS EJEMPLARES DEL TITULO
$Expresion = $prefix_cn . $arrHttp["code"];
echo "----" . $Expresion;
$IsisScript = $xWxis . "loans/prestamo_disponibilidad.xis";
$Expresion = urlencode($Expresion);
$pft_inventory = LeerPft("loans_inventorynumber.pft");
Пример #4
0
    ?>
	<table width=100% border=0>
		<td width=150>
		<label for="dataBases">
			<strong><?php 
    echo $msgstr["basedatos"];
    ?>
</strong>
		</label>
		</td><td>
		<select name=db>
		<option></option>
<?php 
    $xselected = " selected";
    foreach ($fp as $value) {
        $value = trim($value);
        $v = explode('|', $value);
        //SE LEE EL PREFIJO PARA OBTENER EL NUMERO DE INVENTARIO DE LA BASE DE DATOS
        LeerNumeroClasificacion($v[0]);
        $pft_ni = LeerPft("loans_inventorynumber.pft", $v[0]);
        $signa = LeerPft("loans_cn.pft", $v[0]);
        $value .= "|" . $prefix_in . "|" . urlencode($pft_ni) . "|" . urlencode($signa);
        echo "<option value='{$value}' {$xselected}>" . $v[1] . "</option>";
        $xselected = "";
    }
    ?>
		</select>
		</td>
	</table>
	</div>
Пример #5
0
$sel_base = "N";
if (file_exists($db_path . "loans.dat")) {
    $fp = file($db_path . "loans.dat");
    $sel_base = "S";
    ?>
	<table width=100% border=0>
		<td width=150>
		<label for="dataBases">
			<strong><?php 
    echo $msgstr["basedatos"];
    ?>
</strong>
		</label>
		</td><td>
		<select name=db>
		<option></option>
<?php 
    foreach ($fp as $value) {
        $value = trim($value);
        $v = explode('|', $value);
        //SE LEE EL PREFIJO PARA OBTENER EL NUMERO DE CLASIFICACION DE LA BASE DE DATOS
        $prefijo_nc = LeerNumeroClasificacion($v[0]);
        $pft_nc = LeerPft("loans_cn.pft", $v[0]);
        $value .= "|" . $prefijo_nc . "|" . urlencode($pft_nc);
        echo "<option value='{$value}'>" . $v[1] . "</option>";
    }
    ?>
		</select>
		</td>
	</table>
	</div>
Пример #6
0
    $archivo = $db_path . $arrHttp["base"] . "/loans/" . $lang_db . "/loans_uskey.tab";
}
$fp = file_exists($archivo);
if ($fp) {
    $fp = file($archivo);
    foreach ($fp as $value) {
        $value = trim($value);
        if ($value != "") {
            $uskey = $value;
        }
    }
}
$pft_uskey = LeerPft("loans_uskey.pft");
$pft_ustype = LeerPft("loans_ustype.pft");
$pft_usvig = LeerPft("loans_usvig.pft");
$pft_usdisp = LeerPft("loans_usdisp.pft");
include "../common/header.php";
?>
<script>
function Guardar(){
	ix=document.forma1.base.selectedIndex
	if (ix<1){
		alert("<?php 
echo $msgstr["seldb"];
?>
")
		return
	}
	document.forma1.action="borrowers_configure_update.php"
	document.forma1.target="_self";
    document.forma1.submit()