1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
<?php
include('datos.php');
//include('gnuplot.php');
function escribir_archivo($archivo,$datos){
$fh = fopen($archivo, 'w') or die("can't open file");
fwrite($fh,"0\r\n");
for($i=2;$i<=13;$i++){
fwrite($fh,$datos[$i]."\r\n");
}
fclose($fh);
}
function generar_archivos($titulo,$sql){
$res = mysql_query($sql);
$a = mysql_fetch_row($res);
$b = mysql_fetch_row($res);
$c = mysql_fetch_row($res);
$d = mysql_fetch_row($res);
$e = mysql_fetch_row($res);
escribir_archivo("txt/".$titulo.'_2003.txt',$a);
escribir_archivo("txt/".$titulo.'_2004.txt',$b);
escribir_archivo("txt/".$titulo.'_2005.txt',$c);
escribir_archivo("txt/".$titulo.'_2006.txt',$d);
escribir_archivo("txt/".$titulo.'_2007.txt',$e);
}
function generar_graficos(){
$sql_cta_cte_mes = 'SELECT * FROM balcom WHERE item LIKE "Banco 200%"';
$sql_cta_cte_acu = 'SELECT * FROM balcom WHERE item LIKE "Banco Acu 200%"';
$sql_egresos_mes = 'SELECT * FROM balcom WHERE item LIKE "Egresos 200%"';
$sql_egresos_acu = 'SELECT * FROM balcom WHERE item LIKE "Egresos Acu 200%"';
$sql_ingresos_mes='SELECT * FROM balcom WHERE item LIKE "Ingresos 200%"';
$sql_ingresos_acu='SELECT * FROM balcom WHERE item LIKE "Ingresos Acu 200%"';
$sql_ganancia_mes ='SELECT * FROM balcom WHERE item LIKE "Ganancia 200%"';
$sql_ganancia_acu ='SELECT * FROM balcom WHERE item LIKE "Ganancia Acu 200%"';
generar_archivos("cta_cte_mes",$sql_cta_cte_mes);
generar_archivos("cta_cte_acu",$sql_cta_cte_acu);
generar_archivos("egresos_mes",$sql_egresos_mes);
generar_archivos("egresos_acu",$sql_egresos_acu);
generar_archivos("ingresos_mes",$sql_ingresos_mes);
generar_archivos("ingresos_acu",$sql_ingresos_acu);
generar_archivos("ganancia_mes",$sql_ganancia_mes);
generar_archivos("ganancia_acu",$sql_ganancia_acu);
exec('gnuplot graficos.gp');
}
function escribir_datos($filtro,$file){
unlink($file);
$sql = 'SELECT * FROM balcom WHERE item = "'.$filtro.'"';
$res = mysql_query($sql);
$fil = mysql_fetch_array($res);
$handle = fopen($file, 'w');
fwrite($handle, '0');
fwrite($handle, $fil['enero']);
fwrite($handle, $fil['febrero']);
fwrite($handle, $fil['marzo']);
fwrite($handle, $fil['abril']);
fwrite($handle, $fil['mayo']);
fwrite($handle, $fil['junio']);
fwrite($handle, $fil['julio']);
fwrite($handle, $fil['agosto']);
fwrite($handle, $fil['setiembre']);
fwrite($handle, $fil['octubre']);
fwrite($handle, $fil['noviembre']);
fwrite($handle, $fil['diciembre']);
fclose($handle);
}
function generar_datos(){
//exportar datos desde mysql (balcom) hasta cada archivo.txt
escribir_datos("Banco 2003","txt/cta_cte_mes_2003.txt");
escribir_datos("Banco 2004","txt/cta_cte_mes_2004.txt");
escribir_datos("Banco 2005","txt/cta_cte_mes_2005.txt");
escribir_datos("Banco 2006","txt/cta_cte_mes_2006.txt");
escribir_datos("Banco 2007","txt/cta_cte_mes_2007.txt");
escribir_datos("Banco Acu 2003","txt/cta_cte_acu_2003.txt");
escribir_datos("Banco Acu 2004","txt/cta_cte_acu_2004.txt");
escribir_datos("Banco Acu 2005","txt/cta_cte_acu_2005.txt");
escribir_datos("Banco Acu 2006","txt/cta_cte_acu_2006.txt");
escribir_datos("Banco Acu 2007","txt/cta_cte_acu_2007.txt");
escribir_datos("Egresos Acu 2003","txt/egresos_acu_2003.txt");
escribir_datos("Egresos Acu 2004","txt/egresos_acu_2004.txt");
escribir_datos("Egresos Acu 2005","txt/egresos_acu_2005.txt");
escribir_datos("Egresos Acu 2006","txt/egresos_acu_2006.txt");
escribir_datos("Egresos Acu 2007","txt/egresos_acu_2007.txt");
escribir_datos("Ganancia 2003","txt/ganancia_mes_2003.txt");
escribir_datos("Ganancia 2004","txt/ganancia_mes_2004.txt");
escribir_datos("Ganancia 2005","txt/ganancia_mes_2005.txt");
escribir_datos("Ganancia 2006","txt/ganancia_mes_2006.txt");
escribir_datos("Ganancia 2007","txt/ganancia_mes_2007.txt");
escribir_datos("Egresos 2003","txt/egresos_mes_2003.txt");
escribir_datos("Egresos 2004","txt/egresos_mes_2004.txt");
escribir_datos("Egresos 2005","txt/egresos_mes_2005.txt");
escribir_datos("Egresos 2006","txt/egresos_mes_2006.txt");
escribir_datos("Egresos 2007","txt/egresos_mes_2007.txt");
escribir_datos("Ingresos Acu 2003","txt/ingresos_acu_2003.txt");
escribir_datos("Ingresos Acu 2004","txt/ingresos_acu_2004.txt");
escribir_datos("Ingresos Acu 2005","txt/ingresos_acu_2005.txt");
escribir_datos("Ingresos Acu 2006","txt/ingresos_acu_2006.txt");
escribir_datos("Ingresos Acu 2007","txt/ingresos_acu_2007.txt");
escribir_datos("Ganancia Acu 2003","txt/ganancia_acu_2003.txt");
escribir_datos("Ganancia Acu 2004","txt/ganancia_acu_2004.txt");
escribir_datos("Ganancia Acu 2005","txt/ganancia_acu_2005.txt");
escribir_datos("Ganancia Acu 2006","txt/ganancia_acu_2006.txt");
escribir_datos("Ganancia Acu 2007","txt/ganancia_acu_2007.txt");
escribir_datos("Ingresos 2003","itxt/ngresos_mes_2003,txt");
escribir_datos("Ingresos 2004","txt/ingresos_mes_2004,txt");
escribir_datos("Ingresos 2005","txt/ingresos_mes_2005,txt");
escribir_datos("Ingresos 2006","txt/ingresos_mes_2006,txt");
escribir_datos("Ingresos 2007","txt/ingresos_mes_2007,txt");
escribir_datos("Egresos Acu 2003","txt/egresos_acu_2003.txt");
escribir_datos("Egresos Acu 2004","txt/egresos_acu_2004.txt");
escribir_datos("Egresos Acu 2006","txt/egresos_acu_2006.txt");
escribir_datos("Egresos Acu 2005","txt/egresos_acu_2005.txt");
escribir_datos("Egresos Acu 2007","txt/egresos_acu_2007.txt");
}
?>
|