Se pasa Php2Embperl_Session.epl al repositorio scripts y se actualiza documentacion.

[mecon/intranet.git] / sistema / www / sistemas.php

diff --git a/sistema/www/sistemas.php b/sistema/www/sistemas.php
index 46e6310aad0b0f2954febdfe12c65ee579ba2ffe..40c6bcea512d65e3a323e565f06b646a35536e12 100644 (file)
--- a/sistema/www/sistemas.php
+++ b/sistema/www/sistemas.php
@@ -72,7 +72,7 @@ while ($sistema) {
         if ($sistema) {
             $url = $sistema->link;
             if ($sistema->tipo == 'embperl') {
-                $url .= '?soy_embperl=1';
+                $url = '/Php2Embperl_Session?redirect=' . urlencode($url);
             }
             $img = new MECON_HTML_Image(
                     "/sistemas/intranet/images/$sistema->icono",
@@ -88,6 +88,9 @@ while ($sistema) {
                 $img,
                                array(),
                        array(
+                    'OnClick' =>
+                        "javascript:window.open('$url','s{$sistema->sistema}',"
+                        . "'width=790,height=500,scrollbars=yes');return false;",
                                    'target' => '_blank',
                                )
                    );
@@ -97,6 +100,9 @@ while ($sistema) {
                 $sistema->nombre,
                                array(),
                        array(
+                    'OnClick' =>
+                        "javascript:window.open('$url','s{$sistema->sistema}',"
+                        . "'width=790,height=500,scrollbars=yes');return false;",
                                    'target' => '_blank',
                     'class' => 'intranet_sistemas_txt',
                                )
@@ -113,6 +119,10 @@ while ($sistema) {
                                        $img,
                                        array(),
                                        array(
+                        'OnClick' =>
+                            "javascript:window.open('{$sistema->link_ayuda}',"
+                            . "'sa{$sistema->sistema}',"
+                            . "'width=790,height=500,scrollbars=yes');return false;",
                         'target' => '_blank',
                     )
                                );
@@ -134,7 +144,7 @@ while ($sistema) {
 }
 
 $m = new HTML_DietMarco('sistemas', 'Sistemas');
-$m->addTitle('Sistemas');
+//$m->addTitle('Sistemas');
 $m->addStyleDeclaration('
     .intranet_sistemas_txt {
         color: #003366;