SetFlag.prg

<?php

$dms_ok=array('action'=>'string','reset_bit'=>'array', 'reset_doc'=>'array');
dms_import_v2($SYSENV, "SETFLAG", $dms_ok);

$SYSENV["SETFLAG"]["helpicon"]="<img src='/IMAGES/q1.gif' border=0 alt='View Help' align='top'>";
$SYSENV["SETFLAG"]["helpicon2"]="<img src='/IMAGES/q2.gif' border=0 alt='View Help' align='top'>";
$SYSENV["SETFLAG"]["helpdoc"]="SetFlagHelp.html";
$SYSENV["SETFLAG"]["self"] = "$menu_link?ft=24";
extract($SYSENV["SETFLAG"]);
extract($SYSENV["TOP"]);

$main = basename($_SERVER['SCRIPT_NAME']);
  // Determine if we are updating flags, saving suppression list, or displaying the form
        switch ($act) {
            case "U2":
            case "S":
            case "E":
            break;
            default:
            $act = "E";
        }

  if ($act == "E"):
    $CU = strtoupper( $Cu );
    // get a list of any CMS popups that the member might have said not to show again;
    // only get the ones set up for the CU and with responseon not null
    $sql = "select docs.docsid, docs.docsname, docs.docstitle, docs.docsdesc, docs.docsresponsetype
              from cucmsdocs docs
              join cucmsfrags frags on frags.docsid = docs.docsid
                and frags.cu = '{$CU}'
              where docs.docsresponsetype in ('D', 'A', 'E', 'P')";
    $sth = db_query($sql, $dbh);

    // save the list
    $upgradeList = array();
    $row = 0;
    while ( $popRow = db_fetch_array($sth, $row++) ) {
      $upgradeList[] = $popRow;
    }
?>
<script language="JAVASCRIPT">
<!--
    function show_help(marker)
{
helpwin=window.open(marker,"_Help","toolbar=1,location=0,directories=0,status=1,menubar=0,scrollbars=1,resizable=0,width=500,height=340");
helpwin.focus();
    }
// -->
         </script>

<?php
  if ( count( $upgradeList ) > 0 ) {
    // separate out into list of member dismissible and CU dismissible; only the persistent ones are CU dismissible
    $memberDismissibleList = array();
    $cuDismissibleList = array();
    for ( $i = 0; $i < count( $upgradeList ); $i++ ) {
      if ( $upgradeList[$i]["docsresponsetype"] == "P" )
        $cuDismissibleList[] = $upgradeList[$i];
      else
        $memberDismissibleList[] = $upgradeList[$i];
    }
?>
  <form action="<?php echo $self ?>&act=U2" method="post">
  <br>
  <br>
  <div align="center">
    <table width="100%" border=0 cellpadding=4 cellspacing=1>
<?php
  // show the member-dismissible list
  if ( count( $memberDismissibleList ) ) {
?>
      <tr><td class="bar" colspan="2" align="center">Reset Member Pop-Ups and Promos <a href='javascript:show_help("<?php echo $helpdoc ?>#overview");'><?php echo $helpicon ?></a></td></tr>
      <tr><td class="msg" colspan="2" align="left">
                By default, Pop-up messages and Member-Dismissible Login Promos are shown to all members. Members may dismiss the message or promo by specifying "Don't Tell Me Again".  <br><br>When you reset these flags, all members will see the related message or promo again, even if they previously checked "Don't Tell Me Again".
            </td></tr>
<?php
      for ( $i = 0; $i < count( $memberDismissibleList ); $i++ ) {
        // get a count of the members affected
        $sql = "SELECT count(*) FROM cucmsresponse WHERE docsid = {$memberDismissibleList[$i]["docsid"]} AND cu = '$Cu' AND responseon IS NOT NULL";
        $rs = db_query($sql, $dbh);
        $row = db_fetch_array($rs,0);
        if ( $row[0] > 0 )
          $affectedStr = "(<span style='font-style:italic;'>{$row[0]} member(s)</span>)";
        else
          $affectedStr = "";

        print <<< table_row
          <tr><td class="dtl" align="left" width="70%">{$memberDismissibleList[$i]["docsdesc"]} $affectedStr</td>
            <td class="dtll" width="30%" >
              <input type="checkbox" name="reset_doc[]" value="{$memberDismissibleList[$i]["docsid"]}">Reset Flag
            </td>
          </tr>
table_row;
      }
  }
?>

<?php
    // Show this if both lists exist
  if ( count( $memberDismissibleList ) && count( $cuDismissibleList ) ) {
?>
            <tr><td class="msg" colspan="2">&nbsp;</td></tr>
<?php
  }

  // show the CU-dismissible list
  if ( count( $cuDismissibleList ) ) {
?>
      <tr><td class="msg" colspan="2" align="left">
                By default, the CU-Dismissible Promos are shown to all members.  It is possible for the credit union to exclude members from the CU-Dismissible Login Promo by marking their accounts (see below).<br><br>When you reset this flag, all members will see any active CU-Dismissible Promo.
            </td></tr>
<?php
      for ( $i = 0; $i < count( $cuDismissibleList ); $i++ ) {
        $sql = "SELECT count(*) FROM cucmsresponse WHERE docsid = {$cuDismissibleList[$i]["docsid"]} AND cu = '$Cu' AND responseon IS NOT NULL";
        $rs = db_query($sql, $dbh);
        $row = db_fetch_array($rs,0);
        if ( $row[0] > 0 )
          $affectedStr = "(<span style='font-style:italic;'>{$row[0]} member(s)</span>)";
        else
          $affectedStr = "";

        print <<< table_row
          <tr><td class="dtl" width="70%">{$cuDismissibleList[$i]["docsdesc"]} $affectedStr</td>
            <td class="dtll" width="30%" >
              <input type="checkbox" name="reset_doc[]" value="{$cuDismissibleList[$i]["docsid"]}">Reset Flag
            </td>
          </tr>
table_row;
            }
  }
?>
      <tr><td align="center" colspan='2' class='dtl'><input type="submit" value="Reset Selected Flags" name="submit_settings"></td></tr>

    </table>
  </div>
  </form>
<?php
  }
