Softwares Combinacionales
Perfiles Softwares combinables 


Software Combinacional:  CreaTablaVistaXml(); // Crea arbol de configuraciones $flotante=new MenuContextual(); // Instancia clase $XMLcontextual=CreacontextualXMLTipos_H(); // Crea menu contextual de tipos ?>
CadenaConexion($strcn[0],$strcn[1],$strcn[2],$strcn[3],$strcn[4]); if (!$cn->Abrir()) return (false); $cmd->Conexion=&$cn; return($cmd); } /*======================================================= Devuelve una cadena con formato XML de toda la información de las configuraciones softwares Parametros: - idsoftcombinacional: El identificador del software combinacional - cmd:Una comando ya operativo ( con conexión abierta) ----------------------------------------------------------------------------------------------------*/ function CreaArbol($cmd,$idsoftcombinacional){ $cadenaXML=SubarbolXML_PerfilesSoftwaresParaCombi($cmd,$idsoftcombinacional); return($cadenaXML); } //------------------------------------------------------------------------------------------------------------------------------------------------- function SubarbolXML_PerfilesSoftwaresParaCombi($cmd,$idsoftcombinacional){ $cadenaXML=""; $rs=new Recordset; $cmd->texto="SELECT perfilessoft.idperfilsoft ,perfilessoft.descripcion as pdescripcion FROM perfilessoft "; $cmd->texto.=" LEFT OUTER JOIN perfileshard_perfilessoft ON perfileshard_perfilessoft.idperfilsoft=perfilessoft.idperfilsoft" ; $cmd->texto.=" LEFT OUTER JOIN phard_psoft_softcombinacional ON phard_psoft_softcombinacional.idphardidpsoft=perfileshard_perfilessoft .idphardidpsoft" ; $cmd->texto.=" WHERE phard_psoft_softcombinacional.idsoftcombinacional=".$idsoftcombinacional; $cmd->texto.=" GROUP BY perfilessoft.idperfilsoft ,perfilessoft.descripcion"; $cmd->texto.=" ORDER by perfilessoft.descripcion"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); while (!$rs->EOF){ $cadenaXML.='campos["pdescripcion"].'"'; $cadenaXML.='>'; $cadenaXML.=SubarbolXML_PerfilesHardwaresParaCombi($cmd,$rs->campos["idperfilsoft"],$idsoftcombinacional); $cadenaXML.=''; $rs->Siguiente(); } $rs->Cerrar(); return($cadenaXML); } //------------------------------------------------------------------------------------------------------------------------------------------------- function SubarbolXML_PerfilesHardwaresParaCombi($cmd,$idperfilsoft,$idsoftcombinacional){ $cadenaXML=""; $rs=new Recordset; $cmd->texto="SELECT perfileshard.idperfilhard ,perfileshard.descripcion as pdescripcion FROM perfileshard "; $cmd->texto.=" LEFT OUTER JOIN perfileshard_perfilessoft ON perfileshard_perfilessoft.idperfilhard=perfileshard.idperfilhard" ; $cmd->texto.=" LEFT OUTER JOIN phard_psoft_softcombinacional ON phard_psoft_softcombinacional.idphardidpsoft=perfileshard_perfilessoft .idphardidpsoft" ; $cmd->texto.=" WHERE phard_psoft_softcombinacional.idsoftcombinacional=".$idsoftcombinacional." AND perfileshard_perfilessoft.idperfilsoft=".$idperfilsoft ; $cmd->texto.=" ORDER by perfileshard.descripcion"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset $rs->Primero(); if ($rs->numeroderegistros>0) { $cadenaXML.='EOF){ $cadenaXML.='campos["pdescripcion"].'"'; $cadenaXML.='>'; $cadenaXML.=''; $rs->Siguiente(); } if ($rs->numeroderegistros>0) $cadenaXML.=''; $rs->Cerrar(); return($cadenaXML); } /*=================================================== Menus contextuales ---------------------------------------------------------------------------------------------*/ function CreacontextualXMLTipos_H(){ $layerXML='