// IF IS A NEW OBJETCT RECOLECT DATA FOR CREATING A RECORD IN THE BIBLIOGRAPHIC DATABASE if ($arrHttp["typeofobj"] == "N") { // si el objeto es nuevo y el número de objeto no existe en la base de datos echo "<h4>" . $msgstr["newobject"] . ". " . $msgstr["database"] . ": " . $arrHttp["database"] . "<BR>"; echo $msgstr["precatal"] . "</h4>"; echo "<form name=catalog method=post action=object_create.php onsubmit='return false'>\n"; //IF THE PURCHASE ORDER WAS GENERATED FROM A SUGGESTIONS, GET THE SUGGESTION FOR RECOLECTING THE PRE-CATALOGATION $valortag = array(); if (isset($arrHttp["suggestion"])) { $res = EjecutarBusqueda("CN_" . $arrHttp["suggestion"], "suggestions"); // se localiza la recomendación para sacar los datos de pre-catalogacion if ($res == 0) { echo "<h4>" . $msgstr["suggestions"] . ": " . $arrHttp["suggestion"] . " " . $msgstr["notfound"] . "</h4>"; die; } } else { //IF THERE IS NO SUGGESTION GET THE DATA FROM THE PURCHASEORDER DATABASE $res = EjecutarBusqueda("ON_" . $arrHttp["order"], "purchaseorder"); // se localiza la recomendación para sacar los datos de pre-catalogacion if ($res == 0) { echo "<h4>" . $msgstr["purchaseorder"] . ": " . $arrHttp["suggestion"] . " " . $msgstr["notfound"] . "</h4>"; die; } } foreach ($valortag as $tag => $value) { echo "<input type=hidden name=tag{$tag} value=\"{$value}\">\n"; echo "{$tag}={$value}<br>"; } foreach ($arrHttp as $var => $value) { echo "<input type=hidden name={$var} value=\"{$value}\">\n"; }
if ($linea != "") { $camposbusqueda[] = $linea; $t = explode('|', $linea); $tag = $t[1]; $matriz_c[$tag] = $linea; } } // echo $arrHttp["bdrel"]; // echo $arrHttp["Opcion"]; switch ($arrHttp["Opcion"]) { case "busquedalibre": EjecutarBusqueda(); break; case "continuar": EjecutarBusqueda(); break; case "formab": $arrHttp["Opcion"] = "buscar"; DibujarFormaBusqueda(); break; case "buscar": EjecutarBusqueda(); break; case "ubicar": $arrHttp["Formato"] = "actual"; UbicarRegistro(); break; case "buscar_en_este": EjecutarBusqueda(); break; }
$arrHttp["wk_tipom_2"] = $tym[2]; break; } if ($valortag[$tl] == $tym[1] and $tym[2] == "" or $valortag[$tl] == $tym[1] and $valortag[$nr] == $tym[2]) { $arrHttp["wks_a"] = $linea; $arrHttp["wks"] = $tym[0]; $arrHttp["wk_tipom_1"] = $tym[1]; $arrHttp["wk_tipom_2"] = $tym[2]; } } } PlantillaDeIngreso(); echo "<script>\r\n\t\tif (top.window.frames.length>0){\r\n\t\t\ttop.xeditar='S'\r\n\t\t\ttop.PrenderEdicion()\r\n\t\t}\r\n\t\t</script>\n"; break; case "buscar": $resultado = EjecutarBusqueda(); include "scripts_dataentry.php"; if ($resultado == "0") { $arrHttp["Opcion"] == "ninguna"; echo "\t<div class=\"middle form\">\r\n\t\t\t\t\t\t<div class=\"formContent\">\n"; echo "<font face=arial style=font-size:10px>" . $msgstr["expresion"] . ": " . stripslashes($arrHttp["Expresion"]) . "</font>"; echo "<h4>" . $msgstr["registros"] . ": " . $resultado . "</h4></div></div>\n"; ColocarMfn(); echo "</div></div>"; include "../common/footer.php"; die; break; } else { include "toolbar_record.php"; if ($resultado != "no") { //resultado=no indica que ya se formateo el registro