function adminDataBase($dbAr) { $z = extract($dbAr); //echo "<p>Database= $database</p>\n"; $gofor = $_REQUEST['gofor'] ? $_REQUEST['gofor'] : ''; if (!$gofor) { openFormA('', '', $pageref, 'POST', '', '', ''); echo "<p><strong>Table: "; radioInput('admintab', 'bldinfo'); echo "Variable information "; radioInput('admintab', 'persons'); echo "Authorized users "; echo "</p>\n"; closeForm('Administrator', '', ''); } else { $table = $_REQUEST['admintab'] ? $_REQUEST['admintab'] : $table; if ($table == 'bldinfo') { $indx = 'vid'; $display = "ctrlname||'_'||var AS row"; } elseif ($table == 'persons') { $indx = 'pid'; $display = 'wsuid'; } else { $indx = ''; } $tabl = new Listing6($database, $table, $indx, $display, array(), true); $tabl->updateBuildInfo('ctrlname', 99, '', 'Mode', 0, "values=manage\tsubmit"); $tabl->updateBuildInfo('var', 12, '', 'Variable name', 0, ''); $tabl->manageListing($pageref, array('admintab' => $table)); } return 2; }
function qList($var, $dyn) { //echo "<p>SQL:\n"; $sql = $this->fetchQuery($var); //echo "$sql</p>\n"; $xSet = 'XSet' . $dyn; echo "<p id=\"{$xSet}\"><strong>", $this->getVarTitle($var), "</strong>\n"; hiddenInput('VarX' . $dyn, $var); if ($dyn > 1) { radioInput('BoolX' . $dyn, 'AND'); echo "AND\n"; radioInput('BoolX' . $dyn, 'OR'); echo "OR\n"; } if ($sql) { $rX = $this->xQuery($sql, 1); selectFromQuery($rX, 'SelX' . $dyn, $this->getQParmName($var, 'key'), '', $this->getQParmName($var, 'var'), '', '', ''); killResult($rX); } else { $arOpts = $this->getItemOpts($var); if ($arOpts['dated']) { $currTime = time(); $dayOfWeek = date('N', $t); if ($dayOfWeek > 6) { $dayOfWeek = 0; } $Sunday = $currTime - 24 * 3600 * $dayOfWeek; $nextSunday = $currTime + (7 - $dayOfWeek) * 24 * 3600; $Saturday = 6 * 24 * 3600 + $Sunday; $nextSaturday = 6 * 24 * 3600 + $nextSunday; $thisMonth = date('Y-m-01', $currTime) . '_' . date('Y-m-t', $currTime); $thisWeek = date('Y-m-d', $Sunday) . '_' . date('Y-m-d', $Saturday); $nextWeek = date('Y-m-d', $nextSunday) . '_' . date('Y-m-d', $nextSaturday); $today = date('Y-m-d'); selectFromArray('SelX' . $dyn, array("__lt{$today}", "__eq{$today}", "__rg{$thisWeek}", "__rg{$nextWeek}", "__rg{$thisMonth}", "__gt{$today}"), '', array('Before today', 'Today', 'This week', 'Next week', 'This month', 'After today'), '', '', ''); } elseif ($arOpts['specify']) { echo " like <input type=\"text\" id=\"SelX{$dyn}\" name =\"SelX{$dyn}\" size=\"16\" />\n"; } else { selectFromArray('SelX' . $dyn, '', '', explode('\\t', $arOpts['values']), '', '', ''); } } echo "<span style=\"color: #600;\" onClick=\"removeOpt('{$dyn}');\" >Scratch</span>\n"; echo "</p>\n"; }
function radioButtonChain($name, $arr, $current, $stacked) { foreach ($arr as $k => $v) { if ($k == $current) { radioInputCk($name, $k); } else { radioInput($name, $k); } echo $v; if ($stacked) { echo "<br />"; } echo "\n"; } return 0; }