stmt_hist.prg

<?php
  $monLibrary= dirname(__FILE__) . "/../library";
  require_once("$monLibrary/cu_top.i");
  require_once("$monLibrary/ck_hticket.i");

# share permissions of 'stmnt_reports' instead of 'basename($_SERVER['SCRIPT_NAME'])'
  if (!CheckPerm($link, $Hu, 'stmnt_reports', $_SERVER['REMOTE_ADDR'])) {
    // ** Permissions failed
    // ** redirect to new page
    header("Location: /hcuadm/hcu_noperm.prg");
    exit;
  }

$dms_ok=array('rowid'=>'string');
dms_import($dms_ok);

    cu_header("$rowid Statement Load History");
    $filepath = "/home/" . $rowid . "/stmnt";
    if(is_readable("$filepath/summary.log")) {
    print "<form>
    <table border=1 cellpadding=1 cellspacing=1>
        <tr>
            <td class='bar' align=center colspan='8'>
                $rowid Statement Load History
            </td>
        </tr>
        <tr><th>Load Date</th>
                <th>Period</th>
                <th>Status</th>
                <th>Loaded</th>
                <th>Overwritten</th>
                <th>Dropped</th>
                <th colspan='2'>Details</th></tr>\n";

    $drop=array(" ","-",":");
    # one year maximum displayed
    $showmax = date('Y-m-d H:i:s',time() - (366 * 24 * 60 * 60));

    $fp = array();
    $fp = file("$filepath/summary.log");
    if(is_array($fp))   rsort($fp);
    foreach($fp as $buffer) {
            $buffer = rtrim($buffer);
                if("$buffer" > '') {
                list($lddate,$procid,$perdate,$pertype,$fin,$loadcount,$overcount,$dropcount,$perdesc) = explode("\t",$buffer);

                    if ($lddate < $showmax) break;

                    $procid = preg_replace('/^0*/','',$procid);
                    $fin = preg_replace('/Norm\/0$/','&nbsp;',$fin);
                    $fin = preg_replace('/\/0$/','',$fin);
                    $outlinkname=(str_replace($drop,"",$lddate) . "." . $procid . ".out");
                    $errlinkname=(str_replace($drop,"",$lddate) . "." . $procid . ".err");
                    $maelinkname=(str_replace($drop,"",$lddate) . "." . $procid . ".mae");

                    if (is_readable("/home/$rowid/stmnt/logs/$errlinkname")) {
                        $log="<a href='tfiles.prg/$rowid/stmnt/logs/$errlinkname' target='CONTENT'>$lddate</a>";
                    } else {
                        $log=$lddate;
                    }
                    if (is_readable("/home/$rowid/stmnt/logs/$outlinkname")) {
                        $outlog="<a href='tfiles.prg/$rowid/stmnt/logs/$outlinkname' target='CONTENT'>Show</a>";
                    } else {
                        $outlog="&nbsp;";
                    }
                    if (is_readable("/home/$rowid/stmnt/logs/$maelinkname")) {
                        $maelog="<a href='tfiles.prg/$rowid/stmnt/logs/$maelinkname' target='CONTENT'>MAE</a>";
                    } else {
                        $maelog="&nbsp;";
                    }
                    print "<tr><td class='dtl'>$log</td>
                                <td class='dtl'>$perdesc</td>
                                <td class='dtl'>$fin</td>
                                <td class='dtl'>$loadcount</td>
                                <td class='dtl'>$overcount</td>
                                <td class='dtl'>$dropcount</td>
                                <td class='dtl'>$outlog</td>
                                <td class='dtl'>$maelog</td>
                                </tr>\n";
                }

    }
    print "</table></form>";
 } else {
        print "<H1>Not Found</H1>
                E-Statement log (summary.log) not found for $rowid.
                <HR>";
}
    print "</body></html>";
?>