texto="SELECT idtarea FROM trabajos_tareas WHERE idtrabajo=".$idtrabajo. " ORDER BY trabajos_tareas.orden"; $rs->Comando=&$cmd; if ($rs->Abrir()){ echo '

  '.$TbMsg[0].'
'.$descripciontrabajo.'

'; while (!$rs->EOF){ pintatareas($cmd,$rs->campos["idtarea"]); $rs->Siguiente(); } } } ?> texto="SELECT idtareacomando FROM tareas_comandos WHERE idtarea=".$idtarea. " ORDER BY idtareacomando,orden"; $rs->Comando=&$cmd; if ($rs->Abrir()){ $descripciontarea=TomaDato($cmd,0,"tareas",$idtarea,"idtarea","descripcion"); echo '

  '.$TbMsg[1].'
'.$descripciontarea.'

'; echo ''.chr(13); echo '
'; $tabla_parametros=""; // Tabla para localizar parametros $cont_parametros=0; // Contador de la tabla CreaTablaParametros($cmd); // Crea tabla especificaciones de parametros while (!$rs->EOF){ pintacomandos($cmd,$rs->campos["idtareacomando"]); $rs->Siguiente(); } echo '
'; } } //________________________________________________________________________________________________________ function pintacomandos($cmd,$idtareacomando){ global $TbMsg; global $AMBITO_CENTROS; global $AMBITO_GRUPOSAULAS; global $AMBITO_AULAS; global $AMBITO_GRUPOSORDENADORES; global $AMBITO_ORDENADORES; global $tabla_parametros; global $cont_parametros; $rs=new Recordset; $cmd->texto="SELECT tareas_comandos.*, comandos.visuparametros FROM tareas_comandos "; $cmd->texto.=" INNER JOIN comandos ON comandos.idcomando=tareas_comandos.idcomando"; $cmd->texto.=" WHERE tareas_comandos.idtareacomando=".$idtareacomando; $rs->Comando=&$cmd; if (!$rs->Abrir()) return($cadenaXML); // Error al abrir recordset if ($rs->EOF) return(""); $HTMLparametros=''.chr(13); $HTMLparametros.=''.chr(13); $HTMLparametros.= ''.chr(13); $HTMLparametros.= ' '.chr(13); $HTMLparametros.= ''.chr(13); $textambito=""; $urlimg=""; switch($rs->campos["ambito"]){ case $AMBITO_CENTROS : $urlimg='../images/iconos/centros.gif'; $textambito="Centros"; $nombre=TomaDato($cmd,0,'centros',$rs->campos["idambito"],'idcentro','nombrecentro'); break; case $AMBITO_GRUPOSAULAS : $urlimg='../images/iconos/carpeta.gif'; $textambito="Grupos de aulas"; $nombre=TomaDato($cmd,0,'grupos',$rs->campos["idambito"],'idgrupo','nombregrupo'); break; case $AMBITO_AULAS : $urlimg='../images/iconos/aula.gif'; $textambito="Aulas"; $nombre=TomaDato($cmd,0,'aulas',$rs->campos["idambito"],'idaula','nombreaula'); break; case $AMBITO_GRUPOSORDENADORES : $urlimg='../images/iconos/carpeta.gif'; $textambito="Grupos de ordenadores"; $nombre=TomaDato($cmd,0,'gruposordenadores',$rs->campos["idambito"],'idgrupo','nombregrupoordenador'); break; case $AMBITO_ORDENADORES : $urlimg='../images/iconos/ordenador.gif'; $textambito="Ordenadores"; $nombre=TomaDato($cmd,0,'ordenadores',$rs->campos["idambito"],'idordenador','nombreordenador'); break; } $HTMLparametros.= ''.chr(13); $HTMLparametros.= ''.chr(13); $HTMLparametros.= ''; $HTMLparametros.= ''.chr(13); $HTMLparametros.= ''.chr(13); $HTMLparametros.= ''; $auxVP=split(";",$rs->campos["visuparametros"]); // Parametros visualizables $auxP=split(chr(13),$rs->campos["parametros"]); // Recorre parametros para visualizar los que así sean for ($i=0;$i=0){ $auxtabla_parametros=$tabla_parametros[$posp][1]; $HTMLparametros.=''.chr(13); $HTMLparametros.= ''.chr(13); if($auxtabla_parametros["tipopa"]==1){ $valor=TomaDato($cmd,0,$auxtabla_parametros["nomtabla"],$dualparam[1],$auxtabla_parametros["nomidentificador"],$auxtabla_parametros["nomliteral"]); }else $valor=$dualparam[1]; if($dualparam[0]!="iph") $HTMLparametros.= ''.chr(13); else{ $tablaipes=PintaOrdenadores($cmd,$valor); $HTMLparametros.= ''.chr(13); } $HTMLparametros.= ''.chr(13); } } } } $HTMLparametros.= '
 '.$TbMsg[2].'  '.$TbMsg[3].'
 '.$TbMsg[4].'  '.$textambito.' '; $HTMLparametros.= ' 
 '.$TbMsg[5].'  '.$nombre.' 
 '.$auxtabla_parametros["descripcion"].'  '.$valor.'  '.$tablaipes.' 
'.chr(13); $descripcioncomando=TomaDato($cmd,0,"comandos",$rs->campos["idcomando"],"idcomando","descripcion"); echo '

  '.$descripcioncomando.''; echo $HTMLparametros; echo '

'; } //________________________________________________________________________________________________________ function PintaOrdenadores($cmd,$cadenaip){ $auxP=split(";",$cadenaip); if(sizeof($auxP)<1) return(""); $clauslaIN="'".$auxP[0]."'"; for ($i=1;$itexto=" SELECT nombreordenador,ip FROM ordenadores INNER JOIN aulas ON aulas.idaula=ordenadores.idaula WHERE ip IN(".$clauslaIN.") ORDER by nombreaula,nombreordenador"; $rs->Comando=&$cmd; if (!$rs->Abrir()) return(""); // Error al abrir recordset $tablaHtml=''; while (!$rs->EOF){ $contor++; $tablaHtml.= ''; if($contor>$maxord){ $contor=0; $tablaHtml.=''; } $rs->Siguiente(); } $tablaHtml.=''; $tablaHtml.= '

'.$rs->campos["nombreordenador"].'
'; return($tablaHtml); } ?>