{
							$lb_break=true;
							$io_sql->free_result($li_exec1);
						}
						
					}  //fin  if($row=$io_sql->fetch_row($li_exec))
	
*/				}
			}
			else
			{
				if($row=$io_sql->fetch_row($rs_data))
				{
					$ls_numdocori="";
					$li_preuniart=$row["cosart"];
					$li_preuniart=uf_formatonumerico($li_preuniart);
				}
			}
			
			print "<script language= javascript>";
			print "obj=eval(opener.document.form1.txtcodalm".$li_linea.");";
			print "obj.value='".$ls_codalm."';";
			print "obj1=eval(opener.document.form1.hidexistencia".$li_linea.");";
			print "obj1.value=".$li_existencia.";";
			print "obj2=eval(opener.document.form1.txtpreuniart".$li_linea.");";
			print "obj2.value='".$li_preuniart."';";
			print "obj3=eval(opener.document.form1.hidnumdocori".$li_linea.");";
			print "obj3.value='".$ls_numdocori."';";
			print "close();";
			print "</script>";
			
function uf_imprimirresultados($as_codper, $as_cedper, $as_nomper, $as_apeper)
{
    require_once "../shared/class_folder/sigesp_include.php";
    $in = new sigesp_include();
    $con = $in->uf_conectar();
    require_once "../shared/class_folder/class_mensajes.php";
    $msg = new class_mensajes();
    require_once "../shared/class_folder/class_sql.php";
    $SQL = new class_sql($con);
    $ds = new class_datastore();
    require_once "../shared/class_folder/class_funciones.php";
    $fun = new class_funciones();
    $emp = $_SESSION["la_empresa"];
    $ls_codemp = $emp["codemp"];
    print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
    print "<tr class=titulo-celda>";
    print "<td width=100>Código</td>";
    print "<td width=100 align=center>Cédula</td>";
    print "<td width=440>Nombre y Apellido</td>";
    print "</tr>";
    $ls_sql = "SELECT sno_personal.*, sno_profesion.despro, sigesp_pais.despai, sigesp_estados.desest, sigesp_municipio.denmun, sigesp_parroquia.denpar ";
    $ls_sql = $ls_sql . "FROM sno_personal, sno_profesion, sigesp_pais, sigesp_estados, sigesp_municipio, sigesp_parroquia ";
    $ls_sql = $ls_sql . "WHERE sno_personal.codemp='" . $ls_codemp . "'";
    $ls_sql = $ls_sql . "  AND sno_profesion.codemp = sno_personal.codemp ";
    $ls_sql = $ls_sql . "  AND sno_profesion.codpro = sno_personal.codpro ";
    $ls_sql = $ls_sql . "  AND sigesp_pais.codpai = sno_personal.codpai ";
    $ls_sql = $ls_sql . "  AND sigesp_estados.codpai = sno_personal.codpai ";
    $ls_sql = $ls_sql . "  AND sigesp_estados.codest = sno_personal.codest ";
    $ls_sql = $ls_sql . "  AND sigesp_municipio.codpai = sno_personal.codpai ";
    $ls_sql = $ls_sql . "  AND sigesp_municipio.codest = sno_personal.codest ";
    $ls_sql = $ls_sql . "  AND sigesp_municipio.codmun = sno_personal.codmun ";
    $ls_sql = $ls_sql . "  AND sigesp_parroquia.codpai = sno_personal.codpai ";
    $ls_sql = $ls_sql . "  AND sigesp_parroquia.codest = sno_personal.codest ";
    $ls_sql = $ls_sql . "  AND sigesp_parroquia.codmun = sno_personal.codmun ";
    $ls_sql = $ls_sql . "  AND sigesp_parroquia.codpar = sno_personal.codpar ";
    $ls_sql = $ls_sql . "  AND sno_personal.codper like '" . $as_codper . "' AND sno_personal.cedper like '" . $as_cedper . "'";
    $ls_sql = $ls_sql . "  AND sno_personal.nomper like '" . $as_nomper . "' AND sno_personal.apeper like '" . $as_apeper . "'";
    $ls_sql = $ls_sql . "  ORDER BY sno_personal.codper";
    $rs_per = $SQL->select($ls_sql);
    if ($row = $SQL->fetch_row($rs_per)) {
        $data = $SQL->obtener_datos($rs_per);
        $ds->data = $data;
        $li_rows = $ds->getRowCount("codper");
        for ($li_index = 1; $li_index <= $li_rows; $li_index++) {
            print "<tr class=celdas-blancas>";
            $ls_codper = $data["codper"][$li_index];
            $ls_cedper = $data["cedper"][$li_index];
            $ls_nomper = $data["nomper"][$li_index];
            $ls_apeper = $data["apeper"][$li_index];
            $ls_dirper = $data["dirper"][$li_index];
            $ld_fecnacper = $fun->uf_convertirfecmostrar($data["fecnacper"][$li_index]);
            $ls_edocivper = $data["edocivper"][$li_index];
            $ls_telhabper = $data["telhabper"][$li_index];
            $ls_telmovper = $data["telmovper"][$li_index];
            $ls_sexper = $data["sexper"][$li_index];
            $li_estaper = $data["estaper"][$li_index];
            $li_estaper = str_replace(".", ",", $li_estaper);
            $li_estaper = uf_formatonumerico($li_estaper);
            $li_pesper = $data["pesper"][$li_index];
            $li_pesper = str_replace(".", ",", $li_pesper);
            $li_pesper = uf_formatonumerico($li_pesper);
            $ls_codpro = $data["codpro"][$li_index];
            $ls_nivacaper = $data["nivacaper"][$li_index];
            $ls_codpai = $data["codpai"][$li_index];
            $ls_codest = $data["codest"][$li_index];
            $ls_codmun = $data["codmun"][$li_index];
            $ls_codpar = $data["codpar"][$li_index];
            $ls_catper = $data["catper"][$li_index];
            $ls_cedbenper = $data["cedbenper"][$li_index];
            $ls_numhijper = $data["numhijper"][$li_index];
            $ls_obsper = $data["obsper"][$li_index];
            $ls_contraper = $data["contraper"][$li_index];
            $ls_tipvivper = $data["tipvivper"][$li_index];
            $ls_tenvivper = $data["tenvivper"][$li_index];
            $li_monpagvivper = $data["monpagvivper"][$li_index];
            $li_monpagvivper = str_replace(".", ",", $li_monpagvivper);
            $li_monpagvivper = uf_formatonumerico($li_monpagvivper);
            $ls_cuecajahoper = $data["cuecajahoper"][$li_index];
            $ls_cuelphper = $data["cuelphper"][$li_index];
            $ls_cuefidper = $data["cuefidper"][$li_index];
            $ls_cajahoper = $data["cajahoper"][$li_index];
            $ld_fecingadmpubper = $fun->uf_convertirfecmostrar($data["fecingadmpubper"][$li_index]);
            $li_anoservpreper = $data["anoservpreper"][$li_index];
            $ld_fecingper = $fun->uf_convertirfecmostrar($data["fecingper"][$li_index]);
            $ld_fecegrper = $fun->uf_convertirfecmostrar($data["fecegrper"][$li_index]);
            $ls_cauegrper = $data["cauegrper"][$li_index];
            $ls_obsegrper = $data["obsegrper"][$li_index];
            $ls_estper = $data["estper"][$li_index];
            switch ($ls_estper) {
                case "0":
                    $ls_estper = "PRE INGRESO";
                    break;
                case "1":
                    $ls_estper = "ACTIVO";
                    break;
                case "2":
                    $ls_estper = "NA";
                    break;
                case "3":
                    $ls_estper = "EGRESADO";
                    break;
            }
            $ls_despro = $data["despro"][$li_index];
            $ls_despai = $data["despai"][$li_index];
            $ls_desest = $data["desest"][$li_index];
            $ls_desmun = $data["denmun"][$li_index];
            $ls_despar = $data["denpar"][$li_index];
            print "<td><a href=\"javascript: aceptar('{$ls_codper}','{$ls_cedper}','{$ls_nomper}','{$ls_apeper}','{$ls_dirper}','{$ld_fecnacper}',";
            print "'{$ls_edocivper}','{$ls_telhabper}','{$ls_telmovper}','{$ls_sexper}','{$li_estaper}','{$li_pesper}','{$ls_codpro}','{$ls_nivacaper}',";
            print "'{$ls_codpai}','{$ls_codest}','{$ls_codmun}','{$ls_codpar}','{$ls_catper}','{$ls_cedbenper}','{$ls_numhijper}','{$ls_obsper}',";
            print "'{$ls_contraper}','{$ls_tipvivper}','{$ls_tenvivper}','{$li_monpagvivper}','{$ls_cuecajahoper}','{$ls_cuelphper}','{$ls_cuefidper}',";
            print "'{$ls_cajahoper}','{$ld_fecingadmpubper}','{$li_anoservpreper}','{$ld_fecingper}','{$ld_fecegrper}','{$ls_cauegrper}', ";
            print "'{$ls_obsegrper}','{$ls_despro}','{$ls_despai}','{$ls_desest}','{$ls_desmun}','{$ls_despar}','{$ls_estper}');\">" . $ls_codper . "</a></td>";
            print "<td>" . $ls_cedper . "</td>";
            print "<td>" . $ls_nomper . "  " . $ls_apeper . "</td>";
            print "</tr>";
        }
    }
    print "</table>";
}
		{
			$data=$io_sql->obtener_datos($rs_cta);
			$arrcols=array_keys($data);
			$totcol=count($arrcols);
			$ds->data=$data;
	
			$totrow=$ds->getRowCount("codart");
		
			for($z=1;$z<=$totrow;$z++)
			{
				print "<tr class=celdas-blancas>";
				$ls_codart=$data["codart"][$z];
				$ls_denart=$data["denart"][$z];
				$li_cosart=$data["cosart"][$z];
				$li_cosart=round($li_cosart,2);
				$li_cosart=uf_formatonumerico($li_cosart);
				$li_unidad=$data["unidad"][$z];
				$li_existencia=$data["existencia"][$z];
				$li_existencia=number_format($li_existencia,2,',','.');
			
				print "<td><a href=\"javascript: aceptar('$ls_codart','$ls_denart','$li_cosart','$li_linea','$li_unidad');\">".$ls_codart."</a></td>";
				print "<td>".$data["denart"][$z]."</td>";
				print "<td>".$li_existencia."</td>";
				print "</tr>";			
			}
		}
		else
		{
			$io_msg->message("No hay registros");
		}