?>
  <form action="<?php echo $self ?>&act=S" method="post">
  <br>
  <br>
  <div align="center">
    <table width="100%" border=0 cellpadding=4 cellspacing=1>
      <tr><td class="bar" align="center">Exclude From CU-Dismissible Login Promo<a href='javascript:show_help("<?php echo $helpdoc ?>#NDTpromo");'><?php echo $helpicon ?></a></td></tr>
        <?php if (is_readable("$home_path/admin/CU-Dismissible.html")): ?>
      <tr><td class="dtlr"><a href="<?php echo $main ?>/admin/CU-Dismissible.html?ft=82" target="get_file" class="link2">View Results of Last Post </a></td></tr>
        <?php endif; ?>

      <tr><td class="msg" align="left">
                By default, the CU-Dismissible Login Promo is shown to all members.  If you wish to exclude certain members from this promo, use the box below to enter their accounts.
<br><br>Insert the account numbers into this entry field, separated by a space or new line.  <br>
If the record does not exist or cannot be updated, an error will be displayed.
            </td></tr>
      <tr><td valign="top" class="dtl" align="center">
          <textarea name="accts" cols="35" rows="15"></textarea>
            </td></tr>
      <tr>
         <td align="center" class="dtl"><input type="submit" value="Set Flags" name="btnEval"></td>
      </tr>

    </table>
  </div>
  </form>
<?php
  elseif ($act == "U2"):

    $errorList = array();
        for ( $i = 0; $i < count($reset_doc); $i++ ) {
            $docID = $reset_doc[$i];

      // set up the query to reset the members that have responsded to this notice
      $sql = "UPDATE cucmsresponse SET responseon = NULL
              WHERE docsid = $docID AND cu = '$Cu'";

      // run the query
      $rs = db_query($sql, $dbh);

      // check the result
      if ( !$rs ) {
        // get the document name
        $sql = "SELECT docsname FROM cucmsdocs WHERE docsid = $docID";
        $rs = db_query($sql, $dbh);
        if ( !$rs ) {
          $errorList[] = "Error reading doc id: $docID";
        } else {
          $row = db_fetch_array($rs,0);
          $errorList[] = "Error reading doc: {$row["docsname"]}";
        }
      }
    }

      if ( count( $errorList ) > 0 ):
        // reset failed, display message
?>
        <form>
        <div align="center">
          <table border=0 cellpadding=4 cellspacing=0>
            <tr><td class="bar">Credit Union Message Settings</td></tr>
            <tr><td class="dtl">Failed to reset notice settings</td></tr>
<?php
            for ( $i = 0; $i < count( $errorList ); $i++ ) {
              print "<tr><td class='dtl'>{$errorList[$i]}</td></tr>";
            }
?>
          </table>
        </div>
        </form>

<?php
      else:
        // Save completed, report save successful
?>
        <form>
        <div align="center">
          <table border=0 cellpadding=4 cellspacing=0>
            <tr><td class="bar">Credit Union Popups and Promos Settings</td></tr>
            <tr><td class="dtl">Settings Saved Successfully</td></tr>
          </table>
        </div>
        </form>
