function displayCalendar($formframes, $mainforms = "", $viewHandles, $dateHandles, $filters, $viewPrefixes, $scopes, $hidden, $type = "month", $start = "", $multiPageData = "")
{
global $xoopsDB, $xoopsUser;
global $xoopsTpl;
// Set some required variables
$mid = getFormulizeModId();
for ($i = 0; $i < count($formframes); $i++) {
unset($fid);
unset($frid);
if ($mainforms[$i]) {
list($fid, $frid) = getFormFramework($formframes[$i], $mainforms[$i]);
} else {
list($fid, $frid) = getFormFramework($formframes[$i]);
}
$fids[] = $fid;
$frids[] = $frid;
}
$gperm_handler =& xoops_gethandler('groupperm');
$member_handler =& xoops_gethandler('member');
$groups = $xoopsUser ? $xoopsUser->getGroups() : array(0 => XOOPS_GROUP_ANONYMOUS);
$uid = $xoopsUser ? $xoopsUser->getVar('uid') : 0;
foreach ($fids as $thisFid) {
// check that the user is allowed to see all the fids
if (!($scheck = security_check($thisFid, "", $uid, "", $groups, $mid, $gperm_handler))) {
print "<p>" . _NO_PERM . "</p>";
return;
}
}
$currentURL = getCurrentURL();
// get the current view, ie: the month
if ($_POST['calview']) {
// if we're recieving a view from a form submission...
$settings['calview'] = $_POST['calview'];
} else {
if (!$start) {
// nothing passed from form, and no default value specified, so use current date
$today = getDate();
if ($today['mon'] < 10) {
$today['mon'] = "0" . $today['mon'];
}
$settings['calview'] = $today['year'] . "-" . $today['mon'];
} else {
$settings['calview'] = $start;
}
}
$settings['calfrid'] = $_POST['calfrid'];
$settings['calfid'] = $_POST['calfid'];
$settings['calhidden'] = $hidden;
// check to see if a switch to a form has been requested
$settings['ventry'] = $_POST['ventry'];
if ($settings['ventry']) {
if ($_POST['ventry'] == "addnew") {
$this_ent = "";
$dateOverride = $_POST['adddate'];
} elseif ($_POST['ventry'] == "proxy") {
// support for proxies not currently written
$this_ent = "proxy";
} else {
$this_ent = $_POST['ventry'];
}
if ($_POST['calfrid']) {
if (isset($multiPageData[$_POST['calfid']])) {
if (is_numeric($multiPageData[$_POST['calfid']])) {
// numeric value indicates a screen id
$screenData = readScreenId($multiPageData[$_POST['calfid']], $_POST['calfid']);
if (is_array($screenData)) {
$multiPageData = $screenData;
}
}
include_once XOOPS_ROOT_PATH . "/modules/formulize/include/formdisplaypages.php";
displayFormPages($_POST['calfrid'], $this_ent, $_POST['calfid'], $multiPageData[$_POST['calfid']]['pages'], $multiPageData[$_POST['calfid']]['conditions'], $multiPageData[$_POST['calfid']]['introtext'], $multiPageData[$_POST['calfid']]['thankstext'], $currentURL, _formulize_CAL_RETURNFROMMULTI, $settings, $dateOverride, $multiPageData[$_POST['calfid']]['printall']);
} else {
displayForm($_POST['calfrid'], $this_ent, $_POST['calfid'], $currentURL, "", $settings, "", $dateOverride, 1, 1);
// first "" is the done text, second is the onetoonetitles, last two 1s are the overrides for multi form behaviour
}
return;
} else {
if (isset($multiPageData[$_POST['calfid']])) {
if (is_numeric($multiPageData[$_POST['calfid']])) {
// numeric value indicates a screen id
$screenData = readScreenId($multiPageData[$_POST['calfid']], $_POST['calfid']);
if (is_array($screenData)) {
$multiPageData = $screenData;
}
}
include_once XOOPS_ROOT_PATH . "/modules/formulize/include/formdisplaypages.php";
displayFormPages($_POST['calfid'], $this_ent, "", $multiPageData[$_POST['calfid']]['pages'], $multiPageData[$_POST['calfid']]['conditions'], $multiPageData[$_POST['calfid']]['introtext'], $multiPageData[$_POST['calfid']]['thankstext'], $currentURL, _formulize_CAL_RETURNFROMMULTI, $settings, $dateOverride, $multiPageData[$_POST['calfid']]['printall']);
} else {
displayForm($_POST['calfid'], $this_ent, "", $currentURL, "", $settings, "", $dateOverride, 1, 1);
// "" is the done text
}
return;
}
}
// handle deletion if requested, added sept 18 2005
if ($_POST['delentry']) {
deleteEntry($_POST['delentry'], $_POST['delfrid'], $_POST['delfid'], $gperm_handler, $member_handler, $mid);
}
// get the data for all the fids
// 1. convert the scopes for each one
// 2. do the extraction (filter by calview)
include_once XOOPS_ROOT_PATH . "/modules/formulize/include/extract.php";
for ($i = 0; $i < count($fids); $i++) {
$scope = "";
if ($scopes[$i]) {
list($scope, $throwAwayCurrentView) = buildScope($scopes[$i], $member_handler, $gperm_handler, $uid, $groups, $fids[$i], $mid);
}
if (is_array($dateHandles[$i])) {
$dateField = $dateHandles[$i][0];
$dateField2 = $dateHandles[$i][1];
} else {
$dateField = $dateHandles[$i];
$dateField2 = "";
}
if (!$frids[$i]) {
$filterDH = $dateField;
$filterDH2 = $dateField2;
} else {
$filterDH = $dateField;
$filterDH2 = $dateField2;
}
// new, complex filter format is:
// $filter[0][0] -- andor setting for filter 0
// $filter[0][1] -- filter for filter 0
$filter = array();
$filter[0][0] = "OR";
$filter[0][1] = $filterDH . "/**/" . $settings['calview'];
if ($filterDH2) {
$filter[0][1] .= "][" . $filterDH2 . "/**/" . $settings['calview'];
}
if ($filters[$i]) {
$filter[1][0] = "AND";
$filter[1][1] = $filters[$i];
}
$data[$i] = getData($frids[$i], $fids[$i], $filter, "AND", $scope);
$data[$i] = resultSort($data[$i], $dateField);
}
// need the formatting magic to go here, to whip it all into a nice calendar
// basic display of data is below
// demonstrates linking to a form for updating/viewing that entry
// demonstrates altering the calview setting to change months
// need to do something a little more complex for adding a new entry, since we have to know for which fid/frid pair the add operation is being requested.
// probably best to leave out adding for now and leave it as a future feature. It can always be custom added within a pageworks page if necessary for a particular calendar
$rights = $gperm_handler->checkRight("add_own_entry", $fid, $groups, $mid);
// information to pass to the template
global $calendarData;
// initialize language constants
global $arrayMonthNames;
global $arrayWeekNames;
global $dateMonthStartDay;
$arrayMonthNames = array(_formulize_CAL_MONTH_01, _formulize_CAL_MONTH_02, _formulize_CAL_MONTH_03, _formulize_CAL_MONTH_04, _formulize_CAL_MONTH_05, _formulize_CAL_MONTH_06, _formulize_CAL_MONTH_07, _formulize_CAL_MONTH_08, _formulize_CAL_MONTH_09, _formulize_CAL_MONTH_10, _formulize_CAL_MONTH_11, _formulize_CAL_MONTH_12);
if ($type == "mini_month") {
$arrayWeekNames = array(_formulize_CAL_WEEK_1_3ABRV, _formulize_CAL_WEEK_2_3ABRV, _formulize_CAL_WEEK_3_3ABRV, _formulize_CAL_WEEK_4_3ABRV, _formulize_CAL_WEEK_5_3ABRV, _formulize_CAL_WEEK_6_3ABRV, _formulize_CAL_WEEK_7_3ABRV);
} else {
$arrayWeekNames = array(_formulize_CAL_WEEK_1, _formulize_CAL_WEEK_2, _formulize_CAL_WEEK_3, _formulize_CAL_WEEK_4, _formulize_CAL_WEEK_5, _formulize_CAL_WEEK_6, _formulize_CAL_WEEK_7);
}
// convert string date into parts
$arrayDate = getdate(strtotime($settings['calview'] . "-01"));
$dateMonth = $arrayDate["mon"];
$dateDay = $arrayDate["mday"];
$dateYear = $arrayDate["year"];
// get the number of days in the month.
$dateMonthDays = days_in_month($dateMonth, $dateYear);
// get the month's first week start day.
$dateMonthStartDay = $arrayDate["wday"];
// get the number of weeks.
$dateMonthWeeks = week_in_month($dateMonthDays) + 1;
// intialize MONTH template information
// each cell is an array:
// [0] - is control information, where each entry is an array:
// [0] - day number
// [1] - send date
// [1] - is an array containing all items, where each item is also an array:
// [0] - $ids[0]
// [1] - $frids[$i]
// [2] - $fids[$i]
// [3] - $textToDisplay
// [4] - true/false based on user's right to delete this item (based on either delete own, or delete others permission)
if ($type == "month" || $type == "mini_month" || $type == "micro_month") {
// initialize grid: convert the data set into a grid of 7 columns for
// days and a row for each week
$displayDay = "";
for ($intWeeks = 0; $intWeeks < $dateMonthWeeks; $intWeeks++) {
$calendarData[$intWeeks] = array();
for ($intDays = 0; $intDays < 7; $intDays++) {
// check to see if the processing day is the start day.
if ($intWeeks == 0 && $displayDay == "") {
if ($intDays == $dateMonthStartDay) {
$displayDay = 1;
}
} else {
if ($displayDay != "") {
$displayDay++;
if ($displayDay > $dateMonthDays) {
$displayDay = "";
}
}
}
$calendarData[$intWeeks][$intDays] = array();
$calendarData[$intWeeks][$intDays][0][0] = $displayDay;
$calendarData[$intWeeks][$intDays][0][1] = $dateYear . "-" . $dateMonth . "-" . ($displayDay < 10 ? "0" . $displayDay : $displayDay);
//$calendarData[$intWeeks][$intDays][1] = array();
}
}
// Initialize template variables
$xoopsTpl->assign('previousMonth', $dateMonth - 1 < 1 ? $dateYear - 1 . "-12" : $dateYear . "-" . ($dateMonth - 1 < 10 ? "0" . ($dateMonth - 1) : $dateMonth - 1));
$xoopsTpl->assign('nextMonth', $dateMonth + 1 > 12 ? $dateYear + 1 . "-01" : $dateYear . "-" . ($dateMonth + 1 < 10 ? "0" . ($dateMonth + 1) : $dateMonth + 1));
$monthSelector = array();
$numberOfMonths = count($arrayMonthNames);
for ($intMonth = 0; $intMonth < $numberOfMonths; $intMonth++) {
$monthName = $arrayMonthNames[$intMonth];
$monthSelector[$intMonth + 1 < 10 ? "0" . ($intMonth + 1) : $intMonth + 1] = $monthName;
}
$xoopsTpl->assign('monthSelector', $monthSelector);
$yearSelector = array();
$startYear = $dateYear - 4;
$endYear = $dateYear + 3;
for ($intYear = $startYear; $intYear <= $endYear; $intYear++) {
$yearSelector[] = $intYear;
}
$xoopsTpl->assign('yearSelector', $yearSelector);
}
// process data set(s)
for ($i = 0; $i < count($data); $i++) {
foreach ($data[$i] as $id => $entry) {
if (!$frids[$i]) {
if (is_array($viewHandles[$i])) {
$formhandle = getFormHandleFromEntry($entry, $viewHandles[$i][0]);
} else {
$formhandle = getFormHandleFromEntry($entry, $viewHandles[$i]);
}
} else {
$formhandle = $mainforms[$i];
}
$ids = internalRecordIds($entry, $formhandle);
if (is_array($viewHandles[$i])) {
$needsep = 0;
// make sure that no data is keep from previous processing
$textToDisplay = "";
foreach ($viewHandles[$i] as $thisVH) {
if ($needsep) {
$textToDisplay .= ", ";
}
$needsep = 1;
$textToDisplay .= display($entry, $thisVH);
}
} else {
$textToDisplay = display($entry, $viewHandles[$i]);
}
if ($viewPrefixes[$i]) {
$textToDisplay = $viewPrefixes[$i] . $textToDisplay;
}
$calendarDataItem = array();
$calendarDataItem[0] = $ids[0];
$calendarDataItem[1] = $frids[$i];
$calendarDataItem[2] = $fids[$i];
$calendarDataItem[3] = $textToDisplay;
$calendarDataItem[4] = ($i == 0 and formulizePermHandler::user_can_delete_entry($fids[$i], display($entry, "uid"), $ids[0]));
if ($type == "month" || $type == "mini_month" || $type == "micro_month") {
if (is_array($dateHandles[$i])) {
$startValue = display($entry, $dateHandles[$i][0]);
$endValue = display($entry, $dateHandles[$i][1]);
if ($startValue && $endValue) {
$startDate = strtotime($startValue);
$endDate = strtotime($endValue);
for ($x = $startDate; $x <= $endDate; $x = $x + 86400) {
$arrayDate = getdate($x);
if ($arrayDate["mon"] == $dateMonth) {
$calendarData = assignItem($arrayDate, $calendarDataItem, $calendarData);
}
}
} else {
if ($startValue) {
$startDate = strtotime($startValue);
$arrayDate = getdate($startDate);
$calendarData = assignItem($arrayDate, $calendarDataItem, $calendarData);
} else {
$endDate = strtotime($endValue);
$arrayDate = getdate($endDate);
$calendarData = assignItem($arrayDate, $calendarDataItem, $calendarData);
}
}
} else {
$currentDate = display($entry, $dateHandles[$i]);
$arrayDate = getdate(strtotime($currentDate));
$calendarData = assignItem($arrayDate, $calendarDataItem, $calendarData);
}
}
}
}
// Initialize common template variables
$xoopsTpl->assign('cal_type', $type);
$xoopsTpl->assign('rights', $rights);
$xoopsTpl->assign('frids', $frids[0]);
$xoopsTpl->assign('fids', $fids[0]);
$xoopsTpl->assign('addItem', _formulize_CAL_ADD_ITEM);
$xoopsTpl->assign('rowStyleEven', true);
$xoopsTpl->assign('MonthNames', $arrayMonthNames);
$xoopsTpl->assign('WeekNames', $arrayWeekNames);
$xoopsTpl->assign('dateMonthZeroIndex', $dateMonth - 1);
$xoopsTpl->assign('dateMonth', $dateMonth);
$xoopsTpl->assign('dateYear', $dateYear);
$xoopsTpl->assign('currentURL', $currentURL);
$xoopsTpl->assign('hidden', $hidden);
$xoopsTpl->assign('calview', $settings['calview']);
$xoopsTpl->assign('calendarData', $calendarData);
$xoopsTpl->assign('delete', _formulize_DELETE);
$xoopsTpl->assign('delconf', _formulize_DELCONF);
// force template to be drawn
$xoopsTpl->display("db:calendar_" . $type . ".html");
}
function drawSubLinks($subform_id, $sub_entries, $uid, $groups, $frid, $mid, $fid, $entry, $customCaption = "", $customElements = "", $defaultblanks = 0, $showViewButtons = 1, $captionsForHeadings = 0, $overrideOwnerOfNewEntries = "", $mainFormOwner = 0, $hideaddentries = "", $subformConditions = null, $subformElementId = 0, $rowsOrForms = 'row', $addEntriesText = _formulize_ADD_ENTRIES, $subform_element_object = null)
{
$nestedSubform = false;
if (isset($GLOBALS['formulize_inlineSubformFrid'])) {
$frid = $GLOBALS['formulize_inlineSubformFrid'];
$nestedSubform = true;
}
$member_handler = xoops_gethandler('member');
$gperm_handler = xoops_gethandler('groupperm');
$addEntriesText = $addEntriesText ? $addEntriesText : _formulize_ADD_ENTRIES;
global $xoopsDB, $nosubforms;
$GLOBALS['framework'] = $frid;
$form_handler = xoops_getmodulehandler('forms', 'formulize');
// limit the sub_entries array to just the entries that match the conditions, if any
if (is_array($subformConditions) and is_array($sub_entries[$subform_id])) {
list($conditionsFilter, $conditionsFilterOOM, $curlyBracketFormFrom) = buildConditionsFilterSQL($subformConditions, $subform_id, $entry, $mainFormOwner, $fid);
// pass in mainFormOwner as the comparison ID for evaluating {USER} so that the included entries are consistent when an admin looks at a set of entries made by someone else.
$subformObject = $form_handler->get($subform_id);
$sql = "SELECT entry_id FROM " . $xoopsDB->prefix("formulize_" . $subformObject->getVar('form_handle')) . "{$curlyBracketFormFrom} WHERE entry_id IN (" . implode(", ", $sub_entries[$subform_id]) . ") {$conditionsFilter} {$conditionsFilterOOM}";
$sub_entries[$subform_id] = array();
if ($res = $xoopsDB->query($sql)) {
while ($array = $xoopsDB->fetchArray($res)) {
$sub_entries[$subform_id][] = $array['entry_id'];
}
}
}
include_once XOOPS_ROOT_PATH . "/modules/formulize/include/extract.php";
$target_sub_to_use = (isset($_POST['target_sub']) and $_POST['target_sub'] != 0) ? $_POST['target_sub'] : $subform_id;
$elementq = q("SELECT fl_key1, fl_key2, fl_common_value, fl_form2_id FROM " . $xoopsDB->prefix("formulize_framework_links") . " WHERE fl_frame_id=" . intval($frid) . " AND fl_form2_id=" . intval($fid) . " AND fl_form1_id=" . intval($target_sub_to_use));
// element_to_write is used below in writing results of "add x entries" clicks, plus it is used for defaultblanks on first drawing blank entries, so we need to get this outside of the saving routine
if (count($elementq) > 0) {
$element_to_write = $elementq[0]['fl_key1'];
$value_source = $elementq[0]['fl_key2'];
$value_source_form = $elementq[0]['fl_form2_id'];
} else {
$elementq = q("SELECT fl_key2, fl_key1, fl_common_value, fl_form1_id FROM " . $xoopsDB->prefix("formulize_framework_links") . " WHERE fl_frame_id=" . intval($frid) . " AND fl_form1_id=" . intval($fid) . " AND fl_form2_id=" . intval($target_sub_to_use));
$element_to_write = $elementq[0]['fl_key2'];
$value_source = $elementq[0]['fl_key1'];
$value_source_form = $elementq[0]['fl_form1_id'];
}
if (0 == strlen($element_to_write)) {
error_log("Relationship {$frid} for subform {$subform_id} on form {$fid} is invalid.");
$to_return = array("c1" => "", "c2" => "", "sigle" => "");
global $xoopsUser;
if (is_object($xoopsUser) and in_array(XOOPS_GROUP_ADMIN, $xoopsUser->getGroups())) {
if (0 == $frid) {
$to_return['single'] = "This subform cannot be shown because no relationship is active.";
} else {
$to_return['single'] = "This subform cannot be shown because relationship {$frid} for subform " . "{$subform_id} on form {$fid} is invalid.";
}
}
return $to_return;
}
// check for adding of a sub entry, and handle accordingly -- added September 4 2006
static $subformInstance;
$subformInstance = !isset($subformInstance) ? 100 : $subformInstance;
$subformInstance++;
if ($_POST['target_sub'] and $_POST['target_sub'] == $subform_id and $_POST['target_sub_instance'] == $subformElementId . $subformInstance) {
// important we only do this on the run through for that particular sub form (hence target_sub == sfid), and also only for the specific instance of this subform on the page too, since not all entries may apply to all subform instances any longer with conditions in effect now
// need to handle things differently depending on whether it's a common value or a linked selectbox type of link
// uid links need to result in a "new" value in the displayElement boxes -- odd things will happen if people start adding linked values to entries that aren't theirs!
if ($element_to_write != 0) {
if ($elementq[0]['fl_common_value']) {
// grab the value from the parent element -- assume that it is a textbox of some kind!
if (isset($_POST['de_' . $value_source_form . '_' . $entry . '_' . $value_source])) {
$value_to_write = $_POST['de_' . $value_source_form . '_' . $entry . '_' . $value_source];
} else {
// get this entry and see what the source value is
$data_handler = new formulizeDataHandler($value_source_form);
$value_to_write = $data_handler->getElementValueInEntry($entry, $value_source);
}
} else {
$value_to_write = $entry;
}
$sub_entry_new = "";
for ($i = 0; $i < $_POST['numsubents']; $i++) {
// actually goahead and create the requested number of new sub entries...start with the key field, and then do all textboxes with defaults too...
//$subEntWritten = writeElementValue($_POST['target_sub'], $element_to_write, "new", $value_to_write, "", "", true); // Last param is override that allows direct writing to linked selectboxes if we have prepped the value first!
if ($overrideOwnerOfNewEntries) {
$creation_user_touse = $mainFormOwner;
} else {
$creation_user_touse = "";
}
$subEntWritten = writeElementValue($_POST['target_sub'], $element_to_write, "new", $value_to_write, $creation_user_touse, "", true);
// Last param is override that allows direct writing to linked selectboxes if we have prepped the value first!
$element_handler = xoops_getmodulehandler('elements', 'formulize');
if (!isset($elementsForDefaults)) {
$criteria = new CriteriaCompo();
$criteria->add(new Criteria('ele_type', 'text'), 'OR');
$criteria->add(new Criteria('ele_type', 'textarea'), 'OR');
$criteria->add(new Criteria('ele_type', 'date'), 'OR');
$criteria->add(new Criteria('ele_type', 'radio'), 'OR');
$elementsForDefaults = $element_handler->getObjects($criteria, $_POST['target_sub']);
// get all the text or textarea elements in the form
}
foreach ($elementsForDefaults as $thisDefaultEle) {
// need to write in any default values for any text boxes or text areas that are in the subform. Perhaps other elements could be included too, but that would take too much work right now. (March 9 2009)
$defaultTextToWrite = "";
$ele_value_for_default = $thisDefaultEle->getVar('ele_value');
switch ($thisDefaultEle->getVar('ele_type')) {
case "text":
$defaultTextToWrite = getTextboxDefault($ele_value_for_default[2], $_POST['target_sub'], $subEntWritten);
// position 2 is default value for text boxes
break;
case "textarea":
$defaultTextToWrite = getTextboxDefault($ele_value_for_default[0], $_POST['target_sub'], $subEntWritten);
// position 0 is default value for text boxes
break;
case "date":
$defaultTextToWrite = getDateElementDefault($ele_value_for_default[0]);
if (false === $defaultTextToWrite) {
$defaultTextToWrite = "";
} else {
$defaultTextToWrite = date("c", $defaultTextToWrite);
}
break;
case "radio":
$thisDefaultEleValue = $thisDefaultEle->getVar('ele_value');
$defaultTextToWrite = array_search(1, $thisDefaultEleValue);
}
if ($defaultTextToWrite) {
writeElementValue($_POST['target_sub'], $thisDefaultEle->getVar('ele_id'), $subEntWritten, $defaultTextToWrite);
}
}
$sub_entry_written[] = $subEntWritten;
}
} else {
$sub_entry_new = "new";
// this happens in uid-link situations?
$sub_entry_written = "";
}
// need to also enforce any equals conditions that are on the subform element, if any, and assign those values to the entries that were just added
if (is_array($subformConditions)) {
$filterValues = array();
foreach ($subformConditions[1] as $i => $thisOp) {
if ($thisOp == "=" and $subformConditions[3][$i] != "oom" and $subformConditions[2][$i] != "{BLANK}") {
$conditionElementObject = $element_handler->get($subformConditions[0][$i]);
$filterValues[$subformConditions[0][$i]] = prepareLiteralTextForDB($conditionElementObject, $subformConditions[2][$i]);
}
}
if (count($filterValues) > 0) {
foreach ($sub_entry_written as $thisSubEntry) {
formulize_writeEntry($filterValues, $thisSubEntry);
}
}
}
}
// need to do a number of checks here, including looking for single status on subform, and not drawing in add another if there is an entry for a single
$sub_single_result = getSingle($subform_id, $uid, $groups, $member_handler, $gperm_handler, $mid);
$sub_single = $sub_single_result['flag'];
if ($sub_single) {
unset($sub_entries);
$sub_entries[$subform_id][0] = $sub_single_result['entry'];
}
if (!is_array($sub_entries[$subform_id])) {
$sub_entries[$subform_id] = array();
}
if ($sub_entry_new and !$sub_single and $_POST['target_sub'] == $subform_id) {
for ($i = 0; $i < $_POST['numsubents']; $i++) {
array_unshift($sub_entries[$subform_id], $sub_entry_new);
}
}
if (is_array($sub_entry_written) and !$sub_single and $_POST['target_sub'] == $subform_id) {
foreach ($sub_entry_written as $sew) {
array_unshift($sub_entries[$subform_id], $sew);
}
}
if (!$customCaption) {
// get the title of this subform
// help text removed for F4.0 RC2, this is an experiment
$subtitle = q("SELECT desc_form FROM " . $xoopsDB->prefix("formulize_id") . " WHERE id_form = {$subform_id}");
$col_one = "<p id=\"subform-caption-f{$fid}-sf{$subform_id}\" class=\"subform-caption\"><b>" . trans($subtitle[0]['desc_form']) . "</b></p>";
// <p style=\"font-weight: normal;\">" . _formulize_ADD_HELP;
} else {
$col_one = "<p id=\"subform-caption-f{$fid}-sf{$subform_id}\" class=\"subform-caption\"><b>" . trans($customCaption) . "</b></p>";
// <p style=\"font-weight: normal;\">" . _formulize_ADD_HELP;
}
/*if(intval($sub_entries[$subform_id][0]) != 0 OR $sub_entry_new OR is_array($sub_entry_written)) {
if(!$nosubforms) { $col_one .= "<br>" . _formulize_ADD_HELP2; }
$col_one .= "<br>" . _formulize_ADD_HELP3;
} */
// list the entries, including links to them and delete checkboxes
// get the headerlist for the subform and convert it into handles
// note big assumption/restriction that we are only using the first header found (ie: only specify one header for a sub form!)
// setup the array of elements to draw
if (is_array($customElements)) {
$headingDescriptions = array();
$headerq = q("SELECT ele_caption, ele_colhead, ele_desc, ele_id FROM " . $xoopsDB->prefix("formulize") . " WHERE ele_id IN (" . implode(", ", $customElements) . ") ORDER BY ele_order");
foreach ($headerq as $thisHeaderResult) {
$elementsToDraw[] = $thisHeaderResult['ele_id'];
$headingDescriptions[] = $thisHeaderResult['ele_desc'] ? $thisHeaderResult['ele_desc'] : "";
if ($captionsForHeadings) {
$headersToDraw[] = $thisHeaderResult['ele_caption'];
} else {
$headersToDraw[] = $thisHeaderResult['ele_colhead'] ? $thisHeaderResult['ele_colhead'] : $thisHeaderResult['ele_caption'];
}
}
} else {
$subHeaderList = getHeaderList($subform_id);
$subHeaderList1 = getHeaderList($subform_id, true);
if (isset($subHeaderList[0])) {
$headersToDraw[] = trans($subHeaderList[0]);
}
if (isset($subHeaderList[1])) {
$headersToDraw[] = trans($subHeaderList[1]);
}
if (isset($subHeaderList[2])) {
$headersToDraw[] = trans($subHeaderList[2]);
}
$elementsToDraw = array_slice($subHeaderList1, 0, 3);
}
$need_delete = 0;
$drawnHeadersOnce = false;
if ($rowsOrForms == "row" or $rowsOrForms == '') {
$col_two = "<table id=\"formulize-subform-table-{$subform_id}\" class=\"formulize-subform-table\">";
} else {
$col_two = "";
if (!strstr($_SERVER['PHP_SELF'], "formulize/printview.php")) {
$col_two .= "<div id=\"subform-{$subformElementId}\" class=\"subform-accordion-container\" subelementid=\"{$subformElementId}\" style=\"display: none;\">";
}
$col_two .= "<input type='hidden' name='subform_entry_" . $subformElementId . "_active' id='subform_entry_" . $subformElementId . "_active' value='' />";
include_once XOOPS_ROOT_PATH . "/modules/formulize/class/data.php";
$data_handler = new formulizeDataHandler($subform_id);
}
$deFrid = $frid ? $frid : "";
// need to set this up so we can pass it as part of the displayElement function, necessary to establish the framework in case this is a framework and no subform element is being used, just the default draw-in-the-one-to-many behaviour
// if there's been no form submission, and there's no sub_entries, and there are default blanks to show, then do everything differently -- sept 8 2007
if (!$_POST['form_submitted'] and count($sub_entries[$subform_id]) == 0 and $defaultblanks > 0 and ($rowsOrForms == "row" or $rowsOrForms == '')) {
for ($i = 0; $i < $defaultblanks; $i++) {
// nearly same header drawing code as in the 'else' for drawing regular entries
if (!$drawnHeadersOnce) {
$col_two .= "<tr><td>\n";
$col_two .= "<input type=\"hidden\" name=\"formulize_subformValueSource_{$subform_id}\" value=\"{$value_source}\">\n";
$col_two .= "<input type=\"hidden\" name=\"formulize_subformValueSourceForm_{$subform_id}\" value=\"{$value_source_form}\">\n";
$col_two .= "<input type=\"hidden\" name=\"formulize_subformValueSourceEntry_{$subform_id}\" value=\"{$entry}\">\n";
$col_two .= "<input type=\"hidden\" name=\"formulize_subformElementToWrite_{$subform_id}\" value=\"{$element_to_write}\">\n";
$col_two .= "<input type=\"hidden\" name=\"formulize_subformSourceType_{$subform_id}\" value=\"" . $elementq[0]['fl_common_value'] . "\">\n";
$col_two .= "<input type=\"hidden\" name=\"formulize_subformId_{$subform_id}\" value=\"{$subform_id}\">\n";
// this is probably redundant now that we're tracking sfid in the names of the other elements
$col_two .= "</td>\n";
foreach ($headersToDraw as $x => $thishead) {
if ($thishead) {
$headerHelpLinkPart1 = $headingDescriptions[$i] ? "<a href=\"#\" onclick=\"return false;\" alt=\"" . $headingDescriptions[$x] . "\" title=\"" . $headingDescriptions[$x] . "\">" : "";
$headerHelpLinkPart2 = $headerHelpLinkPart1 ? "</a>" : "";
$col_two .= "<th><p>{$headerHelpLinkPart1}<b>{$thishead}</b>{$headerHelpLinkPart2}</p></th>\n";
}
}
$col_two .= "</tr>\n";
$drawnHeadersOnce = true;
}
$col_two .= "<tr>\n<td>";
$col_two .= "</td>\n";
include_once XOOPS_ROOT_PATH . "/modules/formulize/include/elementdisplay.php";
foreach ($elementsToDraw as $thisele) {
if ($thisele) {
ob_start();
// critical that we *don't* ask for displayElement to return the element object, since this way the validation logic is passed back through the global space also (ugh). Otherwise, no validation logic possible for subforms.
$renderResult = displayElement($deFrid, $thisele, "subformCreateEntry_" . $i . "_" . $subformElementId);
$col_two_temp = ob_get_contents();
ob_end_clean();
if ($col_two_temp or $renderResult == "rendered") {
// only draw in a cell if there actually is an element rendered (some elements might be rendered as nothing (such as derived values)
$col_two .= "<td>{$col_two_temp}</td>\n";
} else {
$col_two .= "<td>******</td>";
}
}
}
$col_two .= "</tr>\n";
}
} elseif (count($sub_entries[$subform_id]) > 0) {
// need to figure out the proper order for the sub entries based on the properties set for this form
// for now, hard code to the word number field to suit the map site only
// if it's the word subform, then sort the entries differently
/*if($subform_id == 281) {
$sortClause = " fas_281, block_281, word_number ";
}
elseif ($subform_id == 283) {
$sortClause = " fas_283 ";
}
else {*/
$sortClause = " entry_id ";
//}
$sformObject = $form_handler->get($subform_id);
$subEntriesOrderSQL = "SELECT entry_id FROM " . $xoopsDB->prefix("formulize_" . $sformObject->getVar('form_handle')) . " WHERE entry_id IN (" . implode(",", $sub_entries[$subform_id]) . ") ORDER BY {$sortClause}";
if ($subEntriesOrderRes = $xoopsDB->query($subEntriesOrderSQL)) {
$sub_entries[$subform_id] = array();
while ($subEntriesOrderArray = $xoopsDB->fetchArray($subEntriesOrderRes)) {
$sub_entries[$subform_id][] = $subEntriesOrderArray['entry_id'];
}
}
$currentSubformInstance = $subformInstance;
foreach ($sub_entries[$subform_id] as $sub_ent) {
if ($sub_ent != "") {
if ($rowsOrForms == 'row' or $rowsOrForms == '') {
if (!$drawnHeadersOnce) {
$col_two .= "<tr><th></th>\n";
foreach ($headersToDraw as $i => $thishead) {
if ($thishead) {
$headerHelpLinkPart1 = $headingDescriptions[$i] ? "<a href=\"#\" onclick=\"return false;\" alt=\"" . $headingDescriptions[$i] . "\" title=\"" . $headingDescriptions[$i] . "\">" : "";
$headerHelpLinkPart2 = $headerHelpLinkPart1 ? "</a>" : "";
$col_two .= "<th><p>{$headerHelpLinkPart1}<b>{$thishead}</b>{$headerHelpLinkPart2}</p></th>\n";
}
}
$col_two .= "</tr>\n";
$drawnHeadersOnce = true;
}
$col_two .= "<tr>\n<td>";
// check to see if we draw a delete box or not
if ($sub_ent !== "new" and "hideaddentries" != $hideaddentries and formulizePermHandler::user_can_delete_entry($subform_id, $uid, $sub_ent) and !strstr($_SERVER['PHP_SELF'], "formulize/printview.php")) {
// note: if the add/delete entry buttons are hidden, then these delete checkboxes are hidden as well
$need_delete = 1;
$col_two .= "<input type=checkbox name=delbox{$sub_ent} value={$sub_ent}></input>";
}
$col_two .= "</td>\n";
include_once XOOPS_ROOT_PATH . "/modules/formulize/include/elementdisplay.php";
foreach ($elementsToDraw as $thisele) {
if ($thisele) {
ob_start();
// critical that we *don't* ask for displayElement to return the element object, since this way the validation logic is passed back through the global space also (ugh). Otherwise, no validation logic possible for subforms.
$renderResult = displayElement($deFrid, $thisele, $sub_ent);
$col_two_temp = ob_get_contents();
ob_end_clean();
if ($col_two_temp or $renderResult == "rendered") {
// only draw in a cell if there actually is an element rendered (some elements might be rendered as nothing (such as derived values)
$col_two .= "<td>{$col_two_temp}</td>\n";
} else {
$col_two .= "<td>******</td>";
}
}
}
if (!$nosubforms and $showViewButtons and !strstr($_SERVER['PHP_SELF'], "formulize/printview.php")) {
$col_two .= "<td><input type=button name=view" . $sub_ent . " value='" . _formulize_SUBFORM_VIEW . "' onclick=\"javascript:goSub('{$sub_ent}', '{$subform_id}');return false;\"></input></td>\n";
}
$col_two .= "</tr>\n";
} else {
// display the full form
$headerValues = array();
foreach ($elementsToDraw as $thisele) {
$value = $data_handler->getElementValueInEntry($sub_ent, $thisele);
$element_object = _getElementObject($thisele);
$value = prepvalues($value, $element_object->getVar("ele_handle"), $sub_ent);
if (is_array($value)) {
$value = implode(" - ", $value);
}
// may be an array if the element allows multiple selections (checkboxes, multiselect list boxes, etc)
$headerValues[] = $value;
}
$headerToWrite = implode(" — ", $headerValues);
if (str_replace(" — ", "", $headerToWrite) == "") {
$headerToWrite = _AM_ELE_SUBFORM_NEWENTRY_LABEL;
}
// check to see if we draw a delete box or not
$deleteBox = "";
if ($sub_ent !== "new" and formulizePermHandler::user_can_delete_entry($subform_id, $uid, $sub_ent) and !strstr($_SERVER['PHP_SELF'], "formulize/printview.php")) {
$need_delete = 1;
$deleteBox = "<input type=checkbox name=delbox{$sub_ent} value={$sub_ent}></input> ";
}
if (!strstr($_SERVER['PHP_SELF'], "formulize/printview.php")) {
$col_two .= "<div class=\"subform-deletebox\">{$deleteBox}</div><div class=\"subform-entry-container\" id=\"subform-" . $subform_id . "-" . "{$sub_ent}\">\r\n\t<p class=\"subform-header\"><a href=\"#\"><span class=\"accordion-name\">" . $headerToWrite . "</span></a></p>\r\n\t<div class=\"accordion-content content\">";
}
ob_start();
$GLOBALS['formulize_inlineSubformFrid'] = $frid;
if ($display_screen = get_display_screen_for_subform($subform_element_object)) {
$subScreen_handler = xoops_getmodulehandler('formScreen', 'formulize');
$subScreenObject = $subScreen_handler->get($display_screen);
$subScreen_handler->render($subScreenObject, $sub_ent, null, true);
} else {
// SHOULD CHANGE THIS TO USE THE DEFAULT SCREEN FOR THE FORM!!!!!!????
$renderResult = displayForm($subform_id, $sub_ent, "", "", "", "", "formElementsOnly");
}
if (!$nestedSubform) {
unset($GLOBALS['formulize_inlineSubformFrid']);
}
$col_two_temp = ob_get_contents();
ob_end_clean();
$col_two .= $col_two_temp;
if (!strstr($_SERVER['PHP_SELF'], "formulize/printview.php")) {
$col_two .= "</div>\n</div>\n";
}
}
}
}
$subformInstance = $currentSubformInstance;
// instance counter might have changed because the form could include other subforms
}
if ($rowsOrForms == 'row' or $rowsOrForms == '') {
// complete the table if we're drawing rows
$col_two .= "</table>";
} else {
if (!strstr($_SERVER['PHP_SELF'], "formulize/printview.php")) {
$col_two .= "</div>";
// close of the subform-accordion-container
}
static $jqueryUILoaded = false;
if (!$jqueryUILoaded) {
$col_two .= "<script type=\"text/javascript\" src=\"" . XOOPS_URL . "/modules/formulize/libraries/jquery/jquery-ui-1.8.2.custom.min.js\"></script>\n";
$col_two .= "<link rel=\"stylesheet\" type=\"text/css\" href=\"" . XOOPS_URL . "/modules/formulize/libraries/jquery/css/start/jquery-ui-1.8.2.custom.css\">\n";
$jqueryUILoaded = true;
}
$col_two .= "\n\r\n<script type=\"text/javascript\">\r\n\tjQuery(document).ready(function() {\r\n\t\tjQuery(\"#subform-{$subformElementId}\").accordion({\r\n\t\t\tautoHeight: false, // no fixed height for sections\r\n\t\t\tcollapsible: true, // sections can be collapsed\r\n\t\t\tactive: ";
if ($_POST['target_sub_instance'] == $subformElementId . $subformInstance and $_POST['target_sub'] == $subform_id) {
$col_two .= count($sub_entries[$subform_id]) - $_POST['numsubents'];
} elseif (is_numeric($_POST['subform_entry_' . $subformElementId . '_active'])) {
$col_two .= $_POST['subform_entry_' . $subformElementId . '_active'];
} else {
$col_two .= 'false';
}
$col_two .= ",\r\n\t\t\theader: \"> div > p.subform-header\"\r\n\t\t});\r\n\t\tjQuery(\"#subform-{$subformElementId}\").fadeIn();\r\n\t});\r\n</script>";
}
// end of if we're closing the subform inferface where entries are supposed to be collapsable forms
$deleteButton = "";
if ((count($sub_entries[$subform_id]) > 0 and $sub_entries[$subform_id][0] != "" or $sub_entry_new or is_array($sub_entry_written)) and $need_delete) {
$deleteButton = " <input type=button name=deletesubs value='" . _formulize_DELETE_CHECKED . "' onclick=\"javascript:sub_del('{$subform_id}');\">";
static $deletesubsflagIncluded = false;
if (!$deletesubsflagIncluded) {
$col_one .= "\n<input type=hidden name=deletesubsflag value=''>\n";
$deletesubsflagIncluded = true;
}
}
// if the 'add x entries button' should be hidden or visible
if ("hideaddentries" != $hideaddentries) {
$allowed_to_add_entries = false;
if ("subform" == $hideaddentries or 1 == $hideaddentries) {
// for compatability, accept '1' which is the old value which corresponds to the new use-subform-permissions (saved as "subform")
// user can add entries if they have permission on the sub form
$allowed_to_add_entries = $gperm_handler->checkRight("add_own_entry", $subform_id, $groups, $mid);
} else {
// user can add entries if they have permission on the main form
// the user should only be able to add subform entries if they can *edit* the main form entry, since adding a subform entry
// is like editing the main form entry. otherwise they could add subform entries on main form entries owned by other users
$allowed_to_add_entries = formulizePermHandler::user_can_edit_entry($fid, $uid, $entry);
}
if ($allowed_to_add_entries and !strstr($_SERVER['PHP_SELF'], "formulize/printview.php")) {
if (count($sub_entries[$subform_id]) == 1 and $sub_entries[$subform_id][0] === "" and $sub_single) {
$col_two .= "<p><input type=button name=addsub value='" . _formulize_ADD_ONE . "' onclick=\"javascript:add_sub('{$subform_id}', 1, " . $subformElementId . $subformInstance . ");\"></p>";
} elseif (!$sub_single) {
$use_simple_add_one_button = isset($subform_element_object->ele_value["simple_add_one_button"]) ? 1 == $subform_element_object->ele_value["simple_add_one_button"] : false;
$col_two .= "<p><input type=button name=addsub value='" . ($use_simple_add_one_button ? trans($subform_element_object->ele_value['simple_add_one_button_text']) : _formulize_ADD) . "' onclick=\"javascript:add_sub('{$subform_id}', window.document.formulize.addsubentries{$subform_id}{$subformElementId}{$subformInstance}.value, " . $subformElementId . $subformInstance . ");\">";
if ($use_simple_add_one_button) {
$col_two .= "<input type=\"hidden\" name=addsubentries{$subform_id}{$subformElementId}{$subformInstance} id=addsubentries{$subform_id}{$subformElementId}{$subformInstance} value=\"1\">";
} else {
$col_two .= "<input type=text name=addsubentries{$subform_id}{$subformElementId}{$subformInstance} id=addsubentries{$subform_id}{$subformElementId}{$subformInstance} value=1 size=2 maxlength=2>";
$col_two .= $addEntriesText;
}
$col_two .= $deleteButton . "</p>";
}
}
}
$to_return['c1'] = $col_one;
$to_return['c2'] = $col_two;
$to_return['single'] = $col_one . $col_two;
if (is_object($subform_element_object)) {
global $xoopsUser;
$show_element_edit_link = (is_object($xoopsUser) and in_array(XOOPS_GROUP_ADMIN, $xoopsUser->getGroups()));
$edit_link = "";
if ($show_element_edit_link) {
$edit_link = "<a class=\"formulize-element-edit-link\" tabindex=\"-1\" href=\"" . XOOPS_URL . "/modules/formulize/admin/ui.php?page=element&aid=0&ele_id=" . $subform_element_object->getVar("ele_id") . "\" target=\"_blank\">edit element</a>";
}
$to_return['single'] = "<div class=\"formulize-subform-" . $subform_element_object->getVar("ele_handle") . "\">{$edit_link} {$col_one} {$col_two}</div>";
}
return $to_return;
}
function drawEntries($fid, $cols, $searches = "", $frid = "", $scope, $standalone = "", $currentURL, $gperm_handler, $uid, $mid, $groups, $settings, $member_handler, $screen, $data, $wq, $regeneratePageNumbers, $hiddenQuickSearches, $cResults)
{
// , $loadview="") { // -- loadview removed from this function sept 24 2005
// determine if the query reached a limit in the number of entries to return
$LOE_limit = 0;
if (!is_array($data)) {
$LOE_limit = is_numeric($data) ? $data : 0;
$data = array();
}
global $xoopsDB;
$useScrollBox = true;
$useHeadings = true;
$repeatHeaders = 5;
$columnWidth = 0;
$textWidth = 35;
$useCheckboxes = 0;
$useViewEntryLinks = 1;
$useSearch = 1;
$deColumns = array();
$useSearchCalcMsgs = 1;
$listTemplate = false;
$inlineButtons = array();
$hiddenColumns = array();
$formulize_LOEPageSize = 10;
if ($screen) {
$useScrollBox = $screen->getVar('usescrollbox');
$useHeadings = $screen->getVar('useheadings');
$repeatHeaders = $screen->getVar('repeatheaders');
$columnWidth = $screen->getVar('columnwidth');
$textWidth = $screen->getVar('textwidth');
if ($textWidth == 0) {
$textWidth = 10000;
}
$useCheckboxes = $screen->getVar('usecheckboxes');
$useViewEntryLinks = $screen->getVar('useviewentrylinks');
$useSearch = $screen->getVar('usesearch');
$hiddenColumns = $screen->getVar('hiddencolumns');
$deColumns = $screen->getVar('decolumns');
$deDisplay = $screen->getVar('dedisplay');
$useSearchCalcMsgs = $screen->getVar('usesearchcalcmsgs');
$listTemplate = $screen->getTemplate("listtemplate");
foreach ($screen->getVar('customactions') as $caid => $thisCustomAction) {
if ($thisCustomAction['appearinline'] == 1) {
list($caCode) = processCustomButton($caid, $thisCustomAction);
if ($caCode) {
$inlineButtons[$caid] = $thisCustomAction;
}
}
}
$formulize_LOEPageSize = $screen->getVar('entriesperpage');
}
$filename = "";
// $settings['xport'] no longer set by a page load, except if called as part of the import process to create a template for updating
if (!$settings['xport']) {
$settings['xport'] = $settings['hlist'] ? "calcs" : "comma";
$xportDivText1 = "<div id=exportlink style=\"display: none;\">";
// export button turns this link on and off now
$xportDivText2 = "</div>";
} else {
$xportDivText1 = "";
$xportDivText2 = "";
}
if (@$_POST['advcalc_acid']) {
if ($_POST['acid'] > 0) {
$result = formulize_runAdvancedCalculation(intval($_POST['acid']));
// result will be an array with two or three keys: 'text' and 'output', and possibly 'groupingMap'. Text is for display on screen "raw" and Output is a variable that can be used by a dev. The output variable will be an array if groupings are in effect. The keys of the array will be the various grouping values in effect. The groupingMap will be present if there's a set of groupings in effect. It is an array that contains all the grouping choices, their text equivalents and their data values (which are the keys in the output array) -- groupingMap is still to be developed/added to the mix....will be necessary when we are integrating with Drupal or other API uses.
print "<br/>" . $result['text'] . "<br/><br/>";
}
}
// export of Data is moved out to a popup
// Calculations still handled in the old way for now
if ($settings['xport'] == "calcs") {
$filename = prepExport($headers, $cols, $data, $settings['xport'], $settings['xport_cust'], $settings['title'], false, $fid, $groups);
$linktext = $_POST['xport'] == "update" ? _formulize_DE_CLICKSAVE_TEMPLATE : _formulize_DE_CLICKSAVE;
print "{$xportDivText1}<center><p><a href='{$filename}' target=\"_blank\">{$linktext}</a></p></center>";
print "<br>{$xportDivText2}";
}
$scrollBoxWasSet = false;
if ($useScrollBox and count($data) > 0) {
print "<div class=scrollbox id=resbox>\n";
$scrollBoxWasSet = true;
}
// perform calculations...
// calc_cols is the columns requested (separated by / -- ele_id for each, also metadata is indicated with uid, proxyid, creation_date, mod_date)
// calc_calcs is the calcs for each column, columns separated by / and calcs for a column separated by ,. possible calcs are sum, avg, min, max, count, per
// calc_blanks is the blank setting for each calculation, setup the same way as the calcs, possible settings are all, noblanks, onlyblanks
// calc_grouping is the grouping option. same format as calcs. possible values are ele_ids or the uid, proxyid, creation_date and mod_date metadata terms
// 1. extract data from four settings into arrays
// 2. loop through the array and perform all the requested calculations
if ($settings['calc_cols'] and !$settings['hcalc']) {
// print "<p><input type=button style=\"width: 140px;\" name=cancelcalcs1 value='" . _formulize_DE_CANCELCALCS . "' onclick=\"javascript:cancelCalcs();\"></input></p>\n";
// print "<div";
// if($totalcalcs>4) { print " class=scrollbox"; }
// print " id=calculations>
$calc_cols = $settings['calc_cols'];
$calc_calcs = $settings['calc_calcs'];
$calc_blanks = $settings['calc_blanks'];
$calc_grouping = $settings['calc_grouping'];
print "<table class=outer>";
if ($useHeadings) {
$headers = getHeaders($cols, true);
// second param indicates we're using element headers and not ids
drawHeaders($headers, $cols, $useCheckboxes, $useViewEntryLinks, count($inlineButtons), $settings['lockedColumns']);
}
if ($useSearch) {
drawSearches($searches, $cols, $useCheckboxes, $useViewEntryLinks, count($inlineButtons), false, $hiddenQuickSearches);
}
print "</table>";
print "<table class=outer><tr><th colspan=2>" . _formulize_DE_CALCHEAD . "</th></tr>\n";
if (!$settings['lockcontrols'] and ($useSearchCalcMsgs == 1 or $useSearchCalcMsgs == 3)) {
// AND !$loadview) { // -- loadview removed from this function sept 24 2005
print "<tr><td class=head colspan=2><input type=button style=\"width: 140px;\" name=mod_calculations value='" . _formulize_DE_MODCALCS . "' onclick=\"javascript:showPop('" . XOOPS_URL . "/modules/formulize/include/pickcalcs.php?fid={$fid}&frid={$frid}&calc_cols=" . urlencode($calc_cols) . "&calc_calcs=" . urlencode($calc_calcs) . "&calc_blanks=" . urlencode($calc_blanks) . "&calc_grouping=" . urlencode($calc_grouping) . "&cols=" . urlencode(implode(",", $cols)) . "');\"></input> " . "<input type=button style=\"width: 140px;\" name=cancelcalcs value='" . _formulize_DE_CANCELCALCS . "' onclick=\"javascript:cancelCalcs();\"></input>  " . "<input type=button style=\"width: 140px;\" name=showlist value='" . _formulize_DE_SHOWLIST . "' onclick=\"javascript:showList();\"></input></td></tr>";
}
$exportFilename = $settings['xport'] == "calcs" ? $filename : "";
//formulize_benchmark("before printing results");
// 0 is the masterresults, 1 is the blanksettings, 2 is grouping settings -- exportFilename is the name of the file that we need to create and into which we need to dump a copy of the calcs
printResults($cResults[0], $cResults[1], $cResults[2], $cResults[3], $cResults[4], $exportFilename, $settings['title']);
//formulize_benchmark("after printing results");
print "</table>\n";
}
// MASTER HIDELIST CONDITIONAL...
if (!$settings['hlist'] and !$listTemplate) {
print "<div class=\"list-of-entries-container\"><table class=\"outer\">";
$count_colspan = count($cols) + 1;
if ($useViewEntryLinks or $useCheckboxes != 2) {
$count_colspan_calcs = $count_colspan;
} else {
$count_colspan_calcs = $count_colspan - 1;
}
$count_colspan_calcs = $count_colspan_calcs + count($inlineButtons);
// add to the column count for each inline custom button
$count_colspan_calcs++;
// add one more for the hidden floating column
if (!$screen) {
print "<tr><th colspan={$count_colspan_calcs}>" . _formulize_DE_DATAHEADING . "</th></tr>\n";
}
if ($settings['calc_cols'] and !$settings['lockcontrols'] and ($useSearchCalcMsgs == 1 or $useSearchCalcMsgs == 3)) {
// AND !$loadview) { // -- loadview removed from this function sept 24 2005
$calc_cols = $settings['calc_cols'];
$calc_calcs = $settings['calc_calcs'];
$calc_blanks = $settings['calc_blanks'];
$calc_grouping = $settings['calc_grouping'];
print "<tr><td class=head colspan={$count_colspan_calcs}><input type=button style=\"width: 140px;\" name=mod_calculations value='" . _formulize_DE_MODCALCS . "' onclick=\"javascript:showPop('" . XOOPS_URL . "/modules/formulize/include/pickcalcs.php?fid={$fid}&frid={$frid}&calc_cols={$calc_cols}&calc_calcs={$calc_calcs}&calc_blanks={$calc_blanks}&calc_grouping=" . urlencode($calc_grouping) . "&cols=" . urlencode(implode(",", $cols)) . "');\"></input> <input type=button style=\"width: 140px;\" name=cancelcalcs value='" . _formulize_DE_CANCELCALCS . "' onclick=\"javascript:cancelCalcs();\"></input> <input type=button style=\"width: 140px;\" name=hidelist value='" . _formulize_DE_HIDELIST . "' onclick=\"javascript:hideList();\"></input></td></tr>";
}
// draw advanced search notification
if ($settings['as_0'] and ($useSearchCalcMsgs == 1 or $useSearchCalcMsgs == 2)) {
$writable_q = writableQuery($wq);
$minus1colspan = $count_colspan - 1 + count($inlineButtons);
if (!$asearch_parse_error) {
print "<tr>";
if ($useViewEntryLinks or $useCheckboxes != 2) {
// only include this column if necessary
print "<td class=head></td>";
}
print "<td colspan={$minus1colspan} class=head>" . _formulize_DE_ADVSEARCH . ": {$writable_q}";
} else {
print "<tr>";
if ($useViewEntryLinks or $useCheckboxes != 2) {
print "<td class=head></td>";
}
print "<td colspan={$minus1colspan} class=head><span style=\"font-weight: normal;\">" . _formulize_DE_ADVSEARCH_ERROR . "</span>";
}
if (!$settings['lockcontrols']) {
// AND !$loadview) { // -- loadview removed from this function sept 24 2005
print "<br><input type=button style=\"width: 140px;\" name=advsearch value='" . _formulize_DE_MOD_ADVSEARCH . "' onclick=\"javascript:showPop('" . XOOPS_URL . "/modules/formulize/include/advsearch.php?fid={$fid}&frid={$frid}";
foreach ($settings as $k => $v) {
if (substr($k, 0, 3) == "as_") {
$v = str_replace("'", "'", $v);
$v = stripslashes($v);
print "&{$k}=" . urlencode($v);
}
}
print "');\"></input> <input type=button style=\"width: 140px;\" name=cancelasearch value='" . _formulize_DE_CANCELASEARCH . "' onclick=\"javascript:killSearch();\"></input>";
}
print "</td></tr>\n";
}
if ($useHeadings) {
$headers = getHeaders($cols, true);
// second param indicates we're using element headers and not ids
drawHeaders($headers, $cols, $useCheckboxes, $useViewEntryLinks, count($inlineButtons), $settings['lockedColumns']);
}
if ($useSearch) {
drawSearches($searches, $cols, $useCheckboxes, $useViewEntryLinks, count($inlineButtons), false, $hiddenQuickSearches);
}
if (count($data) == 0) {
// kill an empty dataset so there's no rows drawn
unset($data);
} else {
// get form handles in use
$mainFormHandle = key($data[key($data)]);
}
$headcounter = 0;
$blankentries = 0;
$GLOBALS['formulize_displayElement_LOE_Used'] = false;
$formulize_LOEPageStart = (isset($_POST['formulize_LOEPageStart']) and !$regeneratePageNumbers) ? intval($_POST['formulize_LOEPageStart']) : 0;
// adjust formulize_LOEPageSize if the actual count of entries is less than the page size
$formulize_LOEPageSize = $GLOBALS['formulize_countMasterResultsForPageNumbers'] < $formulize_LOEPageSize ? $GLOBALS['formulize_countMasterResultsForPageNumbers'] : $formulize_LOEPageSize;
$actualPageSize = $formulize_LOEPageSize ? $formulize_LOEPageStart + $formulize_LOEPageSize : $GLOBALS['formulize_countMasterResultsForPageNumbers'];
if (isset($data)) {
foreach ($data as $id => $entry) {
formulize_benchmark("starting to draw one row of results");
// check to make sure this isn't an unset entry (ie: one that was blanked by the extraction layer just prior to sending back results
// Since the extraction layer is unsetting entries to blank them, this condition should never be met?
// If this condition is ever met, it may very well screw up the paging of results!
// NOTE: this condition is met on the last page of a paged set of results, unless the last page as exactly the same number of entries on it as the limit of entries per page
if ($entry != "") {
if ($headcounter == $repeatHeaders and $repeatHeaders > 0) {
if ($useHeadings) {
drawHeaders($headers, $cols, $useCheckboxes, $useViewEntryLinks, count($inlineButtons));
}
$headcounter = 0;
}
$headcounter++;
print "<tr>\n";
if ($class == "even") {
$class = "odd";
} else {
$class = "even";
}
unset($linkids);
$linkids = internalRecordIds($entry, $mainFormHandle);
// draw in the margin column where the links and metadata goes
if ($useViewEntryLinks or $useCheckboxes != 2) {
print "<td class=\"head formulize-controls\">\n";
}
if (!$settings['lockcontrols']) {
// AND !$loadview) { // -- loadview removed from this function sept 24 2005
// check to see if we should draw in the delete checkbox
// 2 is none, 1 is all
if ($useCheckboxes != 2 and ($useCheckboxes == 1 or formulizePermHandler::user_can_delete_entry($fid, $uid, $linkids[0]))) {
print "<input type=checkbox title='" . _formulize_DE_DELBOXDESC . "' class='formulize_selection_checkbox' name='delete_" . $linkids[0] . "' id='delete_" . $linkids[0] . "' value='delete_" . $linkids[0] . "'>";
}
if ($useViewEntryLinks) {
print "<a href='" . $currentURL;
if (strstr($currentURL, "?")) {
// if params are already part of the URL...
print "&";
} else {
print "?";
}
print "ve=" . $linkids[0] . "' onclick=\"javascript:goDetails('" . $linkids[0] . "');return false;\" " . " class=\"loe-edit-entry\" alt=\"" . _formulize_DE_VIEWDETAILS . "\" title=\"" . _formulize_DE_VIEWDETAILS . "\" >";
print " </a>";
}
}
// end of IF NO LOCKCONTROLS
if ($useViewEntryLinks or $useCheckboxes != 2) {
print "</td>\n";
}
$column_counter = 0;
if ($columnWidth) {
$columnWidthParam = "style=\"width: {$columnWidth}" . "px\"";
} else {
$columnWidthParam = "";
}
for ($i = 0; $i < count($cols); $i++) {
//formulize_benchmark("drawing one column");
$col = $cols[$i];
$colhandle = $settings['columnhandles'][$i];
$classToUse = $class . " column column" . $i;
$cellRowAddress = $id + 2;
if ($i == 0) {
print "<td {$columnWidthParam} class=\"{$class} floating-column\" id='floatingcelladdress_{$cellRowAddress}'>\n";
}
print "<td {$columnWidthParam} class=\"{$classToUse}\" id=\"celladdress_" . $cellRowAddress . "_" . $i . "\">\n";
if ($col == "creation_uid" or $col == "mod_uid") {
$userObject = $member_handler->getUser(display($entry, $col));
if ($userObject) {
$nameToDisplay = $userObject->getVar('name') ? $userObject->getVar('name') : $userObject->getVar('uname');
} else {
$nameToDisplay = _FORM_ANON_USER;
}
$value = "<a href=\"" . XOOPS_URL . "/userinfo.php?uid=" . display($entry, $col) . "\" target=_blank>" . $nameToDisplay . "</a>";
} else {
$value = display($entry, $col);
}
// set in the display function, corresponds to the entry id of the record in the form where the current value was retrieved from. If there is more than one local entry id, because of a one to many framework, then this will be an array that corresponds to the order of the values returned by display.
$currentColumnLocalId = $GLOBALS['formulize_mostRecentLocalId'];
// if we're supposed to display this column as an element... (only show it if they have permission to update this entry)
if (in_array($colhandle, $deColumns) and formulizePermHandler::user_can_edit_entry($fid, $uid, $entry)) {
include_once XOOPS_ROOT_PATH . "/modules/formulize/include/elementdisplay.php";
if ($frid) {
// need to work out which form this column belongs to, and use that form's entry ID. Need to loop through the entry to find all possible internal IDs, since a subform situation would lead to multiple values appearing in a single cell, so multiple displayElement calls would be made each with their own internal ID.
foreach ($entry as $entryFormHandle => $entryFormData) {
foreach ($entryFormData as $internalID => $entryElements) {
$deThisIntId = false;
foreach ($entryElements as $entryHandle => $values) {
if ($entryHandle == $col) {
// we found the element that we're trying to display
if ($deThisIntId) {
print "\n<br />\n";
}
// could be a subform so we'd display multiple values
if ($deDisplay) {
print '<div id="deDiv_' . $colhandle . '_' . $internalID . '">';
print getHTMLForList($values, $colhandle, $internalID, $deDisplay, $textWidth, $currentColumnLocalId, $fid, $cellRowAddress, $i);
print "</div>";
} else {
displayElement("", $colhandle, $internalID);
}
$deThisIntId = true;
}
}
}
}
} else {
// display based on the mainform entry id
if ($deDisplay) {
print '<div id="deDiv_' . $colhandle . '_' . $linkids[0] . '">';
print getHTMLForList($value, $colhandle, $linkids[0], $deDisplay, $textWidth, $currentColumnLocalId, $fid, $cellRowAddress, $i);
print "</div>";
} else {
displayElement("", $colhandle, $linkids[0]);
// works for mainform only! To work on elements from a framework, we need to figure out the form the element is from, and the entry ID in that form, which is done above
}
}
$GLOBALS['formulize_displayElement_LOE_Used'] = true;
} elseif ($col != "creation_uid" and $col != "mod_uid" and $col != "entry_id") {
print getHTMLForList($value, $col, $linkids[0], 0, $textWidth, $currentColumnLocalId, $fid, $cellRowAddress, $i);
} else {
// no special formatting on the uid columns:
print $value;
}
print "</td>\n";
$column_counter++;
}
// handle inline custom buttons
foreach ($inlineButtons as $caid => $thisCustomAction) {
list($caCode) = processCustomButton($caid, $thisCustomAction, $linkids[0], $entry);
// only bother with the code, since we already processed any clicked button above
if ($caCode) {
print "<td {$columnWidthParam} class={$class}>\n";
print "<center>{$caCode}</center>\n";
print "</td>\n";
}
}
// handle hidden elements for passing back to custom buttons
foreach ($hiddenColumns as $thisHiddenCol) {
print "\n<input type=\"hidden\" name=\"hiddencolumn_" . $linkids[0] . "_{$thisHiddenCol}\" value=\"" . htmlspecialchars(display($entry, $thisHiddenCol)) . "\"></input>\n";
}
print "</tr>\n";
} else {
// this is a blank entry
$blankentries++;
}
// end of not "" check
}
// end of foreach data as entry
}
// end of if there is any data to draw
print "</table></div>";
} elseif ($listTemplate and !$settings['hlist']) {
// USING A CUSTOM LIST TEMPLATE SO DO EVERYTHING DIFFERENTLY
// print str_replace("\n", "<br />", $listTemplate); // debug code
$mainFormHandle = key($data[key($data)]);
$formulize_LOEPageStart = (isset($_POST['formulize_LOEPageStart']) and !$regeneratePageNumbers) ? intval($_POST['formulize_LOEPageStart']) : 0;
$actualPageSize = $formulize_LOEPageSize ? $formulize_LOEPageStart + $formulize_LOEPageSize : $GLOBALS['formulize_countMasterResultsForPageNumbers'];
if (strstr($listTemplate, "displayElement")) {
include_once XOOPS_ROOT_PATH . "/modules/formulize/include/elementdisplay.php";
}
if (isset($data)) {
//for($entryCounter=$formulize_LOEPageStart;$entryCounter<$actualPageSize;$entryCounter++) {
// setup the view name variables, with true only set for the last loaded view
$viewNumber = 1;
foreach ($settings['publishedviewnames'] as $id => $thisViewName) {
$thisViewName = str_replace(" ", "_", $thisViewName);
if ($id == $settings['lastloaded']) {
${$thisViewName} = true;
${'view' . $viewNumber} = true;
} else {
${$thisViewName} = false;
$view['view' . $viewNumber] = false;
}
$viewNumber++;
}
foreach ($data as $id => $entry) {
//$entry = $data[$entryCounter];
//$id=$entryCounter;
// check to make sure this isn't an unset entry (ie: one that was blanked by the extraction layer just prior to sending back results
// Since the extraction layer is unsetting entries to blank them, this condition should never be met?
// If this condition is ever met, it may very well screw up the paging of results!
// NOTE: this condition is met on the last page of a paged set of results, unless the last page as exactly the same number of entries on it as the limit of entries per page
if ($entry != "") {
// Set up the variables for the link to the current entry, and the checkbox that can be used to select the current entry
$linkids = internalRecordIds($entry, $mainFormHandle);
$entry_id = $linkids[0];
// make a nice way of referring to this for in the eval'd code
$form_id = $fid;
// make a nice way of referring to this for in the eval'd code
if (!$settings['lockcontrols']) {
// AND !$loadview) { // -- loadview removed from this function sept 24 2005
$viewEntryLinkCode = "<a href='" . $currentURL;
if (strstr($currentURL, "?")) {
// if params are already part of the URL...
$viewEntryLinkCode .= "&";
} else {
$viewEntryLinkCode .= "?";
}
$viewEntryLinkCode .= "ve=" . $entry_id . "' onclick=\"javascript:goDetails('" . $entry_id . "');return false;\">";
$GLOBALS['formulize_viewEntryId'] = $entry_id;
// put into global scope so the function 'viewEntryLink' can pick it up if necessary
$GLOBALS['formulize_viewEntryLinkCode'] = $viewEntryLinkCode;
// check to see if we should draw in the delete checkbox
// 2 is none, 1 is all
if ($useCheckboxes != 2 and ($useCheckboxes == 1 or formulizePermHandler::user_can_delete_entry($fid, $uid, $entry_id))) {
$selectionCheckbox = "<input type=checkbox title='" . _formulize_DE_DELBOXDESC . "' class='formulize_selection_checkbox' name='delete_" . $entry_id . "' id='delete_" . $entry_id . "' value='delete_" . $entry_id . "'>";
} else {
$selectionCheckbox = "";
}
}
// end of IF NO LOCKCONTROLS
$ids = internalRecordIds($entry, $mainFormHandle);
foreach ($inlineButtons as $caid => $thisCustomAction) {
list($caCode) = processCustomButton($caid, $thisCustomAction, $ids[0], $entry);
// only bother with the code, since we already processed any clicked button above
if ($caCode) {
${$thisCustomAction['handle']} = $caCode;
// assign the button code that was returned
}
}
// handle hidden elements for passing back to custom buttons
foreach ($hiddenColumns as $thisHiddenCol) {
print "\n<input type=\"hidden\" name=\"hiddencolumn_" . $linkids[0] . "_{$thisHiddenCol}\" value=\"" . htmlspecialchars(display($entry, $thisHiddenCol)) . "\"></input>\n";
}
include XOOPS_ROOT_PATH . "/modules/formulize/templates/screens/default/" . $screen->getVar('sid') . "/listtemplate.php";
}
}
}
}
// END OF MASTER HIDELIST CONDITIONAL
if ((!isset($data) or count($data) == $blankentries) and !$LOE_limit) {
// if no data was returned, or the dataset was empty...
print "<p><b>" . _formulize_DE_NODATAFOUND . "</b></p>\n";
} elseif ($LOE_limit) {
print "<p>" . _formulize_DE_LOE_LIMIT_REACHED1 . " <b>" . $LOE_limit . "</b> " . _formulize_DE_LOE_LIMIT_REACHED2 . " <a href=\"\" onclick=\"javascript:forceQ();return false;\">" . _formulize_DE_LOE_LIMIT_REACHED3 . "</a></p>\n";
}
if ($scrollBoxWasSet) {
print "</div>";
}
formulize_benchmark("We're done");
}
