# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1528418181 -32400
# Node ID e4b929e40fa8a7042c50790c9332274f3d3e8d83
# Parent  075897fee2c0b752e8244d16849dad2d4db3a9e3
Add feature of limiting date range of POST count

diff -r 075897fee2c0 -r e4b929e40fa8 s4-funcs.sh
--- a/s4-funcs.sh	Mon May 28 10:39:32 2018 +0900
+++ b/s4-funcs.sh	Fri Jun 08 09:36:21 2018 +0900
@@ -2458,14 +2458,22 @@
       fi
     fi
   fi
+  # POST count summary
+  from=`getpar from`; to=`getpar to`
+  from_input="<input type=\"date\" name=\"from\" placeholder=\"YYYY-MM-DD\" value=\"${from}\">"
+  to_input="<input type=\"date\" name=\"to\" value=\"${to:-9999}\">"
+  fromtonote="<p>POST集計: $from_input - $to_input</p>$from - $to"
   # New entry
   sql="WITH mems AS (
 	  SELECT g.rowid, name, gecos FROM grp_mem gm LEFT JOIN gecoses g
 	  ON gm.user=g.name
 	  WHERE gname=(SELECT gname FROM grp WHERE rowid=$grid)
+	), target_article AS (
+	  SELECT id FROM article_s
+	  WHERE key='ctime' AND val BETWEEN '${from:-0000}' AND '${to:-9999}'
 	), posts AS (
   	  SELECT author, count(author) post
-	  FROM article NATURAL JOIN article_s
+	  FROM article NATURAL JOIN article_s NATURAL JOIN target_article
   	  WHERE blogid IN (SELECT id FROM blog_s
                    WHERE key='owner'
                    AND val=(SELECT gname FROM grp WHERE rowid=$grid))
@@ -2552,7 +2560,7 @@
 ${isowner:+$cmmsg$excmsg}
 `cgi_radio rm close id="x"`<label for="x">×</label>
 </div>
-<h4>$grp 参加者一覧</h4>
+<h4>$grp 参加者一覧</h4>$fromtonote
 <table class="td2r">
 `sq $db -header -html "$sql"`
 </table>