Report orders by requester.
[readifood.git] / lib / report.php
1 <?php
2
3   if (isset($_POST['show_reports'])) {
4     header(sprintf("Location: http%s://%s/%s/from/%s/to/%s", ($_SERVER['HTTPS']) ? "s" : "", $_SERVER['HTTP_HOST'], $module, $_POST['from'], $_POST['to']));
5     exit;
6   }
7
8   function show_reports_form($from = null, $to = null) {
9     form("noprint standout");
10     echo "<p>Show reports covering the period from ";
11
12     /* Default to last month. */
13     list($y, $m, $d) = explode('-', date('Y-m-d', time()));
14     $latest = "$y-$m-$d";
15     $now = mktime(0, 0, 0, $m, $d, $y);
16     $first = mktime(0, 0, 0, $m, 1, $y);
17     $last = $first - 86400;
18     $date = date('Y-m-d', $last);
19     if (is_null($to)) $to = $date;
20     list($y, $m, $d) = explode('-', $date);
21     $first = mktime(0, 0, 0, $m, 1, $y);
22     if (is_null($from)) $from = date('Y-m-d', $first);
23     $date = $first;
24     for ($i = 0; $i < 2; $i++) {
25       $date -= 86400;
26       list ($y, $m, $d) = explode('-', date('Y-m-d', $date));
27       $date = mktime(0, 0, 0, $m, 1, $y);
28     }
29     $oldest = date('Y-m-d', $date);
30     $then = $date;
31
32     echo "<select name=\"from\">\n";
33     for ($date = $then; $date <= $now; $date += 86400) {
34       option("from", date('Y-m-d', $date), date('j F Y', $date), $from);
35     }
36     echo "</select> to <select name=\"to\">\n";
37     for ($date = $then; $date <= $now; $date += 86400) {
38       option("to", date('Y-m-d', $date), date('j F Y', $date), $to);
39     }
40     echo "</select>\n";
41
42     submit("show_reports", "Show");
43     end_form();
44   }
45
46   function check_report_dates($from, $to) {
47     list($y, $m, $d) = explode('-', $from);
48     if (! checkdate($m, $d, $y)) {
49       echo "<p>Invalid report start date!</p>\n";
50       return false;
51     }
52     $start = mktime(0, 0, 0, $m, $d, $y);
53
54     list($y, $m, $d) = explode('-', $to);
55     if (! checkdate($m, $d, $y)) {
56       echo "<p>Invalid report end date!</p>\n";
57       return false;
58     }
59     $end = mktime(0, 0, 0, $m, $d, $y);
60
61     if ($end < $start) {
62       echo "<p>Report end date is earlier than start date!</p>\n";
63       return false;
64     }
65
66     return true;
67   }
68
69   function show_requester_report(&$order_ids) {
70     echo "<h3>Orders by referrer</h3>\n";
71
72     $q = new OrderQuery;
73     $q->filterById($order_ids);
74     $q->withColumn('count(*)', 'count');
75     $q->groupByRequesterId()->addDescendingOrderByColumn('count');
76     $rows = $q->find();
77     echo "<table>\n";
78     /* XXX Join! */
79     foreach ($rows as $row) {
80       echo "<tr>\n";
81       $requester = get_contact_by_id($row->getRequesterId());
82       printf("  <td>%d</td><td>&nbsp;</td><td>%s</td>\n", $row->getCount(), htmlspecialchars($requester->getDisplayname()));
83       echo "</tr>\n";
84     }
85     echo "</table>\n";
86   }
87
88   function show_reports($from, $to) {
89     if (! check_report_dates($from, $to)) return;
90
91     echo "<p>Showing reports for the period <strong>$from</strong> to <strong>$to</strong>.</p>\n";
92
93     /* Get orders. */
94     $order_ids = array();
95     /* XXX: Order 51 changed to state delivered in May then updated in June. */
96     $dbh = Propel::getConnection();
97     $sth = $dbh->prepare("select * from OrderState o where updated=(select min(updated) from OrderState where order_id=o.order_id and state & " . $GLOBALS['STATE_DELIVERED'] . ") and updated between '$from' and '$to'");
98     $sth->execute();
99     $order_states = OrderStatePeer::populateObjects($sth);
100     foreach ($order_states as $order_state) $order_ids[] = $order_state->getOrderId();
101     $q = new OrderQuery;
102     $q->filterById($order_ids);
103
104     if (! count($order_ids)) {
105       echo "<p>No results!</p>\n";
106       return;
107     }
108
109     show_requester_report($order_ids);
110   }
111
112   if (count($parameters)) {
113     if ($parameters[0] == "from") {
114       $from = $parameters[1];
115       if ($parameters[2] == "to") $to = $parameters[3];
116       show_reports($from, $to);
117     }
118   }
119   show_reports_form($from, $to);
120 ?>