← Back to branch summary

~marcelo-escobal/geined/Alianza

« back to all changes in this revision

Viewing changes to consol.php.moved

  • Committer: Cualquier Desarrollador
  • Date: 2010-01-29 21:15:22 UTC
  • Revision ID: desarrollo@marte-20100129211522-u97qh9o90mhdap04
Importación inicial

Show diffs side-by-side

added added

removed removed

Lines of Context:
consol.php.moved
 
1
<?php
 
2
include('funciones.php');
 
3
include('datos.php');
 
4
require_once "Spreadsheet/Excel/Writer.php";
 
5
autorizacion(3);
 
6
if(!$_GET['accion']){
 
7
        $accion='listado';
 
8
} else {
 
9
        $accion=$_GET['accion'];
 
10
}
 
11
switch($accion){
 
12
        case 'listado':
 
13
                listado();
 
14
                break;
 
15
        case 'exportar':
 
16
                exp_excel();
 
17
                break;
 
18
}
 
19
function listado(){
 
20
        encabezado("Consolidado anual");
 
21
        boton("Exportar a Planilla","consol.php?accion=exportar");
 
22
        boton("Volver","alianza.php?accion=financiero");
 
23
        encabezado_tabla(array("Rubro","Nombre","Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Setiembre","Octubre","Noviembre","Diciembre","Total","Promedio"));
 
24
        $sql="SELECT * FROM consolidado";
 
25
        $res = mysql_query($sql);
 
26
        $i = 0;
 
27
        while($fil = mysql_fetch_array($res)){
 
28
                fila_alterna($i);
 
29
                celda($fil['rubro']);
 
30
                $fil_cta = buscar_registro("cuentas","rubro",$fil['rubro']);
 
31
                $nombre = $fil_cta['nombre'];
 
32
                celda($nombre);
 
33
                linea_moneda($fil['enero']);
 
34
                linea_moneda($fil['febrero']);
 
35
                linea_moneda($fil['marzo']);
 
36
                linea_moneda($fil['abril']);
 
37
                linea_moneda($fil['mayo']);
 
38
                linea_moneda($fil['junio']);
 
39
                linea_moneda($fil['julio']);
 
40
                linea_moneda($fil['agosto']);
 
41
                linea_moneda($fil['setiembre']);
 
42
                linea_moneda($fil['octubre']);
 
43
                linea_moneda($fil['noviembre']);
 
44
                linea_moneda($fil['diciembre']);
 
45
                linea_moneda(0);
 
46
                linea_moneda(0);
 
47
                $i = $i +1;
 
48
                echo '</tr>';
 
49
        }
 
50
        fin_tabla();
 
51
        boton("Volver","alianza.php?accion=financiero");
 
52
        fin();
 
53
}
 
54
function exp_excel(){
 
55
        /* Recuperación de variables */
 
56
        $xls =& new Spreadsheet_Excel_Writer();
 
57
        $xls->send("consolidado.xls");
 
58
        $sheet =& $xls->addWorksheet('Consolidado');
 
59
        for ( $i=0;$i<11;$i++ ) {
 
60
                // Use PHP's decbin() function to convert integer to binary
 
61
                $sheet->write($i,0,decbin($i));
 
62
        }
 
63
        // Finish the spreadsheet, dumping it to the browser
 
64
        $f = 1;
 
65
        $sheet->write(0,0,"Rubro");
 
66
        $sheet->write(0,1,"Nombre");
 
67
        $sheet->write(0,2,"Enero");
 
68
        $sheet->write(0,3,"Febrero");
 
69
        $sheet->write(0,4,"Marzo");
 
70
        $sheet->write(0,5,"Abril");
 
71
        $sheet->write(0,6,"Mayo");
 
72
        $sheet->write(0,7,"Junio");
 
73
        $sheet->write(0,8,"Julio");
 
74
        $sheet->write(0,9,"Agosto");
 
75
        $sheet->write(0,10,"Setiembre");
 
76
        $sheet->write(0,11,"Octubre");
 
77
        $sheet->write(0,12,"Noviembre");
 
78
        $sheet->write(0,13,"Diciembre");
 
79
        $sheet->write(0,14,"Total");
 
80
        $sheet->write(0,15,"Promedio");
 
81
        $sql = "SELECT * FROM consolidado ORDER BY rubro";
 
82
        $res = mysql_query($sql);
 
83
        while($fil = mysql_fetch_array($res)){
 
84
                $sheet->writeNumber($f,0,$fil['rubro']);
 
85
                $nom = iconv("UTF8","ISO-8859-1", $fil['nombre']);
 
86
                $sheet->write($f,1,$nom);
 
87
                $sheet->writeNumber($f,2,$fil['enero']);
 
88
                $sheet->writeNumber($f,3,$fil['febrero']);
 
89
                $sheet->writeNumber($f,4,$fil['marzo']);
 
90
                $sheet->writeNumber($f,5,$fil['abril']);
 
91
                $sheet->writeNumber($f,6,$fil['mayo']);
 
92
                $sheet->writeNumber($f,7,$fil['junio']);
 
93
                $sheet->writeNumber($f,8,$fil['julio']);
 
94
                $sheet->writeNumber($f,9,$fil['agosto']);
 
95
                $sheet->writeNumber($f,10,$fil['setiembre']);
 
96
                $sheet->writeNumber($f,11,$fil['octubre']);
 
97
                $sheet->writeNumber($f,12,$fil['noviembre']);
 
98
                $sheet->writeNumber($f,13,$fil['diciembre']);
 
99
                $fila_calc = $f +1;
 
100
                $sheet->writeFormula($f,14,"=sum(C".$fila_calc.":N".$fila_calc.")");
 
101
                $f = $f +1;                             
 
102
        }
 
103
        $xls->close();
 
104
        redirigir("consol.php?accion=listado");
 
105
}
 
106
?>