StmntHist.prg

<?php
require_once("$admLibrary/ck_aticket.i");

    $SMRYLOG="/home/$chome/stmnt/summary.log";
    $date=(strftime ("%Y:%m:%d", time()));
    list($year, $month, $day) = explode(":",$date);
    $timestamp = mktime (0,0,0,$month-25,$day,$year);
    $CUTOFF=(strftime ("%Y%m%d", $timestamp));

    print "<table border=0 align=center width='90%'>";
  print "<tr><td class='dtl' align='left'>";
  print "<a href='https://{$_SERVER['SERVER_NAME']}/admbin/main.prg?ft=41'>Report Menu</a>&nbsp;&nbsp;&nbsp;</td><td class='dtl' align='right'>&nbsp;</td></tr></table>";

    print "<br><table border=0 align=center width='90%'>";
    print "<tr><td class='hdrc' colspan='3'>E-Statement Processing Count</td></tr>";

    print "<tr><th><font size=2>Count</font></th><th><font size=2>Load Date</font></th><th><font size=2>Period</font></th></tr>";
    if (is_readable("$SMRYLOG")) {
        $lines = file ($SMRYLOG);
        $lines = array_reverse($lines);
        $rbg="odd";
        foreach ($lines as $line_num => $line) {
            $f=explode("\t",$line);
            $lddate=str_replace("-","",substr($f[0],0,10));
            $ldcount=(intval($f[5]) - intval($f[6]));
            $ldstat=$f[4];
            $ldper=$f[8];
            if ( ${ldcount} != 0 && ${ldstat} != 'Abort' && ${lddate} >= $CUTOFF) {
                $rbg == "even"  ? $rbg="odd" : $rbg = "even";
                print "<tr class='$rbg'><td align='right'>${ldcount}</td><td>$f[0]</td><td>${ldper}</td></tr>\n" ;
            }
        }
    } else {
        print "<tr class='odd'>
                     <td colspan='3' align='center'>No E-Statement History Found!</td></tr>";
    }
        print "</table></body></html>";
?>