cuprogmntc.prg

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

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

$dms_ok=array('act'=>'string','pc'=>'string','program'=>'string','displaytext'=>'string','sort_order'=>'string','description'=>'string','def_set'=>'string','form_err'=>'string','msg'=>'string','Remote_Update'=>'array');

dms_import($dms_ok);

    if (!isset($act)) $act = "2";

    switch ($act){
        case "1":           // Edit Program Entry
            cu_header("Edit Program Entry");
            print '<form action="cuprogmntc.prg?act=3" method="post">
            <p>&nbsp;<p>';
                $query = "select *
                        from cuadminprogs
                        where program = '$pc'";
                $result = db_query($query, $link);
                $cuprog_row = db_fetch_object($result);
                $num_rows = db_num_rows($result);

            print "<center><table cellpadding=3 cellspacing=0 border=0 class='dmsbg' width=500><tr><td>";
            print '<table cellpadding="1" cellspacing="0" border="0" width="100%" bgcolor=white><tr>
                    <td colspan="2" class="bar" align="center">';
                        if($num_rows > 0){
                            print "EDIT CU PROGRAM ENTRY";
                        } else {
                            print "ADD CU PROGRAM ENTRY";
                        }
                    print "
                    </td>
                </tr> ";
                if (isset($form_err) && strlen($form_err) > 0)
                    printf("
                        <tr>
                            <td colspan=2 class='err'>
                                Errors found before saving the information.  Please review errors at bottom of screen.
                            </td>
                        </tr> ");
                print <<< EOF
                <tr>
                    <td nowrap align="right" class="hdr">
                        Program:
                    </td>
                    <td nowrap class='dtl'>
EOF;
                        if ($num_rows == 0){
                                if ( isset($program)){
                                    $cu_info = set_string($program);
                                } else {
                                    $cu_info = htmlspecialchars(trim($cuprog_row->program));
                                }
                                print <<<EOF
                            <input type="text" name="program" size="20" maxlength="20" value="$cu_info">
EOF;
                        } else {
                             echo $cuprog_row->program;
                        print '<input type="hidden" name="program" value="' . htmlspecialchars(trim($cuprog_row->program)) . '">';
                        }
                    print <<<EOF
                    </td>
                </tr>
                <tr>
                    <td nowrap align="right" class="hdr">
                        Name:
                    </td>
                    <td nowrap class='dtl'>
EOF;
                            if ( isset($displaytext))
                                $cu_info = set_string($displaytext);
                            else
                                $cu_info = htmlspecialchars(trim($cuprog_row->displaytext));
print <<<EOF
                        <input type="text" name="displaytext" size="30" maxlength="30" value="$cu_info">
                    </td>
                </tr>
                <tr>
                    <td nowrap align="right" class="hdr">
                        Order Value:
                    </td>
                    <td nowrap class='dtl'>
EOF;
                            if ( isset($displaytext))
                                $cu_info = set_string($sort_order);
                            else
                                $cu_info = htmlspecialchars(trim($cuprog_row->sort_order));
print <<<EOF
                        <input type="text" name="sort_order" size="4" maxlength="4" value="$cu_info">
                    </td>
                </tr>
                <tr>
                    <td nowrap align="right" class="hdr">
                        Default Settings:
                    </td>
                    <td nowrap class='dtl'>
EOF;
                            if ( isset($displaytext))
                                $cu_info = set_string($def_set);
                            else
                                $cu_info = htmlspecialchars(trim($cuprog_row->def_set));
?>
                        <select name="def_set" size="1">
                            <option value="0" <?php echo ($cu_info == 0 ? "SELECTED" : "") ?>>Off</option>
                            <option value="1" <?php echo ($cu_info == 1 ? "SELECTED" : "") ?>>On</option>
                        </select>
                    </td>
                </tr>
                <tr>
                    <td nowrap align="right" class="hdr" valign="top">
                        Comments:
                    </td>
                    <td nowrap class='dtl'>
<?php
                            if(isset($description))
                                $cu_info=set_string($description);
                            else
                                $cu_info=htmlspecialchars(trim($cuprog_row->description));
print <<<EOF
                        <textarea name="description" rows=5 cols=40 wrap="physical">$cu_info</textarea>
                    </td>
                </tr>
                <tr>
                    <td class='dtl'>&nbsp;</td>
                    <td nowrap class='dtl'>
EOF;
                        remote_update_list();
print <<<EOF
                    </td>
                </tr>
                <tr>
                    <td class='dtl'>&nbsp;</td>
                    <td nowrap class='dtl'>
                        <input type="submit" name="Save" Value="Save">
                        <input type="button" name="Cancel" Value="Cancel" onClick="document.location='cuprogmntc.prg'">
                    </td>
                </tr>
EOF;

             // If the error value is here then print it at the end
                if (isset($form_err)) {
                    echo "<tr><td class='err' colspan='2'>$form_err</td></tr>";
                }
            echo "
                </table>
                </td></tr></table> ";
            break;
        case "2":
            cu_header("CU Admin Programs");
print "<form>";

            // Connect to the data and retrieve the current list of Home CU Products
                    $query = "SELECT program, displaytext, sort_order, def_set
                                        FROM cuadminprogs ORDER BY sort_order, program";
                    $prod_result = db_query($query, $link);
            print <<<EOF

            <table border="0" cellpadding="3" cellspacing="1" align="center" class='dmsbg' width=500><tr><td>
            <table border="0" cellpadding="2" cellspacing="0" align="center" bgcolor=white width="100%">
                <tr>
                    <td colspan="5" class="bar" align="center">
                        CU ADMIN PROGRAMS LIST
                    </td>
                </tr>
EOF;
                if (isset($msg)) {
                    print "
                        <tr>
                            <td colspan=\"5\" class=\"msg\" align=\"center\"> " .
                                $msg
                            . "</td>
                        </tr> ";
                }
print <<<EOF
                <tr>
                    <td class="hdr" align="left">
                        Program
                    </td>
                    <td class="hdr" align="left">
                        Display Text
                    </td>
                    <td class="hdr" align="left">
                        Order Value
                    </td>
                    <td class="hdr" align="left">
                        Default
                    </td>
                    <td class="hdr" align="center">
                        Select
                    </td>
                </tr>
EOF;
                    $RGB = "odd";
                    $row = 0;
                    while ($prod_row = db_fetch_object($prod_result, $row)){
                        $row++;
                        $disp_def_set = ($prod_row->def_set == "1" ? "On" : "Off");
            print <<<EOF
                <tr class="$RGB">
                    <td nowrap >
                        {$prod_row->program}
                    </td>
                    <td nowrap >
                        {$prod_row->displaytext}
                    </td>
                    <td nowrap >
                        {$prod_row->sort_order}
                    </td>
                    <td nowrap >
                        $disp_def_set
                    </td>
                    <td nowrap >
                        <a href="cuprogmntc.prg?act=1&pc={$prod_row->program}">Edit</a>
                    </td>
                </tr>
EOF;
                    $RGB = ($RGB == "odd" ? "even" : "odd");
                    }

print <<<EOF
                <tr>
                    <td colspan="4">
                        <a href="cuprogmntc.prg?act=1">Add Admin Program</a>
                        &nbsp;|&nbsp;
                        <a href="$infourl/hcuadm/cuilist.prg" target="parent">Credit Union List</a>
                    </td>
                </tr>
            </table>
            </td></tr></table>
EOF;
            break;
        case "3":
            cu_header("Save Admin Program");
            // Setup a function to go back to the CU Edit form, if anything went wrong
            function save_fail($msg){
                global $program;
                printf("<script language=\"javascript\">\n");
                    printf("document.forms[0].elements[\"form_err\"].value = '%s';\n", $msg);
                    printf("document.forms[0].action=\"cuprogmntc.prg?act=1&pc=%s\";\n", $program);
                    printf("document.forms[0].method=\"post\";\n");
                    printf("document.forms[0].submit();\n");
                printf("</script>");
                printf("\n</form>\n </body>\n </html>\n");
                exit();
                }


            print '<form action="cuprogmntc?act=1" method="post">';
                $errors_found = "No";
                $err_msg = "";


                /* VALIDATE THE INFORMATION - whether it's been saved before or NOT
                    After validation fails it will send the information back to the edit form
                    So it looks like it did before, the fail information will be at the bottom of the
                    screen.

                */
                $err_msg="";

                // Now we need to load all the fields from the CU form, and post them back
                // So the user does not have to press the back button.
                // Load all the Fields from the previous form into hidden fields on this form
            print <<<EOF
                <!-- LOAD ALL HIDDEN FIELDS -->

                <!-- Description -->
                <input type="hidden" name="program" value="$program">
                <input type="hidden" name="displaytext" value="$displaytext">
                <input type="hidden" name="sort_order" value="$sort_order">
                <input type="hidden" name="description" value="$description">
                <input type="hidden" name="def_set" value="$def_set">

                <!-- Create a hidden field  for the form error -->
                <input type="hidden" name="form_err" value="">
EOF;
                if (strlen($err_msg) > 0){
                     //If an error was found post the information back to the CU edit form here
                    $form_err = sprintf("<font size=\"+1\">ERROR!  Problems with the credit union information found: <BR></font>");
                    $form_err .= sprintf("The following errors will need to be corrected before you will be allowed to save the form.");
                    $form_err .= sprintf("<P> <font color=red>%s</font>", $err_msg);
                    save_fail($form_err);
                } else {

                // Everything was validated, we now need to save the information, either insert for new or update for edited.

                    $save_sql = "SELECT program FROM cuadminprogs
                                             WHERE program = '$program'";
                    // Execute the query and find out how many rows are in the query
                    $db_result = db_query($save_sql, $link);

                    $num_rows = db_num_rows($db_result);
                    $set_default_off = false;
                    if ($num_rows > 0 ) {
                        // UPDATE the information into the table
                        $qry_stmt = sprintf("UPDATE cuadminprogs ");
                        $qry_stmt .= sprintf("SET displaytext ='%s', ",prep_save($displaytext));
                        $qry_stmt .= sprintf("sort_order ='%s', ",intval($sort_order));
                        $qry_stmt .= sprintf("description = '%s', ", prep_save($description));
                        $qry_stmt .= sprintf("def_set = '%s' ", prep_save($def_set));
                        $qry_stmt .= sprintf("WHERE program = '%s'; ",$program);
                    } else {
                        $qry_stmt = sprintf("INSERT INTO cuadminprogs ");
                        $qry_stmt .= sprintf("(program, displaytext, sort_order, description, def_set) ");
                        $qry_stmt .= sprintf(" VALUES (");
                        $qry_stmt .= sprintf("'%s', '%s', '%s', '%s', '%s'); ",
                            prep_save($program),
                            prep_save($displaytext),
                            intval($sort_order),
                            prep_save($description),
                            prep_save($def_set));

                        if (intval($def_set) != 1)
                            $set_default_off = true;                // if this is set, then go thru ALL CU's and add this new form to the cuadminexclude table
                    }
                    // Now pass the query to the Database

                    if (!($db_result=db_query($qry_stmt, $link))) {
                        // A problem was encoutered with saving the data - report the message
                        $form_err = sprintf("<br>");
                        $form_err .= sprintf("<font face=\"Arial\" size=\"2\">Unable to Save Record!</font><br>");
                        save_fail($form_err);
                    } else {
                        printError(sprintf("Record Saved Successfully.<br>
                            <a href=\"cuprogmntc.prg?act=2\" target=\"CONTENT\">CU Admin Program List</a>"));

            // Only need to do this if at least one remote server was selected
            if (Remote_Update_Selected()) {
              // ** NOW CHECK FOR SAVING TO A REMOTE SERVER
              // ** Add Each field that will be updated
              Remote_Field_Add("cuprg", "program", $program);
              Remote_Field_Add("cuprg", "displaytext", $displaytext);
              Remote_Field_Add("cuprg", "sort_order", $sort_order);
              Remote_Field_Add("cuprg", "description", $description);
              Remote_Field_Add("cuprg", "def_set", $def_set);
              // ** Need to create the url I am going to send to the remote server
              $Remote_Results = Remote_Update_Send("U", "cuprg");

                            // RESET THE FIELDS FOR POSSIBLE USE BELOW
                            Remote_Fields_Reset();

            }

                        if ($set_default_off) {
                            // Now add the option for all cu's to the exclude list
                            // use an insert from the cuadmin table -- this will be the credit unions for each individual server where the script is executed
                            $sql = "INSERT INTO cuadminexclude (cu, user_name, program)
                                            (SELECT cu, trim(user_name), '" . trim(prep_save($program)) . "'
                                            FROM cuadmin) ";
                            $update_rs = db_query($sql, $link);
                            db_free_result($update_rs);
                            if (Remote_Update_Selected()) {
                                Remote_Field_Add("cuprg", "program", $program);
                                // *** THIS IS A SPECIAL ROUTINE
                                $Remote_Results .= Remote_Update_Special("excludelist");

                            }

                        }
                        echo $Remote_Results;

                        header ("Location: " . $_SERVER['PHP_SELF'] . "?msg=" . urlencode($Remote_Results));
/*
                        print <<< js
                            <script language="javascript">
                                document.location = "cuprogmntc.prg";
                            </script>
js;
*/
                    }
                }

            break;
        default:
            cu_header("Error Displaying Form");
            print ("<form>");
            printError("Requested form not found!<br>Cancelling action.");
    }
    print "</form></body></html>";