X-Git-Url: https://git.llucax.com/mecon/intranet.git/blobdiff_plain/aa4c4c45d35dfb51f40f9f04b68de2047f57f634..1bae8ffe643924423f1472eeac0f3d483e0be9f4:/sistema/www/sistemas.php
diff --git a/sistema/www/sistemas.php b/sistema/www/sistemas.php
index 0bebcda..4c81300 100644
--- a/sistema/www/sistemas.php
+++ b/sistema/www/sistemas.php
@@ -1,12 +1,16 @@
'100%',
+ 'width' => '760',
'cellspacing' => '0',
'cellpadding' => '0',
'border' => '0',
- 'align' => 'left',
- 'valign' => 'middle',
)
);
+// Agrego fila con espaciados.
+$img = new MECON_HTML_Image('/MECON/images/blanco', '', array('height' => 1));
+$img->updateAttributes(array('width' => 46));
+$fila[] = $img;
+$img->updateAttributes(array('width' => 4));
+$fila[] = $img;
+$img->updateAttributes(array('width' => 190));
+$fila[] = $img;
+$img->updateAttributes(array('width' => 20));
+$fila[] = $img;
+$img->updateAttributes(array('width' => 46));
+$fila[] = $img;
+$img->updateAttributes(array('width' => 4));
+$fila[] = $img;
+$img->updateAttributes(array('width' => 190));
+$fila[] = $img;
+$img->updateAttributes(array('width' => 20));
+$fila[] = $img;
+$img->updateAttributes(array('width' => 46));
+$fila[] = $img;
+$img->updateAttributes(array('width' => 4));
+$fila[] = $img;
+$img->updateAttributes(array('width' => 190));
+$fila[] = $img;
+$t->addRow($fila);
+
$db = IntranetDB::connect();
$sistemas = AI_Sistema::getSistemas($db);
-$pct = intval(100/COLUMNAS) . '%';
+// Me fijo que sistemas puede ver este usuario.
+require_once 'SAMURAI/Perm.php';
+$perm = new SAMURAI_Perm($_SESSION['usuario'], 0, $db);
+foreach ($sistemas as $i => $s) {
+ // Si no tiene permisos para el sistema, lo saco de la lista.
+ $perm->setSistema($s->sistema);
+ if (!$perm->tiene()) {
+ unset($sistemas[$i]);
+ }
+}
+
$sistema = @array_shift($sistemas);
while ($sistema) {
$row = array();
- for ($j = 0; $j < COLUMNAS; $j++) {
+ for ($j = 1; $j <= COLUMNAS; $j++) {
if ($sistema) {
- $img = new HTML_Image(
+ $url = $sistema->link;
+ if ($sistema->tipo == 'embperl') {
+ $url = '/Php2Embperl_Session?redirect=' . urlencode($url);
+ }
+ $img = new MECON_HTML_Image(
"/sistemas/intranet/images/$sistema->icono",
$sistema->nombre,
array(
- 'title' => $sistema->descripcion,
'border' => 0,
- 'align' => 'absmiddle',
+ 'width' => '46',
+ 'height' => '46',
)
);
- $row[] = $img->toHtml().' '.$sistema->nombre
- . '
' . $sistema->descripcion
- . ($sistema->link_ayuda
- ? (' (?)')
- : '');
+ $row[] = new MECON_HTML_Link(
+ $url,
+ $img,
+ array(),
+ array(
+ 'OnClick' =>
+ "javascript:window.open('$url','s{$sistema->sistema}',"
+ . "'width=800,height=600,scrollbars=yes');return false;",
+ 'target' => '_blank',
+ )
+ );
+ $row[] = ' ';
+ $link = new MECON_HTML_Link(
+ $url,
+ $sistema->nombre,
+ array(),
+ array(
+ 'OnClick' =>
+ "javascript:window.open('$url','s{$sistema->sistema}',"
+ . "'width=800,height=600,scrollbars=yes');return false;",
+ 'target' => '_blank',
+ 'class' => 'intranet_sistemas_txt',
+ )
+ );
+ $html = $link->toHtml() . ': ' . $sistema->descripcion;
+ if ($sistema->link_ayuda) {
+ $html .= ' ';
+ $img = new MECON_HTML_Image(
+ '/sistemas/intranet/images/sistemas_ayuda',
+ '(?)'
+ );
+ $link = new MECON_HTML_Link(
+ $sistema->link_ayuda,
+ $img,
+ array(),
+ array(
+ 'OnClick' =>
+ "javascript:window.open('{$sistema->link_ayuda}',"
+ . "'sa{$sistema->sistema}',"
+ . "'width=800,height=600,scrollbars=yes');return false;",
+ 'target' => '_blank',
+ )
+ );
+ $html .= $link->toHtml();
+ }
+ $row[] = $html;
$sistema = @array_shift($sistemas);
} else {
$row[] = ' ';
+ $row[] = ' ';
+ $row[] = ' ';
+ }
+ if ($j % (COLUMNAS)) {
+ $row[] = ' ';
}
}
- $t->addRow($row, array('width' => $pct));
+ $t->addRow(array(' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' '));
+ $t->addRow($row, array('class' => 'intranet_sistemas_txt'));
}
-$m = new HTML_DietMarco('sistemas');
+$m = new HTML_DietMarco('sistemas', 'Sistemas');
$m->addTitle('Sistemas');
+$m->addStyleDeclaration('
+ .intranet_sistemas_txt {
+ color: #003366;
+ font-family: Arial, Helvetica, sans-serif;
+ font-size: 10pt;
+ }
+ A.intranet_sistemas_txt {
+ font-weight: bold;
+ text-decoration: none;
+ }'
+);
$m->addBodyContent($t);
$m->display();