Renamed ifSqlHasZeroNums() to ifSqlHasZeroNumRows() and improved some queries.
[mailer.git] / inc / modules / admin / what-email_details.php
index afe6ac45435ce9d4bc8154585a0ce97c145bc384..f941962989d977ccfea4ddad1274984fbbcef8cd 100644 (file)
@@ -1,7 +1,7 @@
 <?php
 /************************************************************************
- * MXChange v0.2.1                                    Start: 09/28/2003 *
- * ===============                              Last change: 10/29/2004 *
+ * Mailer v0.2.1-FINAL                                Start: 09/28/2003 *
+ * ===================                          Last change: 10/29/2004 *
  *                                                                      *
  * -------------------------------------------------------------------- *
  * File              : what-email_details.php                           *
  * -------------------------------------------------------------------- *
  * Kurzbeschreibung  : Alle Details einer gebuchten Mail ansehen        *
  * -------------------------------------------------------------------- *
- *                                                                      *
+ * $Revision::                                                        $ *
+ * $Date::                                                            $ *
+ * $Tag:: 0.2.1-FINAL                                                 $ *
+ * $Author::                                                          $ *
  * -------------------------------------------------------------------- *
- * Copyright (c) 2003 - 2008 by Roland Haeder                           *
- * For more information visit: http://www.mxchange.org                  *
+ * Copyright (c) 2003 - 2009 by Roland Haeder                           *
+ * Copyright (c) 2009 - 2015 by Mailer Developer Team                   *
+ * For more information visit: http://mxchange.org                      *
  *                                                                      *
  * This program is free software; you can redistribute it and/or modify *
  * it under the terms of the GNU General Public License as published by *
  * along with this program; if not, write to the Free Software          *
  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
  * MA  02110-1301  USA                                                  *
- * -------------------------------------------------------------------- *
- *           Moded What-email_details.php   / also Editet !             *
- * Auf langsammen Servern (wie mein z.B Dauert das Laden)               *
- * enorm hoch zu lang. Jetzt werden nur auftraege aufgelistet die       *
- * NEU sind ( DB NEW) oder ADMIN freischalten muss (DB ADMIN )          *
- * oder noch als TEMP gespecihert sind                                  *
- * der rest der schon als SEND sich melden darf wird per                *
- * what-email_archiv .php aufgerufen                                    *
- * beste gruesse Robert Niedziela / www.personal-webserver.de           *
- * oder auch www.mc-p.org                                               *
  ************************************************************************/
 
 // Some security stuff...
-if ((ereg(basename(__FILE__), $_SERVER['PHP_SELF'])) || (!IS_ADMIN()))
-{
-       $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
-       require($INC);
-}
+if ((!defined('__SECURITY')) || (!isAdmin())) {
+       die();
+} // END - if
 
 // Add description as navigation point
-ADD_DESCR("admin", basename(__FILE__));
+addYouAreHereLink('admin', __FILE__);
+
+// Is 'sql_patches' updated?
+if (!isExtensionInstalledAndNewer('sql_patches', '0.7.4')) {
+       // No, abort here
+       displayMessage(generateExtensionOutdatedMessage('sql_patches', '0.7.4'));
+       return FALSE;
+} // END - if
 
 // Normal mails ordered by your members
