Conexion->Cerrar();
}
//________________________________________________________________________________________________________
?>
';
echo 'window.parent.resultado_crearperfilsoftware(1)'.chr(13);
echo '';
}
else{
echo '';
}
?>
texto="SELECT idaula,idperfilhard FROM ordenadores WHERE idordenador=".$ido;
$rs->Comando=&$cmd;
if (!$rs->Abrir()) return(0); // Error al abrir recordset
$rs->Primero();
if (!$rs->EOF){
$idperfilhard=$rs->campos["idperfilhard"];
$idaula=$rs->campos["idaula"];
}
}
//________________________________________________________________________________________________________
// Devuelve el nemonico de un S.O. incluido en un perfil software
// Parametros:
// - cmd:Una comando ya operativo (con conexión abierta)
// - ips: identificador del perfil software
//________________________________________________________________________________________________________
function toma_nemonico($cmd,$ips){
$cmd->texto="SELECT tiposos.nemonico FROM perfilessoft INNER JOIN perfilessoft_softwares ON perfilessoft.idperfilsoft = perfilessoft_softwares.idperfilsoft INNER JOIN softwares ON perfilessoft_softwares.idsoftware = softwares.idsoftware INNER JOIN tiposos ON softwares.idtiposo = tiposos.idtiposo WHERE tiposos.idtiposo > 0 AND perfilessoft.idperfilsoft=".$ips;
$rs=new Recordset;
$rs->Comando=&$cmd;
if (!$rs->Abrir()) return(0); // Error al abrir recordset
$rs->Primero();
if (!$rs->EOF)
return($rs->campos["nemonico"]);
else
return("");
}
//________________________________________________________________________________________________________
function Gestiona($cmd){
global $ACCION_EXITOSA; // Finalizada con exito
global $ACCION_FALLIDA; // Finalizada con errores
global $ACCION_TERMINADA; // Finalizada manualmente con indicacion de exito
global $ACCION_ABORTADA; // Finalizada manualmente con indicacion de errores
global $ACCION_SINERRORES; // Activa y con algún error
global $ACCION_CONERRORES; // Activa y sin error
global $ACCION_DETENIDA;
global $ACCION_INICIADA;
global $ACCION_FINALIZADA;
global $idcentro;
global $idaula;
global $idperfilhard;
global $cadenaip;
global $identificador;
global $nombrefuncion;
global $ejecutor;
global $tipotrama;
global $ambito;
global $idambito;
global $perfiles;
global $EJECUCION_COMANDO;
global $PROCESOS;
global $servidorhidra;
global $hidraport;
$auxsplit=split(";",$perfiles); // Toma las distintas particiones con sus perfiles
$shidra=new SockHidra($servidorhidra,$hidraport);
$cmd->CreaParametro("@tipoaccion",$EJECUCION_COMANDO,1);
$cmd->CreaParametro("@idtipoaccion",$identificador,1);
$cmd->CreaParametro("@cateaccion",$PROCESOS,1);
$cmd->CreaParametro("@ambito",$ambito,1);
$cmd->CreaParametro("@idambito",$idambito,1);
$cmd->CreaParametro("@fechahorareg",date("y/m/d H:i:s"),0);
$cmd->CreaParametro("@estado",$ACCION_INICIADA,0);
$cmd->CreaParametro("@resultado",$ACCION_SINERRORES,0);
$cmd->CreaParametro("@idcentro",$idcentro,1);
$cmd->CreaParametro("@parametros","",0);
$cmd->CreaParametro("@descripcion","",0);
$cmd->CreaParametro("@idtarea",0,1);
$cmd->CreaParametro("@idprocedimiento",0,1);
$cmd->CreaParametro("@idcomando",0,1);
for($j=0;$jParamSetValor("@parametros",$parametros);
if(!CuestionAcciones($cmd,$shidra,$parametros)) return(false);
}
return(true);
}
?>