ViewStatement.prg

<?php

require_once("dms_imp_val.i");

$dms_ok=array('mode'=>'string','mem_num'=>'digits');
dms_import($dms_ok);

$stmntdir = "/home/$chome/stmnt/history/";
if (! is_readable($stmntdir)) {

print "<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=2 WIDTH=90% align='center'>
         <tr><td class='hdrc'>eStatement Directory Not Found</td></tr>
      <tr><td class='dtlc'><span class='msg'>
          Your credit union is not set up for eStatements. <br>
          Please contact HomeCU for assistance.
            </span></td></tr>
            <tr><td class='dtll'><hr></td></tr></table>";

        } else {

        if (!isset($mode)) $mode = "ENTER";
        
        $err_msg = "";
        if ($mode == "VIEW") {
            // Validate member number before trying to VIEW the e-statement
            if (trim($mem_num) == '' || !is_numeric($mem_num)) {
                $err_msg .= "<li>Please enter the member number.</li><br>";
            } else {
                $mem_num = trim($mem_num);
            }
#
            if ($err_msg != '') {
                $err_msg = "Unable to view member statement<br>$err_msg";
                $mode = "ENTER";
            }
        }

        if ($err_msg != '') {
            $err_msg = "<tr><td colspan='2' class='dtlc'>
                  <span class='msg'>$err_msg</span>
                                    </td></tr><tr><td colspan='2' class='dtl'><hr></td></tr>";
        }
        switch ($mode) {
            case "VIEW":
                // Show the TOC from the member E-Statement file
#
$stmntdir = "/home/$chome/stmnt/history/";
$stmntdir .= substr($mem_num,0,1);
$filename = "${stmntdir}/{$mem_num}";

if (is_readable($filename)) {

$pnewsLink="";
$pdffound=0;
$pnewsBar = "";
$pnewsDelim = "";

    $pdfnews = "/home/$chome/public_html/pdf/newsletter.pdf";
    $pdfkids = "/home/$chome/public_html/pdf/kidsnews.pdf";
    $pdfprime = "/home/$chome/public_html/pdf/primenews.pdf";
    $pdfsenior = "/home/$chome/public_html/pdf/seniornews.pdf";
    $pdfins = "/home/$chome/public_html/pdf/insert.pdf";
    $pdffee = "/home/$chome/public_html/pdf/fees.pdf";
    $pdfprivacy = "/home/$chome/public_html/pdf/privacy.pdf";

if (is_readable("$pdfnews")) {
    $pnewsLink .= "<a href='/fi/$chome/pdf/newsletter.pdf' target='view_pdf'>Newsletter</a> &nbsp;&nbsp;";
        $pdffound++;
}
if (is_readable("$pdfkids")) {
    $pnewsLink .= "<a href='/fi/$chome/pdf/kidsnews.pdf' target='view_pdf'>Youth Newsletter</a> &nbsp;&nbsp;";
        $pdffound++;
}
if (is_readable("$pdfprime")) {
    $pnewsLink .= "<a href='/fi/$chome/pdf/primenews.pdf' target='view_pdf'>Prime Newsletter</a> &nbsp;&nbsp;";
        $pdffound++;
}
if (is_readable("$pdfsenior")) {
    $pnewsLink .= "<a href='/fi/$chome/pdf/seniornews.pdf' target='view_pdf'>Senior Newsletter</a> &nbsp; &nbsp;";
        $pdffound++;
}

if ($pdffound) {
    $pnewsBar = 'Newsletters';
    $pnewsDelim = " and ";
}

if (is_readable("$pdfins") || is_readable("$pdffee") || is_readable("$pdfprivacy")) {
        $pnewsBar .= ($pnewsDelim . 'Statement Inserts');
}

if (is_readable("$pdfins")) {
    $pnewsLink .= " &nbsp; &nbsp; &nbsp; <a href='/fi/$chome/pdf/insert.pdf' target='view_pdf'>Statement Insert</a>";
        $pdffound++;
}

if (is_readable("$pdffee")) {
    $pnewsLink .= "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; <a href='/fi/$chome/pdf/fees.pdf' target='view_pdf'>Fee Schedule</a>";
        $pdffound++;
}
if (is_readable("$pdfprivacy")) {
    $pnewsLink .= "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; <a href='/~$chome/pdf/privacy.pdf' target='view_pdf'>Privacy Policy</a>";
        $pdffound++;
}
   if ("$pnewsLink" > "" ) {
        print "<br>
            <TABLE BORDER=0 CELLSPACING=1 CELLPADDING=2 WIDTH=90% align='center'>
            <tr><td CLASS='hdrc' colspan='3'>$pnewsBar</td></tr>
      <tr class='dtll'><td colspan='3'>&nbsp;$pnewsLink</td></tr>";
   }

print "<br><TABLE BORDER=0 CELLSPACING=1 CELLPADDING=2 WIDTH=90% align='center'>
<tr><td CLASS='hdrc' colspan='3'>ACCOUNT " . $mem_num . " eSTATEMENTS</td></tr>";


print "<tr><td class='hdrc'>Statement</td>
            <td class='hdrc'>Type</td>
            <td class='hdrc'>Period Ending</td></tr>";

// open file for reading
$zp = gzopen($filename, "r");

// read the TOC open mark
$TOCmark = gzgets($zp,4096);

// output until end of the TOC and close it.
while ($buf = gzgets($zp,4096)) {
     $buf = preg_replace("/^> /","",$buf);
     if ($buf == $TOCmark) { break; } 
            list($bd, $ldTime, $ldProc, $PerEnd, $PerType, $PerDesc) = 
                        explode("\t",$buf); 
     if ("$ldTime" != "") {
            print "<tr><td class='dtll'><a href='https://" . $_SERVER['SERVER_NAME'] .  "/cgi-bin/EStateDisp.pdf?cu=$Cu&chome=$chome&adm=1&mn=" . $mem_num . "&st_id=";
            print urlencode(rtrim($buf));
            print "/file.pdf' target='_stmnt'>$PerDesc</href></td><td class='dtll'>";
            switch ($PerType) {
                 case "M":
                        print 'Monthly';
                        break;
                 case "Q":
                        print 'Quarterly';
                        break;
                 case "SA":
                        print 'Semi-Annual';
                        break;
                 case "T":
                        print 'Tax Form';
                        break;
            }
            $PerEnd = substr($PerEnd,4,2) . "/" . substr($PerEnd,0,4);
            print "</td><td class='dtll'>$PerEnd</td></tr>\n";
     }
}

print "</table><p>";
} else {
print "
<form method='post' action='{$_SERVER['SCRIPT_NAME']}?ft={$ft}'>
        <input type='hidden' name='mode' value='ENTER'><br>
<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=2 WIDTH=90% align='center'>
         <tr><td class='hdrc'>eStatement File Not Found</td></tr>
               <tr><td class='dtlc'>Member {$mem_num}  does not have any eStatements</td></tr>
            <tr><td class='dtll'><hr></td></tr>
                        <tr> <td class='dtlc'>
        <input type='submit' value=' OK ' name='btnStmnt'></td></tr>
</table>
</form>";
        }
break;
            case "ENTER":
            default:

                print <<< print_html
                    <form name="stmntinfo" method="post" action="{$_SERVER['SCRIPT_NAME']}?ft={$ft}">
                        <input type="hidden" name="mode" value="VIEW">
                    <br>
                    <table width="90%" border=0 cellpadding=0 cellspacing=0 align='center'>
                        <tr>
                            <td colspan="2" class="hdrc" align="center">
                                View Member eStatement
                            </td>
                        </tr>
                        $err_msg
                        <tr>
                            <td class="dtlr">
                                Member Number:
                            </td>
                            <td class="dtll">
                                <input type="text" name="mem_num" value="{$mem_num}" size="12" maxlength="12">
                            </td>
                        </tr> 
                        <tr>
                            <td colspan="2" class="dtl"><hr></td>
                        </tr>
                        <tr>
                            <td class="dtl">&nbsp;</td>
                            <td class="dtll">
                                <input type="submit" value="Show Statements &nbsp;&gt;&gt;" name="btnStmnt">
                            </td>
                        </tr>
            </table></form>
   <script language="javascript">
            <!--
            document.forms[0].mem_num.focus();
            // -->
          </script>
print_html;

            break;
    }
}
?>