]> git.llucax.com Git - mecon/meconlib.git/blob - marco/php/marco/Script.php
4054e115a670358650895f765407d2b61168b6ff
[mecon/meconlib.git] / marco / php / marco / Script.php
1 <?php
2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
3 // +----------------------------------------------------------------------+
4 // | PHP Version 4                                                        |
5 // +----------------------------------------------------------------------+
6 // | Copyright (c) 1997-2003 The PHP Group                                |
7 // +----------------------------------------------------------------------+
8 // | This source file is subject to version 2.02 of the PHP license,      |
9 // | that is bundled with this package in the file LICENSE, and is        |
10 // | available at through the world-wide-web at                           |
11 // | http://www.php.net/license/2_02.txt.                                 |
12 // | If you did not receive a copy of the PHP license and are unable to   |
13 // | obtain it through the world-wide-web, please send a note to          |
14 // | license@php.net so we can mail you a copy immediately.               |
15 // +----------------------------------------------------------------------+
16 // | Created: Mon Apr 14 16:23:22 2003
17 // | Author:  Martin Marrese <mmarre@mecon.gov.ar>
18 // +----------------------------------------------------------------------+
19 //
20 // $Id$
21 // $Author$
22 // $URL$
23 // $Date$
24 // $Rev$
25 //
26
27 require_once 'PEAR.php';
28
29 define ('SCRIPT_GENERICO', 'www/js/scripts.js');
30
31 // +X2C Class 11 :Script
32 /**
33  * Clase para el manejo de los scripts del sistema. En primera instancia agrega el archivo de script generico que permite el manejo de secciones, etc. Ademas se pueden agregar archivos de script propios del sistema.
34  *
35  * @access public
36  */
37 class Script {
38     /**
39      * Nombre del directorio en donde se encuentra el sistema. Es case sensitive.
40      *
41      * @var    string $directorio
42      *
43      * @access private
44      */
45     var $_directorio;
46
47     /**
48      * Array con los nombre de los archivos de script que se fueron agregando.
49      *
50      * @var    array(string) $archivos
51      *
52      * @access private
53      */
54     var $_archivos;
55
56     // ~X2C
57
58     // +X2C Operation 42
59     /**
60      * Constructor. Recibe como parametro el directorio en donde se encuentra el sistema. Es case sensitive.
61      *
62      * @param  string $directorio Nombre del directorio en donde se ecuentra el sistema.
63      *
64      * @return void
65      *
66      * @access public
67      */
68     function Script($directorio) // ~X2C
69     {
70         $this->_directorio  = $directorio;
71         $this->_archivos    = array ();
72     }
73     // -X2C
74
75     // +X2C Operation 43
76     /**
77      * Funcion que devuelve un string html con la informacion a imprimir en pantalla.
78      *
79      * @return string
80      *
81      * @access public
82      */
83     function toHtml() // ~X2C
84     {
85         $TEXTO = "\n".'<script language="JavaScript" src="'.SCRIPT_GENERICO.'"></script>'."\n";        
86         foreach ($this->_archivos as $archivo) {
87             $TEXTO.= "\n".'<script language="JavaScript" src="www/sistemas/'.$this->_directorio.'/www/js/"'.$archivo.'></script>'."\n";
88         }        
89         return $TEXTO;
90     }
91     // -X2C
92
93     // +X2C Operation 45
94     /**
95      * Funcion que permite agregar un archivo de script nuevo.
96      *
97      * @param  string $archivo Nombre del archivo a agregar.
98      *
99      * @return void
100      *
101      * @access public
102      */
103     function agregarArchivo($archivo) // ~X2C
104     {
105         array_push($this->_archivos, $archivo);
106     }
107     // -X2C
108
109 } // -X2C Class :Script
110
111 ?>