<?php
      endif;

  elseif ($act == "S"):
      /*
     * Get a list of any cu-Dismissible promos
     */

    $save_msg = '';
    $prt_msg = '';
    $CU = strtoupper($Cu);
    $sql = "select docs.docsid from cucmsdocs docs
              join cucmsfrags frags on frags.docsid = docs.docsid
                and frags.cu = '{$CU}'
              where docs.docsresponsetype = 'P'";
    $sth = db_query($sql, $dbh);

    if (!($sth) || db_num_rows($sth) != 1) {
        # error - no persistent promo
        $save_msg .= "No persistent promo found.  Can't update.";
        $prt_msg .= "No persistent promo found.  Can't update.";
    } else {
        list($docID) = db_fetch_array($sth, 0);
    }

    // SAVE OPTION
    // Replace common delimiter characters with a space,
    // Separate each of the accounts into an array, then
    // loop through the array and build the sql

    $form_accts = array();
    $delims = array("\r\n", "\t", ";", ",");
    $form_accts = explode(" ", str_replace($delims, " ", $_POST['accts']));

    for ($idx = 0; $idx < count($form_accts); $idx++) {

        $member = $form_accts[$idx];
        if (trim($member) <> '') {
            if (strlen(trim($member)) > 0 && preg_match("/^\d\d*$/", $member)) {

                /*                 * *********
                  // NOTE: This is not yet implemented. The logic will need to know which document is being referenced for
                  //       exclusion and then loop through cucmsresponse to set the current date on any members requested.
                  //       If the member isn't in the table already for the document id, credit union, they will need to be added.
                 *
                 */
                # first see if the cuuser record exists -
                $upd_sql = "SELECT user_name from cuusers WHERE cu='" . prep_save($CU) . "'
                      and user_name = '" . prep_save($member) . "'; ";
                $updateRs = db_query($upd_sql, $dbh);

                if (db_num_rows($updateRs) === 0) {
                    $save_msg .= "Invalid member $member (no Digital Banking record)<br>\n";
                    $prt_msg .= "Invalid member $member (no Digital Banking record)<br>\n";
                } else {

                    # call update-notice to set "response" for this member.
                    // ** NO RECORD exists in cucmsresponse
                    $upd_sql = "INSERT INTO cucmsresponse (docsid, cu, accountnumber, responseon)
                          (SELECT " . intval($docID) . ", '" . prep_save($CU) . "',
                            '" . prep_save($member) . "', current_date
                           WHERE NOT EXISTS (SELECT (docsid, cu, accountnumber)
                                 FROM cucmsresponse as cur
                                 WHERE cur.docsid = " . intval($docID) . "
                                   AND cur.cu = '" . prep_save($CU) . "'
                                   AND cur.accountnumber = '" . prep_save($member) . "' ) ); ";

                    $updateRs = db_query($upd_sql, $dbh);
                    if (db_affected_rows($updateRs) === 0) {
                        // ** NO Rows affected -- NO INSERT -- SO UPDATE INSTEAD
                        // ** UPDATE
                        // ** If the cucmsresponse record exist, but the responsedate is NULL, then I need
                        $upd_sql = "UPDATE cucmsresponse
                            SET responseon = current_date
                            WHERE docsid = " . intval($docID) . "
                              AND cu = '" . prep_save($CU) . "'
                              AND accountnumber = '" . prep_save($member) . "' ";
                        $updateRs = db_query($upd_sql, $dbh);

                        if (!updateRs) {
                            $save_msg .= "Update FAILED Member $member  <br>\n";
                            $prt_msg .= "Update FAILED Member $member  <br>\n";
                        }
                    }
                    $prt_msg .= "Member $member updated<br>\n";
                }
            } else {
                $save_msg .= "Invalid member $member (empty or non-numeric)<br>\n";
                $prt_msg .= "Invalid member $member (empty or non-numeric)<br>\n";
            }
        }
    }
# create file to save $prt_msg

    $tabfile = "$home_path/admin/CU-Dismissible.html";
    $tabhdr = "<HTML><HEAD>
                            <TITLE>Last CU-Dismissible Promo Exclusions</TITLE></HEAD>
                            <BODY>Posted by $Cn " . date("r") . "<BR><BR>";
    $tabtrl = "</BODY></HTML>";


    $STATFILE = fopen("$tabfile", "w");


    fwrite($STATFILE, "$tabhdr");
    fwrite($STATFILE, "$prt_msg");
    fwrite($STATFILE, "$tabtrl");
    fclose($STATFILE);

    print "<div align='center'><table border=0 cellpadding=4 cellspacing=0>
          <tr>
                        <td class='bar'>Credit Union Popups and Promos Settings</td>
                    </tr>
<tr><td class='dtlr'><a href='$main/admin/CU-Dismissible.html?ft=82' target='get_file' class='link2'>View Full Results </a></td></tr>";
    if (trim($save_msg) == '') {
        print "<tr><td class='dtl'>Settings Saved Successfully</td></tr>";
    } else {
        print "<tr><td class='dtl'>$save_msg</td></tr>";
    }
    print "</table></div>";

endif;


?>