3 $dms_ok=array(
'alert'=>
'string',
'action'=>
'string',
'a_msg'=>
'string',
4 'AddChange'=>
'string',
'aname'=>
'string',
'smstext'=>
'string',
5 'sstart'=>
'string',
'sstop'=>
'string',
'todelete'=>
'string',
6 'rstat'=>
'string',
'msg'=>
'string');
8 dms_import_v2($SYSENV,
"ALERT", $dms_ok);
9 $SYSENV[
"ALERT"][
"alert"] = (empty($SYSENV[
"ALERT"][
"alert"]) ?
"" : trim($SYSENV[
"ALERT"][
"alert"]));
10 $SYSENV[
"ALERT"][
"self"] = $menu_link;
11 $SYSENV[
"ALERT"][
"main_url"] = $menu_link;
12 $SYSENV[
"ALERT"][
"helpicon"]=
"<img src='/IMAGES/q1.gif' border=0 alt='View Help' valign='top'>";
13 $SYSENV[
"ALERT"][
"helpdoc"]=
"../static/html/AlertHelp.html";
14 $SYSENV[
"ALERT"][
"action"] = trim(strtolower((empty($SYSENV[
"ALERT"][
"action"]) ?
"OK" : $SYSENV[
"ALERT"][
"action"])));
15 $SYSENV[
"ALERT"][
"msg"] = (empty($SYSENV[
"ALERT"][
"msg"]) ?
"NO MESSAGE" : $SYSENV[
"ALERT"][
"msg"]);
16 $SYSENV[
"ALERT"][
"today"] = date(
"m/d/Y");
17 $SYSENV[
"ALERT"][
"twoweeks"] = date(
"m/d/Y",mktime (0,0,0,date(
"m") ,date(
"d")+14,date(
"Y")));
18 $SYSENV[
"ALERT"][
"allow_html"] =
"<B><I><P><A><LI><OL> <UL><EM><BR><TT><STRONG><BLOCKQUOTE>";
19 $SYSENV[
"ALERT"][
"chome"]= strtolower($Cu);
20 extract($SYSENV[
"ALERT"]);
24 alert_update($SYSENV,
"delete alert");
27 confirm($SYSENV, $alert, $action);
32 alert_update($SYSENV,
"$action");
35 stretchdate($SYSENV,
"$msg");
39 $SYSENV[
"ALERT"][
"alert"]=
"";
42 getalert($SYSENV,
"$msg");
47 function alert_update($SYSENV, $action) {
49 extract($SYSENV[
"globals"]);
50 extract($SYSENV[
"ALERT"]);
55 if ($action ==
"add" || $action ==
"save" || $action ==
"save dates") {
56 $aname= (trim($aname) ==
"" ?
"" : prep_save($aname));
57 $sstart = (trim($sstart) ==
"" ?
"$today" : $sstart);
58 $sstop = (trim($sstop) ==
"" ?
"$twoweeks" : $sstop);
59 $a_msg= (trim($a_msg) ==
"" ?
"" : $a_msg);
61 # need to check start and stop dates here 62 if (trim($alert) ==
""){ $msg .=
"<li>Please Select an Alert Message</li>\n"; }
63 if (preg_match(
"/^ *$/",$alert)) { $msg .=
"<li>Invalid Alert ID</li>\n";}
64 if (($starttime = strtotime($sstart)) === -1) {
65 $msg .=
"<li>Invalid Start Date</li>\n";
67 list($mm,$dd,$yyyy) = explode(
"/",$sstart);
68 if (!validateDate(
"$mm",
"$dd",
"$yyyy")) {
69 $msg .=
"<li>Invalid Start Date</li>\n";}
71 if (($stoptime = strtotime($sstop)) === -1) {
72 $msg .=
"<li>Invalid Stop Date</li>\n";
74 list($mm,$dd,$yyyy) = explode(
"/",$sstop);
75 if (!validateDate(
"$mm",
"$dd",
"$yyyy")) {
76 $msg .=
"<li>Invalid Stop Date</li>\n";}
78 if ($starttime > $stoptime) {
79 $msg .=
"<li>Start Date must be before Stop Date</li>\n";}
81 if (strlen($a_msg) > 500) {
83 $msg .=
"<li>$ques_test text is too long. Maximum length is 500 characters</li>\n";}
85 if (strlen($smstext) > 250) {
86 $l = strlen($smstext);
87 $msg .=
"<li>SMS TXT message text is too long. Maximum length is 250 characters</li>\n";}
89 $a_msg = prep_save(strip_tags($a_msg, $allow_html));
90 $smstext = prep_save(strip_tags($smstext));
98 $sql =
"delete from cualertmsgs 99 where alertid='$alert' and cu='$Cu'; ";
103 $sql=
"update cualertmsgs set 104 startdate='$sstart', stopdate='$sstop', 105 alertname='$aname', message='$a_msg', 107 sms_message = '$smstext' 108 where alertid='$alert' and cu='$Cu'";
114 $sql=
"update cualertmsgs set 118 and alertid = $alert";
124 $sql =
"insert into cualertmsgs (cu,alertid, startdate, 125 stopdate, alertname, message, runstat, 126 sms_message) values ( 127 '$Cu',nextval('cualertmsgs_alertid_seq'), 128 '$sstart','$sstop','$aname','$a_msg', 129 $rstat, '$smstext' );";
132 $sth = db_query($sql,$dbh);
133 $msg = pg_errormessage();
137 $notify->line=__LINE__;
138 $notify->file=__FILE__;
139 $notify->callingfunction = __FUNCTION__;
142 $notify->survey=
"$alert";
146 if ($msg ==
"") { update_success($SYSENV, $what);}
148 db_free_result($sth);
153 stretchdate($SYSENV,
"$msg");
156 $SYSENV[
"ALERT"][
"alert"]=
"";
160 getalert($SYSENV, $msg);
165 function getalert($SYSENV, $msg) {
167 extract($SYSENV[
"globals"]);
168 extract($SYSENV[
"ALERT"]);
171 <script language=
"javascript">
173 function show_help(marker)
175 helpwin=window.open(marker,
"_Help",
"toolbar=1,location=0,directories=0,status=1,menubar=0,scrollbars=1,resizable=0,width=500,height=340");
178 function show_preview(status)
180 var marker=
"SurveyView?cu=$Cu&chome=$chome&viewmsg=2&showid=";
181 var marker=
"main.prg?ft=51&cu=$Cu&chome=$chome&viewmsg=2&showid=";
182 helpwin=window.open(marker + status,
"_Preview",
"toolbar=1,location=0,directories=0,status=1,menubar=0,scrollbars=1,resizable=0,width=600,height=380");
189 if (trim($alert)==
"") {
190 $urlfindadd=urlencode(
"Find or Add");
191 $urldelalert=urlencode(
"Delete Alert");
194 $sql=
"select alertid, alertname, 195 to_char(startdate,'mm/dd/yy'), 196 to_char(stopdate,'mm/dd/yy'), 197 case when stopdate < CURRENT_DATE then 3 198 when startdate > CURRENT_DATE then 1 199 else 2 end as datestat, 203 order by 5, 4 desc, 3 desc";
205 $sth = db_query($sql,$dbh);
207 <div align=center><br><form action=
"$self">
208 <input type=
"hidden" name=
"ft" value=
"$ft">
209 <table width=95% cellspacing=1 cellpadding=4 border=0>
210 <tr><td
class=
"bar" colspan=4 align=center>$Cu Alert Messages</td></tr>
212 if (
"$msg" !=
"NO MESSAGE") {
214 <tr><td
class=
"msg" align=right><img src=
'/IMAGES/alert.black.gif'></td>
215 <td
class=
"msg" colspan=3>$msg</td></tr>
221 <tr><td
class=
"hdr" NOWRAP>Alert Messages
222 <a href=
'javascript:show_help("$helpdoc#top");'>$helpicon</a></td>
223 <td
class=
"hdr" NOWRAP>Status
224 <a href=
'javascript:show_help("$helpdoc#status");'>$helpicon</a></td>
225 <td
class=
"hdr" NOWRAP>Run Dates
226 <a href=
'javascript:show_help("$helpdoc#dates");'>$helpicon</a></td>
227 <td
class=
"hdr" align=
"right">
228 <a href=
"$self?ft=$ft&action=${urlfindadd}&alert=new" class=
"white_link">New Alert Message</a>
229 <a href=
'javascript:show_help("$helpdoc#new");'>$helpicon</a></td></tr>
232 for ($row=0;list($alert, $aname, $sstart, $sstop, $dstat, $rstat) = db_fetch_array($sth,$row); $row++) {
233 switch ($dstat * $rstat){
247 $urlaname=urlencode(
"$aname");
249 <tr
class=
"$rbg"><td
class=
"usul" colspan=
'3'>
250 <a href=
"$self?ft=$ft&alert=$alert&action=$urlfindadd">$aname</a></td>
251 <td
class=
"usul"> </td></tr>
252 <tr
class=
"$rbg"><td
class=
"usul"> </td>
253 <td
class=
"usul">$sstat</td>
254 <td
class=
"usul">$sstart - $sstop</td>
255 <td
class=
"usul" ><font size=-1>
257 <a href=
"$self?ft=$ft&alert=$alert&action=$urlfindadd"> Edit </a>
258 <a href=
'javascript:show_help("$helpdoc#edit");'>$helpicon</a> |
263 <a href=
"javascript:show_preview('$alert')"> View </a>
264 <a href=
'javascript:show_help("$helpdoc#preview");'>$helpicon</a> |
269 <a href=
'javascript:show_help("$helpdoc#preview");'>$helpicon</a> |
275 <a href=
"$self?ft=$ft&alert=$alert&action=stretchdate"> Extend Date </a>
276 <a href=
'javascript:show_help("$helpdoc#extend");'>$helpicon</a> |
281 <font size=
"1">Extend Date</font>
282 <a href=
'javascript:show_help("$helpdoc#extend");'>$helpicon</a> |
286 <a href=
"$self?ft=$ft&alert=$alert&action=$urldelalert&aname=$urlaname"> Delete </a>
287 <a href=
'javascript:show_help("$helpdoc#delete");'>$helpicon</a>
290 $rbg = ($rbg ==
"odd" ?
"even" :
"odd");
293 print
"</table></form></div>";
298 function sendform(action)
300 document.forms[0].action.value=action;
301 document.forms[0].submit();
303 function validate(mode, chgrun)
305 var strAlert = document.forms[0].alert.value;
307 var patSpaces = /^ *$/;
315 if (strAlert.length == 0)
316 { strMessage +=
"Please Select an Alert ID.\\n";}
317 if (patSpaces.exec(strAlert) !=
null)
318 { strMessage +=
"Invalid Alert ID.\\n";}
319 if (strAlert.indexOf(
"'") != -1 || strAlert.indexOf(
'"') != -1)
320 { strMessage +=
"Invalid Characters in Alert ID.\\n";}
322 if (strMessage.length > 0)
327 document.forms[0].action.value=mode;
328 document.forms[0].submit();
337 $loadform = isset($a_msg);
338 if ($loadform == 0 ) {
339 $alertId = ctype_digit( $alert ) ? $alert : 0;
340 $sql=
"select to_char(startdate,'mm/dd/yyyy'), 341 to_char(stopdate,'mm/dd/yyyy'), 342 alertname, message, runstat, sms_message 344 where alertid='$alertId' and cu='$Cu'";
345 $sth = db_query($sql,$dbh);
346 if (list($sstart, $sstop, $aname, $a_msg, $rstat, $smstext)
347 = db_fetch_array($sth,0)) {
353 $aname = (trim($aname) ==
"" ?
"" : trim($aname));
354 $a_msg= (trim($a_msg) ==
"" ?
"" : trim($a_msg));
355 $sstart = (trim($sstart) ==
"" ?
"$today" : $sstart);
356 $sstop = (trim($sstop) ==
"" ?
"$twoweeks" : $sstop);
357 $rstat = ($rstat ==
"" ? 0 : $rstat);
364 $aname = (trim($aname) ==
"" ?
"" : trim($aname));
365 $a_msg= (trim($a_msg) ==
"" ?
"" : trim($a_msg));
366 $smstext = (trim($smstext) ==
"" ?
"" : trim($smstext));
367 $a_msg= htmlspecialchars($a_msg);
368 $smstext = htmlspecialchars($smstext);
370 <div align=center><br><form name=
"alertform" action = $self>
371 <input type=
"hidden" name=
"ft" value=
"$ft">
372 <table width=90% cellspacing=0 cellpadding=3 border=0>
373 <tr><td
class=
"bar" colspan=2 align=center>$Cu Alert Messages</td></tr>
375 if ($msg !=
"NO MESSAGE") {
376 print
"<tr><td class='msg' colspan=2 align=left> 377 <ul>Error: $msg</ul></font></td></tr>";
380 <tr><td
class=
"hdr">Alert Message Details </td>
381 <td
class=
"hdr">
382 <input type=hidden name=alert value=
"$alert">
383 <input type=hidden name=
"action" value=
""></td>
384 <input type=hidden name=
"AddChange" value=
"$AddChange">
386 <tr><td
class=
"small" align=
"right" nowrap>Alert Message Name <a href=
'javascript:show_help("$helpdoc#name");'>$helpicon</a> </td>
387 <td
class=
"small" align=
"left">
388 <input type=
"text" name=
"aname" size=
"25" maxlength=
"50" value=
"$aname"></td>
390 <tr><td
class=
"small" align=
"right">Run Dates <a href=
'javascript:show_help("$helpdoc#dates");'>$helpicon</a> </td>
391 <td
class=
"small" align=
"left">
392 <input type=text name=
"sstart" size=
"10" maxlength=
"10" value=
"$sstart"> to
393 <input type=text name=
"sstop" size=
"10" maxlength=
"10" value=
"$sstop"></td>
396 <tr><td
class=
"small" align=
"right">Status <a href=
'javascript:show_help("$helpdoc#survstat");'>$helpicon</a> </td><td
class=
"small" align=
"left"><input type=
"radio" name=
"rstat" value=
"1" 398 if ($rstat == 1) {print
" checked";}
400 > Running
401 <input type=
"radio" name=
"rstat" value=
"0" 403 if ($rstat == 0) {print
" checked";}
409 $view_allow_html = htmlspecialchars($allow_html);
411 <tr><td colspan=2
class=
"small" align=
"center"><hr width=60%></td></tr>
413 <td
class=
"small" align=
"right" valign=
"top">
414 E-mail Message <a href=
'javascript:show_help("$helpdoc#alertm");'>$helpicon</a>
416 <td
class=
"small" align=
"left">
417 <textarea cols=
"25" rows=
"6" wrap=
"virtual" name=
"a_msg">$a_msg</textarea><br>
418 Allowed HTML: <font size=
"1">$view_allow_html</font>
422 <td
class=
"small" align=
"right" valign=
"top">SMS TXT Message <a href=
'javascript:show_help("$helpdoc#alertw");'>$helpicon</a> </td><td
class=
"small" align=
"left"><textarea cols=
"25" rows=
"3" wrap=
"virtual" name=
"smstext">$smstext</textarea></td></tr>
426 <tr><td
class=
"hdr" colspan=2 align=center><hr>
427 <input type=button value=
"$AddChange" onClick=
"validate('$AddChange','$chgrun');">
429 if ($AddChange ==
"Save") {
431 <a href=
'javascript:show_help("$helpdoc#save");'>$helpicon</a>
432 <input type=button value=
"Delete Alert" onClick=
"sendform('Delete Alert');"><a href=
'javascript:show_help("$helpdoc#edit_delete");'>$helpicon</a>
436 <a href=
'javascript:show_help("$helpdoc#add");'>$helpicon</a>
439 print
"<input type=button value=\"Cancel\" onClick=\"sendform('Cancel');\"> 440 <a href='javascript:show_help(\"$helpdoc#cancel\");'>$helpicon</a></td></tr></table></form></div>";
444 function stretchdate($SYSENV, $msg) {
445 extract($SYSENV[
"globals"]);
446 extract($SYSENV[
"ALERT"]);
449 <script language=
"javascript">
451 function show_help(marker)
453 helpwin=window.open(marker,
"_Help",
"toolbar=1,location=0,directories=0,status=1,menubar=0,scrollbars=1,resizable=0,width=500,height=340");
460 if (trim($alert)==
"") {
465 function sendform(action)
467 document.forms[0].action.value=action;
468 document.forms[0].submit();
473 $sql =
"select to_char(startdate,'mm/dd/yyyy') as sstart, 474 to_char(stopdate,'mm/dd/yyyy') as sstop, 477 where m.alertid = $alert 479 order by stopdate, m.alertid";
481 $sth = db_query($sql,$dbh);
483 if (db_num_rows($sth) == 0 ) {
488 # get just the first row and format the heading 490 list( $sstart, $sstop, $aname, $a_msg ) =
491 db_fetch_array($sth,$row);
493 $aname = (trim($aname) ==
"" ?
"" : trim($aname));
494 $a_msg= (trim($a_msg) ==
"" ?
"" : trim($a_msg));
495 $sstart = (trim($sstart) ==
"" ?
"$today" : $sstart);
496 $sstop = (trim($sstop) ==
"" ?
"$twoweeks" : $sstop);
497 $atext = (trim($atext) ==
"" ?
"" : $atext);
500 <div align=center><br><form name=
"dateform" action = $self>
501 <input type=
"hidden" name=
"ft" value=
"$ft">
502 <table width=90% cellspacing=0 cellpadding=3 border=0>
503 <tr><td
class=
"bar" colspan=2 align=center>$Cu Alert Message Date Change</td></tr>
505 if ($msg !=
"NO MESSAGE") {
506 print
"<tr><td class='msg' colspan=2 align=left> 507 <ul>Error: $msg</ul></font></td></tr>";
510 <tr><td
class=
"hdr" colspan=2>
511 <input type=hidden name=alert value=
"$alert">
512 <input type=hidden name=
"action" value=
""></td>
514 <tr><td
class=
"small" align=
"right">Alert Message Name <a href=
'javascript:show_help("$helpdoc#name");'>$helpicon</a> </td>
515 <td
class=
"small">$aname</td>
517 <tr><td
class=
"small" align=
"right">Run Dates <a href=
'javascript:show_help("$helpdoc#dates");'>$helpicon</a> </td>
519 <input type=text name=
"sstart" size=
"10" maxlength=
"10" value=
"$sstart">
521 <input type=text name=
"sstop" size=
"10" maxlength=
"10" value=
"$sstop"></td>
523 <tr><td colspan=2
class=
"small"><hr width=60%></td></tr>
524 <tr><td
class=
"small"> </td>
525 <td
class=
"small">
526 <input type=button value=
"Save Dates" onClick=
"sendform('Save Dates');"><a href=
'javascript:show_help("$helpdoc#savedate");'>$helpicon</a>
527 <input type=button value=
"Cancel" onClick=
"sendform('Cancel');"><a href=
'javascript:show_help("$helpdoc#cancel");'>$helpicon</a></td></tr>
529 <table border=0 CELLSPACING=0 CELLPADDING=3 width=90%>
530 <tr><td CLASS=ahd>$a_msg</td></tr>
531 <tr><td> <font size=-1>$atext</font></td></tr>
535 # Now get the rest of the rows and format the possible answers 538 for ($row=1; list( $sstart, $sstop, $aname, $a_msg, $atext ) =
539 db_fetch_array($sth,$row); $row++) {
542 <tr><td> <font size=-1>$atext</font></td></tr>
548 db_free_result($sth);
554 function confirm($SYSENV, $alert, $action) {
555 extract($SYSENV[
"globals"]);
556 extract($SYSENV[
"ALERT"]);
559 getalert(
"You must enter a alert number");
563 $aname = (trim($aname) ==
"" ?
"" : trim($aname));
566 <div align=center><br><form action=
"$self">
567 <input type=
"hidden" name=
"ft" value=
"$ft">
568 <table width=90% cellspacing=0 cellpadding=4 border=0>
569 <tr><td
class=
"bar" colspan=2 align=center>$Cu Alert Messages</td></tr>
570 <tr><td
class=
"ahd" colspan=2 align=center>Warning! This action will
delete all the alert
'$aname'.<br>Do you wish to
continue?</td></tr>
573 <tr><td
class=
"hdr" colspan=2><hr></td>
574 <tr><td
class=
"hdr" align=right>
575 <input type=submit name=
"action" value=
"Yes">
577 <td
class=
"hdr" align=left>
578 <input type=submit name=
"action" value=
"No">
582 <input type=hidden name=
"alert" value=
"$alert">
583 <input type=hidden name=
"todelete" value=
"delete alert">
588 function update_success($SYSENV, $what) {
589 extract($SYSENV[
"globals"]);
590 extract($SYSENV[
"ALERT"]);
592 $msg=urlencode(
"Alert Message $what Successfully");
593 header(
"Location: $main_url?ft=$ft&msg=$msg");
595 function error_exit($reason) {
598 <TABLE BORDER=0 CELLPADDING=6 WIDTH=90%>
599 <tr><td CLASS=
"bar" align=
"center">$Cu Alert Messages
601 <td
class=
'hdr' align=
'center'>
602 Unable to complete your request</td></tr>
603 <tr><td
class=
'dtl' align=
'center'>