<?xml version="1.0" encoding="UTF-8"?>
<?xml-stylesheet href="." type="application/x-xsp"?>
<?xml-stylesheet href="/wp2html.xsl.es" type="text/xsl"?>
<!--
UPDATE usercalif SET freq=freq+1, sum=sum+value, sum2=sum2+value^2 WHERE uri=referer
INSERT INTO usercalif VALUES(referer, 1, value, value^2);
SELECT uri, freq, sum, sum2, (1.0*sum/freq) AS avg, |/(1.0*sum2/freq^2-(1.0*sum/freq)^2) AS sdev FROM usercalif;
-->
<xsp:page
  language="Perl"
  xmlns:xsp="http://apache.org/xsp/core/v1" 
  xmlns:esql="http://apache.org/xsp/SQL/v2" 
  xmlns:web="http://axkit.org/NS/xsp/webutils/v1"
  xmlns:if-param="http://axkit.org/NS/xsp/if-param/v1"
  xmlns:param="http://axkit.org/NS/xsp/param/v1"
>
<webpage version="0.9" omit-fyis="yes" omit-menus="yes">
<author e-mail="hdcg@cie.unam.mx">hdcg@cie.unam.mx</author>
<title>User Feedback</title>
<body>
<ul>
<li>Referer: <web:env_param name="HTTP_REFERER"/></li>
<li>Calif: <param:value/></li>
</ul>
<esql:connection>
  <esql:driver>Pg</esql:driver>
  <esql:dburl>host=mazatl.cie.unam.mx dbname=webcie</esql:dburl>
  <esql:username>webcie</esql:username>
  <esql:password></esql:password>
  <esql:execute-query>
    <esql:query>UPDATE usercalif SET freq=freq+1, sum=sum+<param:value/>, sum2=sum2+<param:value/>^2 WHERE uri='<web:env_param name="HTTP_REFERER"/>'</esql:query>
    <esql:update-results>
      <p>CHECKPOINT 2</p>
      <p>$rv=<xsp:expr>$rv</xsp:expr></p>
      <xsp:logic>
if ($rv != 1) {
  <p>CHECKPOINT 3</p>
</xsp:logic>
  <esql:execute-query>
    <esql:query>INSERT INTO usercalif VALUES('<web:env_param name="HTTP_REFERER"/>',1,<param:value/>,<param:value/>^2)</esql:query>
    <esql:update-results>
      <p>CHECKPOINT 4</p>
    </esql:update-results>
  </esql:execute-query>
<xsp:logic>
}
      </xsp:logic>
    </esql:update-results>
  </esql:execute-query>
  <esql:execute-query>
    <esql:query>SELECT uri, freq, sum, sum2, TO_CHAR(1.0*sum/freq, '0.00') AS avg, TO_CHAR(sqrt(1.0*sum2/freq-(1.0*sum/freq)^2), '0.00') AS sdev FROM usercalif WHERE uri='<web:env_param name="HTTP_REFERER"/>';</esql:query>
    <esql:results>
      <p>Gracias por su participación</p>
      <esql:row-results>
<ul>
  <li>Página: <esql:get-string column="uri"/></li>
  <li>Freq: <esql:get-string column="freq"/></li>
  <li>Sum: <esql:get-string column="sum"/></li>
  <li>Sum2: <esql:get-string column="sum2"/></li>
  <li>Promedio: <esql:get-string column="avg"/></li>
  <li>sdev: <esql:get-string column="sdev"/></li>
</ul>
      </esql:row-results>
    </esql:results>
    <esql:no-results>
      <department>No results!</department>
    </esql:no-results>
  </esql:execute-query>
</esql:connection>

</body>
</webpage>
</xsp:page>