-//              0     1       2       3       4           5          6          7       8        9          10
-$SQL = "SELECT id, sender, subject, text, receivers, payment_id, data_type, timestamp, url, target_send, cat_id
- FROM "._MYSQL_PREFIX."_pool
- WHERE data_type IN('ADMIN', 'TEMP', 'NEW', 'ACTIVE')
- ORDER BY timestamp DESC";
-$WHO = _ALL;
-$SQL2 = "";
-
-if (!empty($_GET['mid']))
-{
+$sql = "SELECT
+       `id`,
+       `sender`,
+       `subject`,
+       `text`,
+       `receivers`,
+       `payment_id`,
+       `data_type`,
+       `timestamp`,
+       `url`,
+       `target_send`,
+       `mails_sent`,
+       `cat_id`
+FROM
+       `{?_MYSQL_PREFIX?}_pool`
+WHERE
+       `data_type` IN('ADMIN','TEMP','NEW','ACTIVE')
+ORDER BY
+       `timestamp` DESC";
+
+$WHO = '';
+$SQL2 = '';
+
+if ((isPostRequestElementSet('id')) && (isGetRequestElementSet('type')) && (postRequestElement('type') == 'normal')) {
        // Only a specific mail shall be displayed
-       //              0     1       2       3       4           5          6          7       8        9          10
-       $SQL = "SELECT id, sender, subject, text, receivers, payment_id, data_type, timestamp, url, target_send, cat_id
-        FROM "._MYSQL_PREFIX."_pool
-        WHERE id='".bigintval($_GET['mid'])."'
-        LIMIT 1";
-       $WHO = MAIL_ID.": ".$_GET['mid'];
-}
- elseif (!empty($_GET['u_id']))
-{
+       $sql = sprintf('SELECT
+       `id`,
+       `sender`,
+       `subject`,
+       `text`,
+       `receivers`,
+       `payment_id`,
+       `data_type`,
+       `timestamp`,
+       `url`,
+       `target_send`,
+       `mails_sent`,
+       `cat_id`
+FROM
+       `{?_MYSQL_PREFIX?}_pool`
+WHERE
+       `id`=%s
+LIMIT 1',
+               bigintval(getRequestElement('id'))
+       );
+       $WHO = '{--MAIL_ID--}' . ': ' . getRequestElement('id');
+} elseif (isGetRequestElementSet('userid')) {
        // All mails by a specific member shall be displayed
-       //              0     1       2       3       4           5          6          7       8        9          10
-       $SQL = "SELECT id, sender, subject, text, receivers, payment_id, data_type, timestamp, url, target_send, cat_id
-        FROM "._MYSQL_PREFIX."_pool
-        WHERE sender='".bigintval($_GET['u_id'])."'
-        ORDER by timestamp DESC";
-       $WHO = USER_ID.": ".$_GET['u_id'];
+       $sql = sprintf('SELECT
+       `id`,
+       `sender`,
+       `subject`,
+       `text`,
+       `receivers`,
+       `payment_id`,
+       `data_type`,
+       `timestamp`,
+       `url`,
+       `target_send`,
+       `mails_sent`,
+       `cat_id`
+FROM
+       `{?_MYSQL_PREFIX?}_pool`
+WHERE
+       `sender`=%s
+ORDER BY
+       `timestamp` DESC',
+               bigintval(getRequestElement('userid'))
+       );
+       $WHO = '{--USER_ID--}' . ': ' . getRequestElement('userid');
 }
 
-if ((EXT_IS_ACTIVE("bonus")) && ($WHO == _ALL))
-{
-       // Bonus mails sent by you
-       //               0     1       2        3        4      5       6          7       8      9         10          11        12
-       $SQL2 = "SELECT id, subject, text, receivers, points, time, data_type, timestamp, url, cat_id, target_send, mails_sent, clicks
-        FROM "._MYSQL_PREFIX."_bonus
-        ORDER BY timestamp DESC";
+// Init result_bonus
+$result_bonus = FALSE;
 
+if ((isExtensionActive('bonus')) && (empty($WHO))) {
        // Check for maximum pages
-       $result_bonus = SQL_QUERY($SQL2, __FILE__, __LINE__);
-}
+       $result_bonus = sqlQuery("SELECT
+       `id`,
+       `subject`,
+       `text`,
+       `receivers`,
+       `points`,
+       `time`,
+       `data_type`,
+       `timestamp`,
+       `url`,
+       `cat_id`,
+       `target_send`,
+       `mails_sent`,
+       `clicks`,
+       (`mails_sent` - `clicks`) AS `unconfirmed`
+FROM
+       `{?_MYSQL_PREFIX?}_bonus`
+WHERE
+       `is_notify`='N'
+ORDER BY
+       `timestamp` DESC", __FILE__, __LINE__);
+} // END - if
 
 // Check for maximum pages
-$result_normal = SQL_QUERY($SQL, __FILE__, __LINE__);
+$result_normal = sqlQuery($sql, __FILE__, __LINE__);
 
 // Set offset an current page to default values
-if (empty($_GET['page']))   $_GET['page']   = "1";
-if (empty($_GET['offset'])) $_GET['offset'] = $_CONFIG['mails_page'];
+if (!isGetRequestElementSet('page')) setGetRequestElement('page', 1);
+
+if (!isGetRequestElementSet('offset')) {
+       if (isConfigEntrySet('mails_page')) {
+               // Set config entry
+               setGetRequestElement('offset', getMailsPage());
+       } else {
+               // Set default one
+               setGetRequestElement('offset', 10);
+       }
+} // END - if
 
 // Add limitation to SQL string
-if (empty($_GET['mid']))
-{
+if (!(isPostRequestElementSet('id')) && (isGetRequestElementSet('type')) && (postRequestElement('type') == 'normal')) {
        // Create limitation line
-       $ADD = " LIMIT ".(bigintval($_GET['offset']) * bigintval($_GET['page']) - bigintval($_GET['offset'])).", ".bigintval($_GET['offset']);
+       $add = ' LIMIT ' . (bigintval(getRequestElement('offset')) * bigintval(getRequestElement('page')) - bigintval(getRequestElement('offset'))) . ', ' . bigintval(getRequestElement('offset'));
 
        // For normal mails
-       $SQL .= $ADD;
+       $sql .= $add;
 
        // For bonus mails
-       if (!empty($SQL2)) $SQL2 .= $ADD;
-}
+       if (!empty($SQL2)) $SQL2 .= $add;
+} // END - if
 
 // Run SQL query for normal mails
-$result_list = SQL_QUERY($SQL, __FILE__, __LINE__);
-if ((!empty($SQL2)) && ($WHO == _ALL)) $result_bonus = SQL_QUERY($SQL2, __FILE__, __LINE__);
+$result_list = sqlQuery($sql, __FILE__, __LINE__);
+if ((!empty($SQL2)) && (empty($WHO))) {
+       $result_bonus = sqlQuery($SQL2, __FILE__, __LINE__);
+} // END - if
 
 // Calculate pages
-$PAGES = round(SQL_NUMROWS($result_normal) / $_CONFIG['mails_page'] + 0.3);
-SQL_FREERESULT($result_normal);
+$numPages = '0';
+if (isConfigEntrySet('mails_page')) {
+       $numPages = round(sqlNumRows($result_normal) / getMailsPage() + 0.3);
+} // END - if
 
-$MAIL = false;
-if (SQL_NUMROWS($result_list) > 0)
-{
-       // Mail orders are in pool so we can display them
-       OUTPUT_HTML("<DIV align=\"center\">
-<TABLE border=\"0\" cellspacing=\"0\" cellpadding=\"0\" class=\"admin_table dashed\" width=\"99%\">
-<TR>
-  <TD colspan=\"3\" align=\"center\" height=\"25\" class=\"admin_title\">
-    <STRONG class=\"admin_done\">".ADMIN_POOL_CONTENT." (".$WHO.")</STRONG>
-  </TD>
-</TR>");
+// Free result
+sqlFreeResult($result_normal);
 
-       // Add navigation (with change box and colspan=3)
-       if ($PAGES > 1) ADD_EMAIL_NAV($PAGES, $_CONFIG['mails_page'], false, "3");
+$MAIL = FALSE;
+if (!ifSqlHasZeroNumRows($result_list)) {
+       // Init rows
+       $OUT = '';
 
-       while ($pool = SQL_FETCHROW($result_list))
-       {
+       // Walk through all entries
+       while ($content = sqlFetchArray($result_list)) {
                // Unconfirmed mails and sent mails
-               $result_uncon = SQL_QUERY_ESC("SELECT max_rec, clicks FROM "._MYSQL_PREFIX."_user_stats WHERE pool_id=%s LIMIT 1",
-                array(bigintval($pool[0])), __FILE__, __LINE__);
-               list($sent, $clicks) = SQL_FETCHROW($result_uncon);
-               SQL_FREERESULT($result_uncon);
+               $result_uncon = sqlQueryEscaped("SELECT (`max_rec` - `clicks`) AS `unconfirmed` FROM `{?_MYSQL_PREFIX?}_user_stats` WHERE `pool_id`=%s LIMIT 1",
+                       array(bigintval($content['id'])), __FILE__, __LINE__);
+
+               // Load and merge data
+               $content = merge_array($content, sqlFetchArray($result_uncon));
+
+               // Free result
+               sqlFreeResult($result_uncon);
 
                // Unconfirmed mails
-               $unconfirmed = $sent - $clicks;
-               if ($unconfirmed > 0)
-               {
-                       // Add link to list_unconfirmed what-file
-                       $unconfirmed = "<STRONG><A href=\"".URL."/modules.php?module=admin&amp;what=list_unconfirmed&amp;mid=".$pool[0]."\">".$unconfirmed."</A></STRONG>";
-               }
-                elseif ($unconfirmed < 0)
-               {
-                       // Sometimes rarely displayed minus values will be "fixed" to zero
-                       $unconfirmed = 0;
-               }
-
-               // List mail
-               OUTPUT_HTML("<TR>
-  <TD class=\"bottom top2 right\" width=\"23%\" align=\"center\">
-    ".EMAIL_SENDER.":<br />
-    <STRONG class=\"admin_misc\">".ADMIN_USER_PROFILE_LINK($pool[1])."</STRONG>
-  </TD>
-  <TD class=\"bottom top2 right\" width=\"23%\" align=\"center\">
-    ".EMAIL_SUBJECT.":<br />
-    <STRONG class=\"admin_misc\">".COMPILE_CODE($pool[2])."</STRONG>
-  </TD>
-  <TD class=\"bottom top2\" width=\"54%\" align=\"center\">
-    ".EMAIL_TEXT.":<br />
-    <STRONG class=\"admin_misc\">".COMPILE_CODE($pool[3])."</STRONG>
-  </TD>
-</TR>
-<TR><TD height=\"5\" colspan=\"3\"></TD></TR>
-<TR>
-  <TD colspan=\"2\" align=\"center\" class=\"top bottom right\">
-    ".EMAIL_PAYMENT.":<br />
-    <STRONG class=\"admin_misc\">".GET_PAYMENT($pool[5])."
-  </TD>
-  <TD align=\"center\" class=\"top bottom\">
-    ".EMAIL_CATEGORY.":<br />
-    <STRONG class=\"admin_misc\">".GET_CATEGORY($pool[10])."
-  </TD>
-</TR>
-<TR><TD height=\"5\" colspan=\"3\"></TD></TR>
-<TR>
-  <TD align=\"center\" class=\"top bottom right\">
-    ".EMAIL_RECEIVERS.":<br />
-    <STRONG class=\"admin_misc\">".$sent."</STRONG> (".EMAIL_RUIDS.": <STRONG class=\"admin_misc\">".str_replace(";", ", ", $pool[4])."</STRONG>)
-  </TD>
-  <TD align=\"center\" class=\"top bottom right\">
-    ".USERS_LINKS.":<br />
-    <STRONG class=\"admin_misc\">".$unconfirmed."</STRONG>
-  </TD>
-  <TD align=\"center\" class=\"top bottom\">
-    ".EMAIL_POOL_TYPE.":<br />
-    <STRONG class=\"admin_misc\">".GET_POOL_TYPE($pool[6])."</STRONG>
-  </TD>
-</TR>
-<TR><TD height=\"5\" colspan=\"3\"></TD></TR>
-<TR>
-  <TD align=\"center\" class=\"top right\">
-    ".EMAIL_TSEND.":<br />
-    <STRONG class=\"admin_misc\">".$pool[9]."</STRONG>
-  </TD>
-  <TD align=\"center\" class=\"top right\">
-    ".EMAIL_URL.":<br />
-    <STRONG class=\"admin_misc\"><A href=\"".FRAMETESTER($pool[8])."\" target=\"_blank\">".ADMIN_TEST_URL."</A></STRONG>
-  </TD>
-  <TD align=\"center\" class=\"top\">
-    ".EMAIL_TIMESTAMP.":<br />
-    <STRONG class=\"admin_misc\">".MAKE_DATETIME($pool[7], "0")."</STRONG>
-  </TD>
-</TR>
-<TR>
-  <TD align=\"center\" class=\"top2 admin_del_link\" colspan=\"3\">
-    <A href=\"".URL."/modules.php?module=admin&amp;what=del_email&amp;mid=".$pool[0]."\">".ADMIN_DELETE_NORMAL_MAIL."</A>
-  </TD>
-</TR>");
-       }
+               $content['unconfirmed'] = generateUnconfirmedAdminLink($content['id'], ($content['unconfirmed']), 'normal');
+
+               // Prepare content
+               $content['timestamp']   = generateDateTime($content['timestamp'], 0);
+
+               // Load row template
+               $OUT .= loadTemplate('admin_list_emails_row', TRUE, $content);
+       } // END - while
 
        // Free memory
-       SQL_FREERESULT($result_list);
-
-       // Add navigation (without change box but with colspan=3)
-       if ($PAGES > 1) ADD_EMAIL_NAV($PAGES, $_CONFIG['mails_page'], false, "3");
-
-       // Output footer
-       OUTPUT_HTML("</TABLE>
-</DIV>");
-       $MAIL = true;
-       if ((EXT_IS_ACTIVE("bonus")) && ($WHO == _ALL))
-       {
-               // Check only if bonus extension is active
-               if (SQL_NUMROWS($result_bonus) > 0) OUTPUT_HTML("<br /><br />");
-       }
-}
+       sqlFreeResult($result_list);
+
+       // Add navigation (with change box and colspan=3)
+       $content['nav'] = addEmailNavigation($numPages, getMailsPage(), FALSE, 3, TRUE);
+
+       // Prepare content
+       $content['rows'] = $OUT;
+       $content['who'] = $WHO;
+
+       // Mail orders are in pool so we can display them
+       loadTemplate('admin_list_emails', FALSE, $content);
+
+       $MAIL = TRUE;
+       if ((isExtensionActive('bonus')) && (empty($WHO))) {
+               // Only check if bonus extension is active
+               if (!ifSqlHasZeroNumRows($result_bonus)) outputHtml('<br /><br />');
+       } // END - if
+} // END - if
 
-if ((EXT_IS_ACTIVE("bonus")) && ($WHO == _ALL))
-{
+if ((isExtensionActive('bonus')) && (empty($WHO))) {
        // Load bonus mails only when extension is active
-       if (SQL_NUMROWS($result_bonus) > 0)
-       {
-               // Mail orders are in pool so we can display them
-               OUTPUT_HTML("<DIV align=\"center\">
-<TABLE border=\"0\" cellspacing=\"0\" cellpadding=\"0\" class=\"admin_table dashed\" width=\"99%\">
-<TR>
-  <TD colspan=\"3\" align=\"center\" height=\"25\" class=\"admin_title\">
-    <STRONG class=\"admin_done\">".ADMIN_BONUS_CONTENT."</STRONG>
-  </TD>
-</TR>");
+       if (!ifSqlHasZeroNumRows($result_bonus)) {
                // Calculate pages
-               $PAGES = round(SQL_NUMROWS($result_bonus) / $_CONFIG['mails_page'] + 0.5);
-
-               // Add navigation (with change box and colspan=3)
-               if ($PAGES > 1) ADD_EMAIL_NAV($PAGES, $_CONFIG['mails_page'], true, "3");
+               $numPages = round(sqlNumRows($result_bonus) / getMailsPage() + 0.5);
 
                // List emails
-               while ($bonus = SQL_FETCHROW($result_bonus))
-               {
-                       // Unconfirmed mails
-                       $unconfirmed = $bonus[11] - $bonus[12];
-                       if ($unconfirmed > 0)
-                       {
-                               // Add link to list_unconfirmed what-file
-                               $unconfirmed = "<STRONG><A href=\"".URL."/modules.php?module=admin&amp;what=list_unconfirmed&amp;bid=".$bonus[0]."\">".$unconfirmed."</A></STRONG>";
-                       }
-
-                       OUTPUT_HTML("<TR>
-  <TD class=\"bottom top2 right\" colspan=\"2\" width=\"46%\" align=\"center\">
-    ".EMAIL_SUBJECT.":<br />
-    <STRONG class=\"admin_misc\">".$bonus[1]."</STRONG>
-  </TD>
-  <TD class=\"bottom top2\" width=\"54%\" align=\"center\">
-    ".EMAIL_TEXT.":<br />
-    <STRONG class=\"admin_misc\">".$bonus[2]."</STRONG>
-  </TD>
-</TR>
-<TR><TD height=\"5\" colspan=\"3\"></TD></TR>
-<TR>
-  <TD align=\"center\" class=\"top bottom right\" width=\"23%\">
-    ".EMAIL_POINTS.":<br />
-    <STRONG class=\"admin_misc\">".$bonus[4]." ".POINTS."
-  </TD>
-  <TD align=\"center\" class=\"top bottom right\" width=\"23%\">
-    ".EMAIL_SECONDS.":<br />
-    <STRONG class=\"admin_misc\">".$bonus[5]." "._SECONDS."
-  </TD>
-  <TD align=\"center\" class=\"top bottom\">
-    ".EMAIL_CATEGORY.":<br />
-    <STRONG class=\"admin_misc\">".GET_CATEGORY($bonus[9])."
-  </TD>
-</TR>
-<TR><TD height=\"5\" colspan=\"3\"></TD></TR>
-<TR>
-  <TD align=\"center\" class=\"top bottom right\">
-    ".EMAIL_RECEIVERS.":<br />
-    <STRONG class=\"admin_misc\">".$bonus[11]."</STRONG> (".EMAIL_RUIDS.": <STRONG class=\"admin_misc\">".str_replace(";", ", ", $bonus[3])."</STRONG>)
-  </TD>
-  <TD align=\"center\" class=\"top bottom right\">
-    ".USERS_LINKS.":<br />
-    <STRONG class=\"admin_misc\">".$unconfirmed."</STRONG>
-  </TD>
-  <TD align=\"center\" class=\"top bottom\">
-    ".EMAIL_POOL_TYPE.":<br />
-    <STRONG class=\"admin_misc\">".GET_POOL_TYPE($bonus[6])."</STRONG>
-  </TD>
-</TR>
-<TR><TD height=\"5\" colspan=\"3\"></TD></TR>
-<TR>
-  <TD align=\"center\" class=\"top right\">
-    ".EMAIL_TSEND.":<br />
-    <STRONG class=\"admin_misc\">".$bonus[10]."</STRONG>
-  </TD>
-  <TD align=\"center\" class=\"top right\">
-    ".EMAIL_URL.":<br />
-    <STRONG class=\"admin_misc\"><A href=\"".FRAMETESTER($bonus[8])."\" target=\"_blank\">".ADMIN_TEST_URL."</A></STRONG>
-  </TD>
-  <TD align=\"center\" class=\"top\">
-    ".EMAIL_TIMESTAMP.":<br />
-    <STRONG class=\"admin_misc\">".MAKE_DATETIME($bonus[7], "0")."</STRONG>
-  </TD>
-</TR>
-<TR>
-  <TD align=\"center\" class=\"top2 admin_del_link\" colspan=\"3\">
-    <A href=\"".URL."/modules.php?module=admin&amp;what=del_email&amp;bid=".$bonus[0]."\">".ADMIN_DELETE_BONUS_MAIL."</A>
-  </TD>
-</TR>");
-               }
+               $OUT = '';
+               while ($content = sqlFetchArray($result_bonus)) {
+                       // Add link to list_unconfirmed what-file
+                       $content['unconfirmed'] = generateUnconfirmedAdminLink($content['id'], $content['unconfirmed'], 'bonus');
+
+                       // Prepare content
+                       $content['timestamp']   = generateDateTime($content['timestamp'], 0);
+
+                       // Load row template
+                       $OUT .= loadTemplate('admin_list_bonus_emails_row', TRUE, $content);
+               } // END - while
 
                // Add navigation (without change box but with colspan=3)
-               if ($PAGES > 1) ADD_EMAIL_NAV($PAGES, $_CONFIG['mails_page'], false, "3");
+               $content['nav'] = addEmailNavigation($numPages, getMailsPage(), FALSE, 3, TRUE);
 
-               // Output footer
-               OUTPUT_HTML("</TABLE>
-</DIV>");
-               $MAIL = true;
-       }
-}
+               // Prepare content
+               $content['rows'] = $OUT;
+
+               // Load main template
+               loadTemplate('admin_list_bonus_emails', FALSE, $content);
+               $MAIL = TRUE;
+       } // END - if
+} // END - if
 
-if (!$MAIL)
-{
+if ($MAIL === FALSE) {
        // No mail orders fond
-       OUTPUT_HTML("<SPAN class=\"admin_failed\">".ADMIN_NO_MAILS_IN_POOL."</SPAN>");
-}
-//
+       displayMessage('{--ADMIN_NO_MAILS_IN_POOL--}');
+} // END - if
+
+// [EOF]
 ?>