list-compres.php
author viric@llimona
Wed, 08 Nov 2006 23:03:52 +0100
changeset 10 47746e0c30a3
parent 9 e3ddfccc8d4f
permissions -rw-r--r--
Arreglat un problema al xequejar les dades d'una nova compra.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
     1
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
     2
<html>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
     3
<head>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
     4
	<title>Ètxelon - Consulta de compres</title>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
     5
	<meta http-equiv="Content-Type" content="text/html;charset=iso-8859-1">
9
e3ddfccc8d4f Ported a change from the development version: no-cache to every php page.
viric@llimona
parents: 0
diff changeset
     6
	<meta http-equiv="cache-control" content="no-cache">
0
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
     7
</head>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
     8
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
     9
<body>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    10
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    11
<h1 align=center>Ètxelon</h1>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    12
<h2>Total de compres</h2>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    13
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    14
<?php
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    15
	include("getdb.inc");
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    16
	$connexio = mysql_connect($mysql_server, $mysql_user, $mysql_password);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    17
	mysql_select_db($mysql_db, $connexio);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    18
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    19
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    20
	// Crides a funcions per obtenir parametres
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    21
	$habitants = obtenir_habitants($connexio);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    22
	$num_habitants = count($habitants);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    23
?>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    24
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    25
<TABLE BORDER=1>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    26
<TR>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    27
	<TH ROWSPAN=2>Data
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    28
	<TH ROWSPAN=2>Botiga
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    29
	<TH ROWSPAN=2>Motiu
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    30
	<TH ROWSPAN=2>Preu
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    31
	<TH COLSPAN=<?php echo $num_habitants?>>Pagat
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    32
	<TH ROWSPAN=2>Excepcions
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    33
	<TH ROWSPAN=2>Eliminiar
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    34
<TR>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    35
<?php
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    36
		foreach($habitants as $i)
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    37
			echo "\t<TH>" . strtohtml($i["nom"]). "\n";
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    38
?>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    39
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    40
<?php
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    41
	$query = "SELECT UNIX_TIMESTAMP(data),botiga,motiu,preu FROM compres ORDER BY data DESC";
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    42
	$resultat = mysql_query($query, $connexio);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    43
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    44
	// Per cada compra ...
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    45
	$num_compres = 0;
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    46
	while ($fila = mysql_fetch_row($resultat))
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    47
	{
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    48
		$data = $fila[0];
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    49
		$date_shown = date("d/m/Y H:i",$data);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    50
		printf("<tr>\n\t<td><A HREF=\"view-compra?id=%s\">%s</A>\n", $data,
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    51
			$date_shown);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    52
		printf("\t<td>%s\n", strtohtml($fila[1]));
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    53
		printf("\t<td>%s\n", strtohtml($fila[2]));
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    54
		printf("\t<td align=right>%s\n", pricetohtml($fila[3]));
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    55
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    56
		// Obtenim lo que toca pagar a cadascú
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    57
		$query = "SELECT compradors.persona,compradors.pagat,compradors.toca_pagar FROM compradors,gent WHERE compradors.data = FROM_UNIXTIME($data) AND compradors.persona = gent.id AND gent.habitant = 1 ORDER BY gent.nom;";
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    58
		$resultat2 = mysql_query($query, $connexio);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    59
		
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    60
		unset($compradors);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    61
		while ($fila2 = mysql_fetch_row($resultat2))
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    62
		{
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    63
			$compradors[$fila2[0]] = array( "pagat" => $fila2[1],
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    64
											"toca_pagar" => $fila2[2]);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    65
		}
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    66
		foreach($habitants as $i)
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    67
		{
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    68
			if (isset($compradors[$i["id"]]))
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    69
				printf("\t<td align=right>%s\n", pricetohtml($compradors[$i["id"]]["pagat"]));
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    70
			else
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    71
				printf("\t<td align=right>%s\n", pricetohtml(0));
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    72
		}
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    73
		$excepcions = obtenir_excepcions($data,$connexio);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    74
		if ($excepcions != 0)
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    75
			printf("\t<td align=right>%d\n", count($excepcions));
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    76
		else
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    77
			printf("\t<td align=right>0\n");
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    78
		printf("\t<td><A HREF=\"delete-compra?id=%s\">Eliminar</A>\n", $data);
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    79
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    80
		$num_compres++;
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    81
	}
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    82
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    83
?>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    84
</TABLE>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    85
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    86
<P>Hi ha un total de <?php echo $num_compres ?> compres. </P>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    87
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    88
<HR WIDTH="70%">
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    89
<BR>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    90
<A HREF="index">Tornar al menú d'inici</A>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    91
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    92
</body>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    93
</html>
e269d7e3f581 Commit inicial. Només hi ha dues diferències de l'original:
viric@llimona
parents:
diff changeset
    94