8 function returnMasterLanguageList() {
9 $retVal = Array(
'en_US' =>
'English',
'es_US' =>
'Spanish',
'pl_US' =>
'Polish');
13 function cu_footer() {
14 echo
'</body></html>';
17 function cu_header($title, $focus=
"") {
22 global $CU2_FRAMEFREE;
27 <meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1" />';
31 $mstyle=(is_readable(
"/home/${chome}/public_html/lindex.css")
34 } elseif (($Fset2 & $CU2_FRAMEFREE) == $CU2_FRAMEFREE ) {
35 $mstyle=(is_readable(
"/home/${chome}/public_html/findex.css")
38 }
else { $mstyle =
"/mindex.css"; }
39 echo
'<link rel=stylesheet href="/~' . $chome . $mstyle .
'" 42 echo
'<link rel=stylesheet href="/monitor/css/monitor.css" type="text/css">';
44 echo
"<title>$title</title> 45 <meta name = 'format-detection' content = 'telephone=no'> 50 echo
"<body onLoad=\"self.focus();document.$focus.focus()\">";
54 function cu_message($msg) {
64 function dms_disphtml($text,$charset=
'ISO-8859-1') {
65 return htmlspecialchars(trim($text),ENT_COMPAT,$charset);
68 function disp_i18n($msg,$mode=ENT_COMPAT) {
69 # Polish characters are passed as numeric entity codes 70 # be sure any existing codes in the text are passed unchanged 71 # translate the htmlspecial character 72 $msg=htmlspecialchars(trim($msg),$mode);
73 # and then put back the numeric entity codes 74 $msg=str_replace(
'&#',
'&#',$msg);
79 function isdate($pDate) {
89 if (preg_match(
"#^([0-9]{1,2})[/.-]{1}([0-9]{1,2})[/.-]{1}([0-9]{2,4})$#", $pDate, $regs)) {
93 return checkdate($m_val, $d_val, $y_val);
106 function dms_checkdate() {
111 if (func_num_args() == 1) {
112 $date_arg = func_get_arg(0);
115 if (preg_match(
"#^([0-9]{1,2})[/-]{1}([0-9]{1,2})[/-]{1}([0-9]{2,4})$#", $date_arg, $regs)) {
122 } elseif (func_num_args() == 3) {
123 $arg_date = func_get_args();
125 if ((strval(intval($arg_date[0])) != strval($arg_date[0])) || (strval(intval($arg_date[1])) != strval($arg_date[1])) || (strval(intval($arg_date[2])) != strval($arg_date[2]))) {
128 $m_val = $arg_date[0];
129 $d_val = $arg_date[1];
130 $y_val = $arg_date[2];
139 $retval = checkdate(intval($m_val), intval($d_val), intval($y_val));