"; print "opener.location.href='../sigesp_conexion.php';"; print "close();"; print ""; } $la_datemp=$_SESSION["la_empresa"]; if(!array_key_exists("campo",$_POST)) { $ls_campo="codpro"; $ls_orden="ASC"; } else { $ls_campo=$_POST["campo"]; $ls_orden=$_POST["orden"]; } ?>

uf_conectar(); $io_msg=new class_mensajes(); $io_sql=new class_sql($io_connect); $io_data=new class_datastore(); $io_funcion=new class_funciones(); $ls_codemp=$la_datemp["codemp"]; ?>

Catálogo de Organismos Ejecutores de Obras

"; print ""; print "Código"; print "Nombre"; $ls_cadena=" SELECT codpro,nompro,telpro,dirpro,nomresppro,faxpro,emapro,rifpro,nitpro ". " FROM sob_propietario". " WHERE codemp='".$ls_codemp."' Order by $ls_campo $ls_orden"; $rs_datauni=$io_sql->select($ls_cadena); if($rs_datauni==false&&($io_sql->message!="")) { $io_msg->message("No hay registros"); } else { if($row=$io_sql->fetch_row($rs_datauni)) { $la_unidades=$io_sql->obtener_datos($rs_datauni); $io_data->data=$la_unidades; $totrow=$io_data->getRowCount("codpro"); for($z=1;$z<=$totrow;$z++) { print ""; $codpro=$io_data->getValue("codpro",$z); $nompro=$io_data->getValue("nompro",$z); $telpro=$io_data->getValue("telpro",$z); $dirpro=$io_data->getValue("dirpro",$z); $nomresppro=$io_data->getValue("nomresppro",$z); $faxpro=$io_data->getValue("faxpro",$z); $emapro=$io_data->getValue("emapro",$z); $rifpro=$io_data->getValue("rifpro",$z); $nitpro=$io_data->getValue("nitpro",$z); $rif1=substr($rifpro,0,1); $rif2=substr($rifpro,1,8); $rif3=substr($rifpro,8,1); print "".$codpro.""; print "".$nompro.""; print ""; } } else { $io_msg->message("No se han creado Organismos que cumplan con estos parámetros de búsqueda"); } } print ""; ?>