/**
* HTML Form element generation
* Optional name parameter allows you to generate a form element for a field but give it a
* name different from the field name
*
* @param string $ps_field field name
* @param string $ps_format field format
* @param array $pa_options additional options
* TODO: document them.
*/
public function htmlFormElement($ps_field, $ps_format = null, $pa_options = null)
{
$o_db = $this->getDb();
// init options
if (!is_array($pa_options)) {
$pa_options = array();
}
foreach (array('display_form_field_tips', 'classname', 'maxOptionLength', 'textAreaTagName', 'display_use_count', 'display_omit_items__with_zero_count', 'display_use_count_filters', 'display_use_count_filters', 'selection', 'name', 'value', 'dont_show_null_value', 'size', 'multiple', 'show_text_field_for_vars', 'nullOption', 'empty_message', 'displayMessageForFieldValues', 'DISPLAY_FIELD', 'WHERE', 'select_item_text', 'hide_select_if_only_one_option', 'field_errors', 'display_form_field_tips', 'form_name', 'no_tooltips', 'tooltip_namespace', 'extraLabelText', 'width', 'height', 'label', 'list_code', 'hide_select_if_no_options', 'id', 'lookup_url', 'progress_indicator', 'error_icon', 'maxPixelWidth', 'displayMediaVersion', 'FIELD_TYPE', 'DISPLAY_TYPE', 'choiceList', 'readonly', 'description', 'hidden') as $vs_key) {
if (!isset($pa_options[$vs_key])) {
$pa_options[$vs_key] = null;
}
}
$va_attr = $this->getFieldInfo($ps_field);
foreach (array('DISPLAY_WIDTH', 'DISPLAY_USE_COUNT', 'DISPLAY_SHOW_COUNT', 'DISPLAY_OMIT_ITEMS_WITH_ZERO_COUNT', 'DISPLAY_TYPE', 'IS_NULL', 'DEFAULT_ON_NULL', 'DEFAULT', 'LIST_MULTIPLE_DELIMITER', 'FIELD_TYPE', 'LIST_CODE', 'DISPLAY_FIELD', 'WHERE', 'DISPLAY_WHERE', 'DISPLAY_ORDERBY', 'LIST', 'BOUNDS_CHOICE_LIST', 'BOUNDS_LENGTH', 'DISPLAY_DESCRIPTION', 'LABEL', 'DESCRIPTION', 'SUB_LABEL', 'SUB_DESCRIPTION', 'MAX_PIXEL_WIDTH') as $vs_key) {
if (!isset($va_attr[$vs_key])) {
$va_attr[$vs_key] = null;
}
}
if (isset($pa_options['FIELD_TYPE'])) {
$va_attr['FIELD_TYPE'] = $pa_options['FIELD_TYPE'];
}
if (isset($pa_options['DISPLAY_TYPE'])) {
$va_attr['DISPLAY_TYPE'] = $pa_options['DISPLAY_TYPE'];
}
$vn_display_width = isset($pa_options['width']) && $pa_options['width'] > 0 ? $pa_options['width'] : $va_attr["DISPLAY_WIDTH"];
$vn_display_height = isset($pa_options['height']) && $pa_options['height'] > 0 ? $pa_options['height'] : $va_attr["DISPLAY_HEIGHT"];
$va_parsed_width = caParseFormElementDimension($vn_display_width);
$va_parsed_height = caParseFormElementDimension($vn_display_height);
$va_dim_styles = array();
if ($va_parsed_width['type'] == 'pixels') {
$va_dim_styles[] = "width: " . $va_parsed_width['dimension'] . "px;";
}
if ($va_parsed_height['type'] == 'pixels') {
$va_dim_styles[] = "height: " . $va_parsed_height['dimension'] . "px;";
}
//if ($vn_max_pixel_width) {
// $va_dim_styles[] = "max-width: {$vn_max_pixel_width}px;";
//}
$vs_dim_style = trim(join(" ", $va_dim_styles));
$vs_field_label = isset($pa_options['label']) && strlen($pa_options['label']) > 0 ? $pa_options['label'] : $va_attr["LABEL"];
$vs_errors = '';
// TODO: PULL THIS FROM A CONFIG FILE
$pa_options["display_form_field_tips"] = true;
if (isset($pa_options['classname'])) {
$vs_css_class_attr = ' class="' . $pa_options['classname'] . '" ';
} else {
$vs_css_class_attr = '';
}
if (!isset($pa_options['id'])) {
$pa_options['id'] = $pa_options['name'];
}
if (!isset($pa_options['id'])) {
$pa_options['id'] = $ps_field;
}
if (!isset($pa_options['maxPixelWidth']) || (int) $pa_options['maxPixelWidth'] <= 0) {
$vn_max_pixel_width = $va_attr['MAX_PIXEL_WIDTH'];
} else {
$vn_max_pixel_width = (int) $pa_options['maxPixelWidth'];
}
if ($vn_max_pixel_width <= 0) {
$vn_max_pixel_width = null;
}
if (!isset($pa_options["maxOptionLength"]) && isset($vn_display_width)) {
$pa_options["maxOptionLength"] = isset($vn_display_width) ? $vn_display_width : null;
}
$vs_text_area_tag_name = 'textarea';
if (isset($pa_options["textAreaTagName"]) && $pa_options['textAreaTagName']) {
$vs_text_area_tag_name = isset($pa_options['textAreaTagName']) ? $pa_options['textAreaTagName'] : null;
}
if (!isset($va_attr["DISPLAY_USE_COUNT"]) || !($vs_display_use_count = $va_attr["DISPLAY_USE_COUNT"])) {
$vs_display_use_count = isset($pa_options["display_use_count"]) ? $pa_options["display_use_count"] : null;
}
if (!isset($va_attr["DISPLAY_SHOW_COUNT"]) || !($vb_display_show_count = (bool) $va_attr["DISPLAY_SHOW_COUNT"])) {
$vb_display_show_count = isset($pa_options["display_show_count"]) ? (bool) $pa_options["display_show_count"] : null;
}
if (!isset($va_attr["DISPLAY_OMIT_ITEMS_WITH_ZERO_COUNT"]) || !($vb_display_omit_items__with_zero_count = (bool) $va_attr["DISPLAY_OMIT_ITEMS_WITH_ZERO_COUNT"])) {
$vb_display_omit_items__with_zero_count = isset($pa_options["display_omit_items__with_zero_count"]) ? (bool) $pa_options["display_omit_items__with_zero_count"] : null;
}
if (!isset($va_attr["DISPLAY_OMIT_ITEMS_WITH_ZERO_COUNT"]) || !($va_display_use_count_filters = $va_attr["DISPLAY_USE_COUNT_FILTERS"])) {
$va_display_use_count_filters = isset($pa_options["display_use_count_filters"]) ? $pa_options["display_use_count_filters"] : null;
}
if (!isset($va_display_use_count_filters) || !is_array($va_display_use_count_filters)) {
$va_display_use_count_filters = null;
}
if (isset($pa_options["selection"]) && is_array($pa_options["selection"])) {
$va_selection = isset($pa_options["selection"]) ? $pa_options["selection"] : null;
} else {
$va_selection = array();
}
if (isset($pa_options["choiceList"]) && is_array($pa_options["choiceList"])) {
$va_attr["BOUNDS_CHOICE_LIST"] = $pa_options["choiceList"];
}
$vs_element = $vs_subelement = "";
if ($va_attr) {
# --- Skip omitted fields completely
if ($va_attr["DISPLAY_TYPE"] == DT_OMIT) {
return "";
}
if (!isset($pa_options["name"]) || !$pa_options["name"]) {
$pa_options["name"] = htmlspecialchars($ps_field, ENT_QUOTES, 'UTF-8');
}
$va_js = array();
$va_handlers = array("onclick", "onchange", "onkeypress", "onkeydown", "onkeyup");
foreach ($va_handlers as $vs_handler) {
if (isset($pa_options[$vs_handler]) && $pa_options[$vs_handler]) {
$va_js[] = "{$vs_handler}='" . $pa_options[$vs_handler] . "'";
}
}
$vs_js = join(" ", $va_js);
if (!isset($pa_options["value"])) {
// allow field value to be overriden with value from options array
$vm_field_value = $this->get($ps_field, $pa_options);
} else {
$vm_field_value = $pa_options["value"];
}
$vm_raw_field_value = $vm_field_value;
$vb_is_null = isset($va_attr["IS_NULL"]) ? $va_attr["IS_NULL"] : false;
if (isset($pa_options['dont_show_null_value']) && $pa_options['dont_show_null_value']) {
$vb_is_null = false;
}
if (!is_array($vm_field_value) && strlen($vm_field_value) == 0 && (!isset($vb_is_null) || !$vb_is_null || (isset($va_attr["DEFAULT_ON_NULL"]) ? $va_attr["DEFAULT_ON_NULL"] : 0))) {
$vm_field_value = isset($va_attr["DEFAULT"]) ? $va_attr["DEFAULT"] : "";
}
# --- Return hidden fields
if ($va_attr["DISPLAY_TYPE"] == DT_HIDDEN || caGetOption('hidden', $pa_options, false)) {
return '<input type="hidden" name="' . $pa_options["name"] . '" value="' . $this->escapeHTML($vm_field_value) . '"/>';
}
if (isset($pa_options["size"]) && $pa_options["size"] > 0) {
$ps_size = " size='" . $pa_options["size"] . "'";
} else {
if (($va_attr["DISPLAY_TYPE"] == DT_LIST_MULTIPLE || $va_attr["DISPLAY_TYPE"] == DT_LIST) && $vn_display_height > 1) {
$ps_size = " size='" . $vn_display_height . "'";
} else {
$ps_size = '';
}
}
$vs_multiple_name_extension = '';
if ($vs_is_multiple = isset($pa_options["multiple"]) && $pa_options["multiple"] || $va_attr["DISPLAY_TYPE"] == DT_LIST_MULTIPLE ? "multiple='1'" : "") {
$vs_multiple_name_extension = '[]';
if (!($vs_list_multiple_delimiter = $va_attr['LIST_MULTIPLE_DELIMITER'])) {
$vs_list_multiple_delimiter = ';';
}
$va_selection = array_merge($va_selection, explode($vs_list_multiple_delimiter, $vm_field_value));
}
# --- Return form element
switch ($va_attr["FIELD_TYPE"]) {
# ----------------------------
case FT_NUMBER:
case FT_TEXT:
case FT_VARS:
if ($va_attr["FIELD_TYPE"] == FT_VARS) {
if (!$pa_options['show_text_field_for_vars']) {
break;
}
if (!is_string($vm_field_value) && !is_numeric($vm_field_value)) {
$vm_value = '';
}
}
if ($va_attr['DISPLAY_TYPE'] == DT_COUNTRY_LIST) {
$vs_element = caHTMLSelect($ps_field, caGetCountryList(), array('id' => $ps_field), array('value' => $vm_field_value));
if ($va_attr['STATEPROV_FIELD']) {
$vs_element .= "<script type='text/javascript'>\n";
$vs_element .= "var caStatesByCountryList = " . json_encode(caGetStateList()) . ";\n";
$vs_element .= "\n\t\t\t\t\t\t\t\tjQuery('#{$ps_field}').click({countryID: '{$ps_field}', stateProvID: '" . $va_attr['STATEPROV_FIELD'] . "', value: '" . addslashes($this->get($va_attr['STATEPROV_FIELD'])) . "', statesByCountryList: caStatesByCountryList}, caUI.utils.updateStateProvinceForCountry);\n\t\t\t\t\t\t\t\tjQuery(document).ready(function() {\n\t\t\t\t\t\t\t\t\tcaUI.utils.updateStateProvinceForCountry({data: {countryID: '{$ps_field}', stateProvID: '" . $va_attr['STATEPROV_FIELD'] . "', value: '" . addslashes($this->get($va_attr['STATEPROV_FIELD'])) . "', statesByCountryList: caStatesByCountryList}});\n\t\t\t\t\t\t\t\t});\n\t\t\t\t\t\t\t";
$vs_element .= "</script>\n";
}
break;
}
if ($va_attr['DISPLAY_TYPE'] == DT_STATEPROV_LIST) {
$vs_element = caHTMLSelect($ps_field . '_select', array(), array('id' => $ps_field . '_select'), array('value' => $vm_field_value));
$vs_element .= caHTMLTextInput($ps_field . '_name', array('id' => $ps_field . '_text', 'value' => $vm_field_value));
break;
}
if ($vn_display_width > 0 && in_array($va_attr["DISPLAY_TYPE"], array(DT_SELECT, DT_LIST, DT_LIST_MULTIPLE))) {
#
# Generate auto generated <select> (from foreign key, from ca_lists or from field-defined choice list)
#
# TODO: CLEAN UP THIS CODE, RUNNING VARIOUS STAGES THROUGH HELPER FUNCTIONS; ALSO FORMALIZE AND DOCUMENT VARIOUS OPTIONS
// -----
// from ca_lists
// -----
if (!($vs_list_code = $pa_options['list_code'])) {
if (isset($va_attr['LIST_CODE']) && $va_attr['LIST_CODE']) {
$vs_list_code = $va_attr['LIST_CODE'];
}
}
if ($vs_list_code) {
$va_many_to_one_relations = $this->_DATAMODEL->getManyToOneRelations($this->tableName());
if ($va_many_to_one_relations[$ps_field]) {
$vs_key = 'item_id';
} else {
$vs_key = 'item_value';
}
$vs_null_option = null;
if (!$pa_options["nullOption"] && $vb_is_null) {
$vs_null_option = _t("- NONE -");
} else {
if ($pa_options["nullOption"]) {
$vs_null_option = $pa_options["nullOption"];
}
}
$t_list = new ca_lists();
$va_list_attrs = array('id' => $pa_options['id']);
//if ($vn_max_pixel_width) { $va_list_attrs['style'] = $vs_width_style; }
if (method_exists($this, 'getTypeFieldName') && $ps_field == $this->getTypeFieldName()) {
$va_limit_list = caGetTypeListForUser($this->tableName(), array('access' => __CA_BUNDLE_ACCESS_EDIT__));
}
// NOTE: "raw" field value (value passed into method, before the model default value is applied) is used so as to allow the list default to be used if needed
$vs_element = $t_list->getListAsHTMLFormElement($vs_list_code, $pa_options["name"] . $vs_multiple_name_extension, $va_list_attrs, array('value' => $vm_raw_field_value, 'key' => $vs_key, 'nullOption' => $vs_null_option, 'readonly' => $pa_options['readonly'], 'restrictTypeListForTable' => $this->tableName(), 'limitToItemsWithID' => $va_limit_list ? $va_limit_list : null));
if (isset($pa_options['hide_select_if_no_options']) && $pa_options['hide_select_if_no_options'] && !$vs_element) {
$vs_element = "";
$ps_format = '^ERRORS^ELEMENT';
}
} else {
// -----
// from related table
// -----
$va_many_to_one_relations = $this->_DATAMODEL->getManyToOneRelations($this->tableName());
if (isset($va_many_to_one_relations[$ps_field]) && $va_many_to_one_relations[$ps_field]) {
#
# Use foreign key to populate <select>
#
$o_one_table = $this->_DATAMODEL->getTableInstance($va_many_to_one_relations[$ps_field]["one_table"]);
$vs_one_table_primary_key = $o_one_table->primaryKey();
if ($o_one_table->isHierarchical()) {
#
# Hierarchical <select>
#
$va_hier = $o_one_table->getHierarchyAsList(0, $vs_display_use_count, $va_display_use_count_filters, $vb_display_omit_items__with_zero_count);
if (!is_array($va_hier)) {
return '';
}
$va_display_fields = $va_attr["DISPLAY_FIELD"];
if (!in_array($vs_one_table_primary_key, $va_display_fields)) {
$va_display_fields[] = $o_one_table->tableName() . "." . $vs_one_table_primary_key;
}
if (!is_array($va_display_fields) || sizeof($va_display_fields) < 1) {
$va_display_fields = array("*");
}
$vs_hier_parent_id_fld = $o_one_table->getProperty("HIER_PARENT_ID_FLD");
$va_options = array();
if ($pa_options["nullOption"]) {
$va_options[""] = array($pa_options["nullOption"]);
}
$va_suboptions = array();
$va_suboption_values = array();
$vn_selected = 0;
$vm_cur_top_level_val = null;
$vm_selected_top_level_val = null;
foreach ($va_hier as $va_option) {
if (!$va_option["NODE"][$vs_hier_parent_id_fld]) {
continue;
}
$vn_val = $va_option["NODE"][$o_one_table->primaryKey()];
$vs_selected = $vn_val == $vm_field_value ? 'selected="1"' : "";
$vn_indent = $va_option["LEVEL"] - 1;
$va_display_data = array();
foreach ($va_display_fields as $vs_fld) {
$va_bits = explode(".", $vs_fld);
if ($va_bits[1] != $vs_one_table_primary_key) {
$va_display_data[] = $va_option["NODE"][$va_bits[1]];
}
}
$vs_option_label = join(" ", $va_display_data);
$va_options[$vn_val] = array($vs_option_label, $vn_indent, $va_option["HITS"], $va_option['NODE']);
}
if (sizeof($va_options) == 0) {
$vs_element = isset($pa_options['empty_message']) ? $pa_options['empty_message'] : 'No options available';
} else {
$vs_element = "<select name='" . $pa_options["name"] . $vs_multiple_name_extension . "' " . $vs_js . " " . $vs_is_multiple . " " . $ps_size . " id='" . $pa_options["id"] . $vs_multiple_name_extension . "' {$vs_css_class_attr} style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' disabled="disabled" ' : '') . ">\n";
if (!$pa_options["nullOption"] && $vb_is_null) {
$vs_element .= "<option value=''>" . _t('- NONE -') . "</option>\n";
} else {
if ($pa_options["nullOption"]) {
$vs_element .= "<option value=''>" . $pa_options["nullOption"] . "</option>\n";
}
}
foreach ($va_options as $vn_val => $va_option_info) {
$vs_selected = $vn_val == $vm_field_value || in_array($vn_val, $va_selection) ? "selected='selected'" : "";
$vs_element .= "<option value='" . $vn_val . "' {$vs_selected}>";
$vn_indent = $va_option_info[1] * 2;
$vs_indent = "";
if ($vn_indent > 0) {
$vs_indent = str_repeat(" ", ($vn_indent - 1) * 2) . " ";
$vn_indent++;
}
$vs_option_text = $va_option_info[0];
$vs_use_count = "";
if ($vs_display_use_count && $vb_display_show_count && $vn_val != "") {
$vs_use_count = " (" . intval($va_option_info[2]) . ")";
}
$vs_display_message = '';
if (is_array($pa_options['displayMessageForFieldValues'])) {
foreach ($pa_options['displayMessageForFieldValues'] as $vs_df => $va_df_vals) {
if (isset($va_option_info[3][$vs_df]) && is_array($va_df_vals)) {
$vs_tmp = $va_option_info[3][$vs_df];
if (isset($va_df_vals[$vs_tmp])) {
$vs_display_message = ' ' . $va_df_vals[$vs_tmp];
}
}
}
}
if ($pa_options["maxOptionLength"] && strlen($vs_option_text) + strlen($vs_use_count) + $vn_indent > $pa_options["maxOptionLength"]) {
if (($vn_strlen = $pa_options["maxOptionLength"] - strlen($vs_indent) - strlen($vs_use_count) - 3) < $pa_options["maxOptionLength"]) {
$vn_strlen = $pa_options["maxOptionLength"];
}
$vs_option_text = unicode_substr($vs_option_text, 0, $vn_strlen) . "...";
}
$vs_element .= $vs_indent . $vs_option_text . $vs_use_count . $vs_display_message . "</option>\n";
}
$vs_element .= "</select>\n";
}
} else {
#
# "Flat" <select>
#
if (!is_array($va_display_fields = $pa_options["DISPLAY_FIELD"])) {
$va_display_fields = $va_attr["DISPLAY_FIELD"];
}
if (!is_array($va_display_fields)) {
return "Configuration error: DISPLAY_FIELD directive for field '{$ps_field}' must be an array of field names in the format tablename.fieldname";
}
if (!in_array($vs_one_table_primary_key, $va_display_fields)) {
$va_display_fields[] = $o_one_table->tableName() . "." . $vs_one_table_primary_key;
}
if (!is_array($va_display_fields) || sizeof($va_display_fields) < 1) {
$va_display_fields = array("*");
}
$vs_sql = "\n\t\t\t\t\t\t\t\t\t\t\tSELECT *\n\t\t\t\t\t\t\t\t\t\t\tFROM " . $va_many_to_one_relations[$ps_field]["one_table"] . "\n\t\t\t\t\t\t\t\t\t\t\t";
if (isset($pa_options["WHERE"]) && (is_array($pa_options["WHERE"]) && ($vs_where = join(" AND ", $pa_options["WHERE"]))) || is_array($va_attr["DISPLAY_WHERE"]) && ($vs_where = join(" AND ", $va_attr["DISPLAY_WHERE"]))) {
$vs_sql .= " WHERE {$vs_where} ";
}
if (isset($va_attr["DISPLAY_ORDERBY"]) && $va_attr["DISPLAY_ORDERBY"] && ($vs_orderby = join(",", $va_attr["DISPLAY_ORDERBY"]))) {
$vs_sql .= " ORDER BY {$vs_orderby} ";
}
$qr_res = $o_db->query($vs_sql);
if ($o_db->numErrors()) {
$vs_element = "Error creating menu: " . join(';', $o_db->getErrors());
break;
}
$va_opts = array();
if (isset($pa_options["nullOption"]) && $pa_options["nullOption"]) {
$va_opts[$pa_options["nullOption"]] = array($pa_options["nullOption"], null);
} else {
if ($vb_is_null) {
$va_opts[_t("- NONE -")] = array(_t("- NONE -"), null);
}
}
if ($pa_options["select_item_text"]) {
$va_opts[$pa_options["select_item_text"]] = array($pa_options["select_item_text"], null);
}
$va_fields = array();
foreach ($va_display_fields as $vs_field) {
$va_tmp = explode(".", $vs_field);
$va_fields[] = $va_tmp[1];
}
while ($qr_res->nextRow()) {
$vs_display = "";
foreach ($va_fields as $vs_field) {
if ($vs_field != $vs_one_table_primary_key) {
$vs_display .= $qr_res->get($vs_field) . " ";
}
}
$va_opts[] = array($vs_display, $qr_res->get($vs_one_table_primary_key), $qr_res->getRow());
}
if (sizeof($va_opts) == 0) {
$vs_element = isset($pa_options['empty_message']) ? $pa_options['empty_message'] : 'No options available';
} else {
if (isset($pa_options['hide_select_if_only_one_option']) && $pa_options['hide_select_if_only_one_option'] && sizeof($va_opts) == 1) {
$vs_element = "<input type='hidden' name='" . $pa_options["name"] . "' " . $vs_js . " " . $ps_size . " id='" . $pa_options["id"] . "' value='" . ($vm_field_value ? $vm_field_value : $va_opts[0][1]) . "' {$vs_css_class_attr}/>";
$ps_format = '^ERRORS^ELEMENT';
} else {
$vs_element = "<select name='" . $pa_options["name"] . $vs_multiple_name_extension . "' " . $vs_js . " " . $vs_is_multiple . " " . $ps_size . " id='" . $pa_options["id"] . $vs_multiple_name_extension . "' {$vs_css_class_attr} style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' disabled="disabled" ' : '') . ">\n";
foreach ($va_opts as $va_opt) {
$vs_option_text = $va_opt[0];
$vs_value = $va_opt[1];
$vs_selected = $vs_value == $vm_field_value || in_array($vs_value, $va_selection) ? "selected='selected'" : "";
$vs_use_count = "";
if ($vs_display_use_count && $vb_display_show_count && $vs_value != "") {
//$vs_use_count = "(".intval($va_option_info[2]).")";
}
if ($pa_options["maxOptionLength"] && strlen($vs_option_text) + strlen($vs_use_count) > $pa_options["maxOptionLength"]) {
$vs_option_text = unicode_substr($vs_option_text, 0, $pa_options["maxOptionLength"] - 3 - strlen($vs_use_count)) . "...";
}
$vs_display_message = '';
if (is_array($pa_options['displayMessageForFieldValues'])) {
foreach ($pa_options['displayMessageForFieldValues'] as $vs_df => $va_df_vals) {
if (isset($va_opt[2][$vs_df]) && is_array($va_df_vals)) {
$vs_tmp = $va_opt[2][$vs_df];
if (isset($va_df_vals[$vs_tmp])) {
$vs_display_message = ' ' . $va_df_vals[$vs_tmp];
}
}
}
}
$vs_element .= "<option value='{$vs_value}' {$vs_selected}>";
$vs_element .= $vs_option_text . $vs_use_count . $vs_display_message;
$vs_element .= "</option>\n";
}
$vs_element .= "</select>\n";
}
}
}
} else {
#
# choice list
#
$vs_element = '';
// if 'LIST' is set try to stock over choice list with the contents of the list
if (isset($va_attr['LIST']) && $va_attr['LIST']) {
// NOTE: "raw" field value (value passed into method, before the model default value is applied) is used so as to allow the list default to be used if needed
$vs_element = ca_lists::getListAsHTMLFormElement($va_attr['LIST'], $pa_options["name"] . $vs_multiple_name_extension, array('class' => $pa_options['classname'], 'id' => $pa_options['id']), array('key' => 'item_value', 'value' => $vm_raw_field_value, 'nullOption' => $pa_options['nullOption'], 'readonly' => $pa_options['readonly']));
}
if (!$vs_element && (isset($va_attr["BOUNDS_CHOICE_LIST"]) && is_array($va_attr["BOUNDS_CHOICE_LIST"]))) {
if (sizeof($va_attr["BOUNDS_CHOICE_LIST"]) == 0) {
$vs_element = isset($pa_options['empty_message']) ? $pa_options['empty_message'] : 'No options available';
} else {
$vs_element = "<select name='" . $pa_options["name"] . $vs_multiple_name_extension . "' " . $vs_js . " " . $vs_is_multiple . " " . $ps_size . " id='" . $pa_options['id'] . $vs_multiple_name_extension . "' {$vs_css_class_attr} style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' disabled="disabled" ' : '') . ">\n";
if ($pa_options["select_item_text"]) {
$vs_element .= "<option value=''>" . $this->escapeHTML($pa_options["select_item_text"]) . "</option>\n";
}
if (!$pa_options["nullOption"] && $vb_is_null) {
$vs_element .= "<option value=''>" . _t('- NONE -') . "</option>\n";
} else {
if ($pa_options["nullOption"]) {
$vs_element .= "<option value=''>" . $pa_options["nullOption"] . "</option>\n";
}
}
foreach ($va_attr["BOUNDS_CHOICE_LIST"] as $vs_option => $vs_value) {
$vs_selected = strval($vs_value) === strval($vm_field_value) || in_array($vs_value, $va_selection) ? "selected='selected'" : "";
if ($pa_options["maxOptionLength"] && strlen($vs_option) > $pa_options["maxOptionLength"]) {
$vs_option = unicode_substr($vs_option, 0, $pa_options["maxOptionLength"] - 3) . "...";
}
$vs_element .= "<option value='{$vs_value}' {$vs_selected}>" . $this->escapeHTML($vs_option) . "</option>\n";
}
$vs_element .= "</select>\n";
}
}
}
}
} else {
if ($va_attr["DISPLAY_TYPE"] === DT_COLORPICKER) {
// COLORPICKER
$vs_element = '<input name="' . $pa_options["name"] . '" type="hidden" size="' . ($pa_options['size'] ? $pa_options['size'] : $vn_display_width) . '" value="' . $this->escapeHTML($vm_field_value) . '" ' . $vs_js . ' id=\'' . $pa_options["id"] . "' style='{$vs_dim_style}'/>\n";
$vs_element .= '<div id="' . $pa_options["id"] . '_colorchip" class="colorpicker_chip" style="background-color: #' . $vm_field_value . '"><!-- empty --></div>';
$vs_element .= "<script type='text/javascript'>jQuery(document).ready(function() { jQuery('#" . $pa_options["name"] . "_colorchip').ColorPicker({\n\t\t\t\t\t\t\t\tonShow: function (colpkr) {\n\t\t\t\t\t\t\t\t\tjQuery(colpkr).fadeIn(500);\n\t\t\t\t\t\t\t\t\treturn false;\n\t\t\t\t\t\t\t\t},\n\t\t\t\t\t\t\t\tonHide: function (colpkr) {\n\t\t\t\t\t\t\t\t\tjQuery(colpkr).fadeOut(500);\n\t\t\t\t\t\t\t\t\treturn false;\n\t\t\t\t\t\t\t\t},\n\t\t\t\t\t\t\t\tonChange: function (hsb, hex, rgb) {\n\t\t\t\t\t\t\t\t\tjQuery('#" . $pa_options["name"] . "').val(hex);\n\t\t\t\t\t\t\t\t\tjQuery('#" . $pa_options["name"] . "_colorchip').css('backgroundColor', '#' + hex);\n\t\t\t\t\t\t\t\t},\n\t\t\t\t\t\t\t\tcolor: jQuery('#" . $pa_options["name"] . "').val()\n\t\t\t\t\t\t\t})}); </script>\n";
if (method_exists('AssetLoadManager', 'register')) {
AssetLoadManager::register('jquery', 'colorpicker');
}
} else {
# normal controls: all non-DT_SELECT display types are returned as DT_FIELD's. We could generate
# radio-button controls for foreign key and choice lists, but we don't bother because it's never
# really necessary.
if ($vn_display_height > 1) {
$vs_element = '<' . $vs_text_area_tag_name . ' name="' . $pa_options["name"] . '" rows="' . $vn_display_height . '" cols="' . $vn_display_width . '"' . ($pa_options['readonly'] ? ' readonly="readonly" disabled="disabled"' : '') . ' wrap="soft" ' . $vs_js . ' id=\'' . $pa_options["id"] . "' style='{$vs_dim_style}' " . $vs_css_class_attr . ">" . $this->escapeHTML($vm_field_value) . '</' . $vs_text_area_tag_name . '>' . "\n";
} else {
$vs_element = '<input name="' . $pa_options["name"] . '" type="text" size="' . ($pa_options['size'] ? $pa_options['size'] : $vn_display_width) . '"' . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . ' value="' . $this->escapeHTML($vm_field_value) . '" ' . $vs_js . ' id=\'' . $pa_options["id"] . "' {$vs_css_class_attr} style='{$vs_dim_style}'/>\n";
}
if (isset($va_attr['UNIQUE_WITHIN']) && is_array($va_attr['UNIQUE_WITHIN'])) {
$va_within_fields = array();
foreach ($va_attr['UNIQUE_WITHIN'] as $vs_within_field) {
$va_within_fields[$vs_within_field] = $this->get($vs_within_field);
}
$vs_element .= "<span id='" . $pa_options["id"] . '_uniqueness_status' . "'></span>";
$vs_element .= "<script type='text/javascript'>\n\tcaUI.initUniquenessChecker({\n\t\terrorIcon: '" . $pa_options['error_icon'] . "',\n\t\tprocessIndicator: '" . $pa_options['progress_indicator'] . "',\n\t\tstatusID: '" . $pa_options["id"] . "_uniqueness_status',\n\t\tlookupUrl: '" . $pa_options['lookup_url'] . "',\n\t\tformElementID: '" . $pa_options["id"] . "',\n\t\trow_id: " . intval($this->getPrimaryKey()) . ",\n\t\ttable_num: " . $this->tableNum() . ",\n\t\tfield: '" . $ps_field . "',\n\t\twithinFields: " . json_encode($va_within_fields) . ",\n\t\t\n\t\talreadyInUseMessage: '" . addslashes(_t('Value must be unique. Please try another.')) . "'\n\t});\n</script>";
} else {
if (isset($va_attr['LOOKUP']) && $va_attr['LOOKUP']) {
if (class_exists("AppController") && ($app = AppController::getInstance()) && ($req = $app->getRequest())) {
AssetLoadManager::register('jquery', 'autocomplete');
$vs_element .= "<script type='text/javascript'>\n\tjQuery('#" . $pa_options["id"] . "').autocomplete({ source: '" . caNavUrl($req, 'lookup', 'Intrinsic', 'Get', array('bundle' => $this->tableName() . ".{$ps_field}", "max" => 500)) . "', minLength: 3, delay: 800});\n</script>";
}
}
}
if (isset($pa_options['usewysiwygeditor']) && $pa_options['usewysiwygeditor']) {
AssetLoadManager::register("ckeditor");
$vs_width = $vn_display_width;
$vs_height = $vn_display_height;
if (!preg_match("!^[\\d\\.]+px\$!i", $vs_width)) {
$vs_width = (int) $vs_width * 6 . "px";
}
if (!preg_match("!^[\\d\\.]+px\$!i", $vs_height)) {
$vs_height = (int) $vs_height * 16 . "px";
}
if (!is_array($va_toolbar_config = $this->getAppConfig()->getAssoc('wysiwyg_editor_toolbar'))) {
$va_toolbar_config = array();
}
$vs_element .= "<script type='text/javascript'>jQuery(document).ready(function() {\n\t\t\t\t\t\t\t\tvar ckEditor = CKEDITOR.replace( '" . $pa_options['id'] . "',\n\t\t\t\t\t\t\t\t{\n\t\t\t\t\t\t\t\t\ttoolbar : " . json_encode(array_values($va_toolbar_config)) . ",\n\t\t\t\t\t\t\t\t\twidth: '{$vs_width}',\n\t\t\t\t\t\t\t\t\theight: '{$vs_height}',\n\t\t\t\t\t\t\t\t\ttoolbarLocation: 'top',\n\t\t\t\t\t\t\t\t\tenterMode: CKEDITOR.ENTER_BR\n\t\t\t\t\t\t\t\t});\n\t\t\t\t\t\t\n\t\t\t\t\t\t\t\tckEditor.on('instanceReady', function(){ \n\t\t\t\t\t\t\t\t\t ckEditor.document.on( 'keydown', function(e) {if (caUI && caUI.utils) { caUI.utils.showUnsavedChangesWarning(true); } });\n\t\t\t\t\t\t\t\t});\n \t});\t\t\t\t\t\t\t\t\t\n</script>";
}
}
}
break;
# ----------------------------
# ----------------------------
case FT_TIMESTAMP:
if ($this->get($ps_field)) {
# is timestamp set?
$vs_element = $this->escapeHTML($vm_field_value);
# return printed date
} else {
$vs_element = "[Not set]";
# return text instead of 1969 date
}
break;
# ----------------------------
# ----------------------------
case FT_DATETIME:
case FT_HISTORIC_DATETIME:
case FT_DATE:
case FT_HISTORIC_DATE:
if (!$vm_field_value) {
$vm_field_value = $pa_options['value'];
}
switch ($va_attr["DISPLAY_TYPE"]) {
case DT_TEXT:
$vs_element = $vm_field_value ? $vm_field_value : "[Not set]";
break;
default:
$vn_max_length = $va_attr["BOUNDS_LENGTH"][1];
$vs_max_length = '';
if ($vn_max_length > 0) {
$vs_max_length = 'maxlength="' . $vn_max_length . '"';
}
if ($vn_display_height > 1) {
$vs_element = '<' . $vs_text_area_tag_name . ' name="' . $pa_options["name"] . '" rows="' . $vn_display_height . '" cols="' . $vn_display_width . '" wrap="soft" ' . $vs_js . ' ' . $vs_css_class_attr . " style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . ">" . $this->escapeHTML($vm_field_value) . '</' . $vs_text_area_tag_name . '>';
} else {
$vs_element = '<input type="text" name="' . $pa_options["name"] . '" value="' . $this->escapeHTML($vm_field_value) . "\" size='{$vn_display_width}' {$vs_max_length} {$vs_js} {$vs_css_class_attr} style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . "/>";
}
break;
}
break;
# ----------------------------
# ----------------------------
case FT_TIME:
if (!$this->get($ps_field)) {
$vm_field_value = "";
}
switch ($va_attr["DISPLAY_TYPE"]) {
case DT_TEXT:
$vs_element = $vm_field_value ? $vm_field_value : "[Not set]";
break;
default:
$vn_max_length = $va_attr["BOUNDS_LENGTH"][1];
$vs_max_length = '';
if ($vn_max_length > 0) {
$vs_max_length = 'maxlength="' . $vn_max_length . '"';
}
if ($vn_display_height > 1) {
$vs_element = '<' . $vs_text_area_tag_name . ' name="' . $pa_options["name"] . '" id="' . $pa_options["id"] . '" rows="' . $vn_display_height . '" cols="' . $vn_display_width . '" wrap="soft" ' . $vs_js . ' ' . $vs_css_class_attr . " style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . ">" . $this->escapeHTML($vm_field_value) . '</' . $vs_text_area_tag_name . '>';
} else {
$vs_element = '<input type="text" name="' . $pa_options["name"] . '" id="' . $pa_options["id"] . '" value="' . $this->escapeHTML($vm_field_value) . "\" size='{$vn_display_width}' {$vs_max_length} {$vs_js} {$vs_css_class_attr}' style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . "/>";
}
break;
}
break;
# ----------------------------
# ----------------------------
case FT_DATERANGE:
case FT_HISTORIC_DATERANGE:
switch ($va_attr["DISPLAY_TYPE"]) {
case DT_TEXT:
$vs_element = $vm_field_value ? $vm_field_value : "[Not set]";
break;
default:
$vn_max_length = $va_attr["BOUNDS_LENGTH"][1];
$vs_max_length = '';
if ($vn_max_length > 0) {
$vs_max_length = 'maxlength="' . $vn_max_length . '"';
}
if ($vn_display_height > 1) {
$vs_element = '<' . $vs_text_area_tag_name . ' name="' . $pa_options["name"] . '" id="' . $pa_options["id"] . '" rows="' . $vn_display_height . '" cols="' . $vn_display_width . '" wrap="soft" ' . $vs_js . ' ' . $vs_css_class_attr . " style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . ">" . $this->escapeHTML($vm_field_value) . '</' . $vs_text_area_tag_name . '>';
} else {
$vs_element = '<input type="text" name="' . $pa_options["name"] . '" id="' . $pa_options["id"] . '" value="' . $this->escapeHTML($vm_field_value) . "\" size='{$vn_display_width}' {$vn_max_length} {$vs_js} {$vs_css_class_attr} style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . "/>";
}
break;
}
break;
# ----------------------------
# ----------------------------
case FT_TIMERANGE:
switch ($va_attr["DISPLAY_TYPE"]) {
case DT_TEXT:
$vs_element = $vm_field_value ? $vm_field_value : "[Not set]";
break;
default:
$vn_max_length = $va_attr["BOUNDS_LENGTH"][1];
$vs_max_length = '';
if ($vn_max_length > 0) {
$vs_max_length = 'maxlength="' . $vn_max_length . '"';
}
if ($vn_display_height > 1) {
$vs_element = '<' . $vs_text_area_tag_name . ' name="' . $pa_options["name"] . '" id="' . $pa_options["id"] . '" rows="' . $vn_display_height . '" cols="' . $vn_display_width . '" wrap="soft" ' . $vs_js . ' ' . $vs_css_class_attr . " style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . ">" . $this->escapeHTML($vm_field_value) . '</' . $vs_text_area_tag_name . '>';
} else {
$vs_element = '<input type="text" name="' . $pa_options["name"] . '" id="' . $pa_options["id"] . '" value="' . $this->escapeHTML($vm_field_value) . "\" size='{$vn_display_width}' {$vs_max_length} {$vs_js} {$vs_css_class_attr} style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . "/>";
}
break;
}
break;
# ----------------------------
# ----------------------------
case FT_TIMECODE:
$o_tp = new TimecodeParser();
$o_tp->setParsedValueInSeconds($vm_field_value);
$vs_timecode = $o_tp->getText("COLON_DELIMITED", array("BLANK_ON_ZERO" => true));
$vn_max_length = $va_attr["BOUNDS_LENGTH"][1];
$vs_max_length = '';
if ($vn_max_length > 0) {
$vs_max_length = 'maxlength="' . $vn_max_length . '"';
}
if ($vn_display_height > 1) {
$vs_element = '<' . $vs_text_area_tag_name . ' name="' . $pa_options["name"] . '" id="' . $pa_options["id"] . '" rows="' . $vn_display_height . '" cols="' . $vn_display_width . '" wrap="soft" ' . $vs_js . ' ' . $vs_css_class_attr . " style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . ">" . $this->escapeHTML($vs_timecode) . '</' . $vs_text_area_tag_name . '>';
} else {
$vs_element = '<input type="text" NAME="' . $pa_options["name"] . '" id="' . $pa_options["id"] . '" value="' . $this->escapeHTML($vs_timecode) . "\" size='{$vn_display_width}' {$vs_max_length} {$vs_js} {$vs_css_class_attr} style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . "/>";
}
break;
# ----------------------------
# ----------------------------
case FT_MEDIA:
case FT_FILE:
$vs_element = '<input type="file" name="' . $pa_options["name"] . '" id="' . $pa_options["id"] . '" ' . $vs_js . '/>';
// show current media icon
if ($vs_version = array_key_exists('displayMediaVersion', $pa_options) ? $pa_options['displayMediaVersion'] : 'icon') {
$va_valid_versions = $this->getMediaVersions($ps_field);
if (!in_array($vs_version, $va_valid_versions)) {
$vs_version = $va_valid_versions[0];
}
if ($vs_tag = $this->getMediaTag($ps_field, $vs_version)) {
$vs_element .= $vs_tag;
}
}
break;
# ----------------------------
# ----------------------------
case FT_PASSWORD:
$vn_max_length = $va_attr["BOUNDS_LENGTH"][1];
$vs_max_length = '';
if ($vn_max_length > 0) {
$vs_max_length = 'maxlength="' . $vn_max_length . '"';
}
$vs_element = '<input type="password" name="' . $pa_options["name"] . '" id="' . $pa_options["id"] . '" value="' . $this->escapeHTML($vm_field_value) . '" size="' . $vn_display_width . '" ' . $vs_max_length . ' ' . $vs_js . ' autocomplete="off" ' . $vs_css_class_attr . " style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . "/>";
break;
# ----------------------------
# ----------------------------
case FT_BIT:
switch ($va_attr["DISPLAY_TYPE"]) {
case DT_FIELD:
$vs_element = '<input type="text" name="' . $pa_options["name"] . "\" value='{$vm_field_value}' maxlength='1' size='2' {$vs_js} style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' readonly="readonly" ' : '') . "/>";
break;
case DT_SELECT:
$vs_element = "<select name='" . $pa_options["name"] . "' " . $vs_js . " id='" . $pa_options["id"] . "' {$vs_css_class_attr} style='{$vs_dim_style}'" . ($pa_options['readonly'] ? ' disabled="disabled" ' : '') . ">\n";
foreach (array("Yes" => 1, "No" => 0) as $vs_option => $vs_value) {
$vs_selected = $vs_value == $vm_field_value ? "selected='selected'" : "";
$vs_element .= "<option value='{$vs_value}' {$vs_selected}" . ($pa_options['readonly'] ? ' disabled="disabled" ' : '') . ">" . _t($vs_option) . "</option>\n";
}
$vs_element .= "</select>\n";
break;
case DT_CHECKBOXES:
$vs_element = '<input type="checkbox" name="' . $pa_options["name"] . '" value="1" ' . ($vm_field_value ? 'checked="1"' : '') . ' ' . $vs_js . ($pa_options['readonly'] ? ' disabled="disabled" ' : '') . ' id="' . $pa_options["id"] . '"/>';
break;
case DT_RADIO_BUTTONS:
$vs_element = 'Radio buttons not supported for bit-type fields';
break;
}
break;
# ----------------------------
}
# Apply format
$vs_formatting = "";
if (isset($pa_options['field_errors']) && is_array($pa_options['field_errors']) && sizeof($pa_options['field_errors'])) {
$va_field_errors = array();
foreach ($pa_options['field_errors'] as $o_e) {
$va_field_errors[] = $o_e->getErrorDescription();
}
$vs_errors = join('; ', $va_field_errors);
} else {
$vs_errors = '';
}
if (is_null($ps_format)) {
if (isset($pa_options['field_errors']) && is_array($pa_options['field_errors']) && sizeof($pa_options['field_errors'])) {
$ps_format = $this->_CONFIG->get('form_element_error_display_format');
} else {
$ps_format = $this->_CONFIG->get('form_element_display_format');
}
}
if ($ps_format != '') {
$ps_formatted_element = $ps_format;
$ps_formatted_element = str_replace("^ELEMENT", $vs_element, $ps_formatted_element);
if ($vs_subelement) {
$ps_formatted_element = str_replace("^SUB_ELEMENT", $vs_subelement, $ps_formatted_element);
}
$vb_fl_display_form_field_tips = false;
if ($pa_options["display_form_field_tips"] || !isset($pa_options["display_form_field_tips"]) && $va_attr["DISPLAY_DESCRIPTION"] || !isset($pa_options["display_form_field_tips"]) && !isset($va_attr["DISPLAY_DESCRIPTION"]) && $vb_fl_display_form_field_tips) {
if (preg_match("/\\^DESCRIPTION/", $ps_formatted_element)) {
$ps_formatted_element = str_replace("^LABEL", $vs_field_label, $ps_formatted_element);
$ps_formatted_element = str_replace("^DESCRIPTION", isset($pa_options["description"]) && $pa_options["description"] ? $pa_options["description"] : $va_attr["DESCRIPTION"], $ps_formatted_element);
} else {
// no explicit placement of description text, so...
$vs_field_id = '_' . $this->tableName() . '_' . $this->getPrimaryKey() . '_' . $pa_options["name"] . '_' . $pa_options['form_name'];
$ps_formatted_element = str_replace("^LABEL", '<span id="' . $vs_field_id . '">' . $vs_field_label . '</span>', $ps_formatted_element);
if (!isset($pa_options['no_tooltips']) || !$pa_options['no_tooltips']) {
TooltipManager::add('#' . $vs_field_id, "<h3>{$vs_field_label}</h3>" . (isset($pa_options["description"]) && $pa_options["description"] ? $pa_options["description"] : $va_attr["DESCRIPTION"]), $pa_options['tooltip_namespace']);
}
}
if (!isset($va_attr["SUB_LABEL"])) {
$va_attr["SUB_LABEL"] = '';
}
if (!isset($va_attr["SUB_DESCRIPTION"])) {
$va_attr["SUB_DESCRIPTION"] = '';
}
if (preg_match("/\\^SUB_DESCRIPTION/", $ps_formatted_element)) {
$ps_formatted_element = str_replace("^SUB_LABEL", $va_attr["SUB_LABEL"], $ps_formatted_element);
$ps_formatted_element = str_replace("^SUB_DESCRIPTION", $va_attr["SUB_DESCRIPTION"], $ps_formatted_element);
} else {
// no explicit placement of description text, so...
// ... make label text itself rollover for description text because no icon was specified
$ps_formatted_element = str_replace("^SUB_LABEL", $va_attr["SUB_LABEL"], $ps_formatted_element);
}
} else {
$ps_formatted_element = str_replace("^LABEL", $vs_field_label, $ps_formatted_element);
$ps_formatted_element = str_replace("^DESCRIPTION", "", $ps_formatted_element);
if ($vs_subelement) {
$ps_formatted_element = str_replace("^SUB_LABEL", $va_attr["SUB_LABEL"], $ps_formatted_element);
$ps_formatted_element = str_replace("^SUB_DESCRIPTION", "", $ps_formatted_element);
}
}
$ps_formatted_element = str_replace("^ERRORS", $vs_errors, $ps_formatted_element);
$ps_formatted_element = str_replace("^EXTRA", isset($pa_options['extraLabelText']) ? $pa_options['extraLabelText'] : '', $ps_formatted_element);
$vs_element = $ps_formatted_element;
} else {
$vs_element .= "<br/>" . $vs_subelement;
}
return $vs_element;
} else {
$this->postError(716, _t("'%1' does not exist in this object", $ps_field), "BaseModel->formElement()");
return "";
}
return "";
}
/**
* Returns HTML <select> element containing the specified list, or portion of the list.
*
* @param mixed $pm_list_name_or_id
* @param string $ps_name
* @param array $pa_attributes
* @param array $pa_options Array of options. Valid options include:
* childrenOnlyForItemID = if set only items below item_id in the list item hierarchy are returned. Default (null) is to return all items in the list.
* directChildrenOnly = if set only items with item_id=childrenOnlyForItemID as parent in the list item hierarchy are returned. Default (null) is to return all items in the list.
* nullOption = if set then a "null" (no value) option is available labeled with the value passed in this option
* additionalOptions = an optional array of options that will be passed through to caHTMLSelect; keys are display labels and values are used as option values
* value = if set, the <select> will have default selection set to the item whose *value* matches the option value. If none is set then the first item in the list will be selected
* key = ca_list_item field to be used as value for the <select> element list; can be set to either item_id or item_value; default is item_id
* width = the display width of the list in characters or pixels
* limitToItemsWithID = An optional array of list item_ids. Item_ids not in the array will be omitted from the returned list.
* omitItemsWithID = An optional array of list item_ids. Item_ids in the array will be omitted from the returned list.
* disableItemsWithID = An optional array of list item_ids. Item_ids in the array will be disabled in the returned list.
*
* limitToItemsRelatedToCollections = an array of collection_ids or collection idno's; returned items will be restricted to those attached to the specified collections
* limitToItemsRelatedToCollectionWithRelationshipTypes = array of collection type names or type_ids; returned items will be restricted to those attached to the specified collectionss with the specified relationship type
* limitToListIDs = array of list_ids to restrict returned items to when using "limitToItemsRelatedToCollections"
*
* indentForHierarchy = indicate hierarchy with indentation. [Default is true]
* transaction = transaction to perform database operations within. [Default is null]
*
* @return string - HTML code for the <select> element; empty string if the list is empty
*/
public static function getListAsHTMLFormElement($pm_list_name_or_id, $ps_name, $pa_attributes = null, $pa_options = null)
{
$t_list = new ca_lists();
if ($o_trans = caGetOption('transaction', $pa_options, null)) {
$t_list->setTransaction($o_trans);
}
if (!is_array($pa_options)) {
$pa_options = array();
}
if (!(isset($pa_options['limitToItemsRelatedToCollection']) && is_array($pa_options['limitToItemsRelatedToCollections']))) {
$vn_list_id = $t_list->_getListID($pm_list_name_or_id);
$t_list->load($vn_list_id);
}
$vn_root_id = isset($pa_options['childrenOnlyForItemID']) && $pa_options['childrenOnlyForItemID'] ? $pa_options['childrenOnlyForItemID'] : null;
$va_disabled_item_ids = caGetOption('disableItemsWithID', $pa_options, null);
$vs_render_as = isset($pa_options['render']) ? $pa_options['render'] : '';
$vn_sort_type = $t_list->get('default_sort');
if ($vs_render_as == 'yes_no_checkboxes' && $vn_sort_type == __CA_LISTS_SORT_BY_LABEL__) {
$vn_sort_type = __CA_LISTS_SORT_BY_IDENTIFIER__;
// never allow sort-by-label when rendering as yes/no checkbox
}
if (!in_array($vs_render_as, array('lookup', 'horiz_hierbrowser', 'vert_hierbrowser'))) {
if (isset($pa_options['limitToItemsRelatedToCollections']) && is_array($pa_options['limitToItemsRelatedToCollections'])) {
$t_collection = new ca_collections();
$va_collection_ids = array();
foreach ($pa_options['limitToItemsRelatedToCollections'] as $vn_collection_id) {
if ($vn_collection_id && !is_numeric($vn_collection_id)) {
if ($vn_collection_id = $t_collection->load(array('idno' => $vn_collection_id))) {
$va_collection_ids[] = $vn_collection_id;
}
} else {
if ($vn_collection_id) {
$va_collection_ids[] = $vn_collection_id;
}
}
}
if (sizeof($va_collection_ids)) {
$qr_collections = $t_list->makeSearchResult('ca_collections', $va_collection_ids, array('restrictToRelationshipTypes' => isset($pa_options['limitToItemsRelatedToCollectionWithRelationshipTypes']) ? $pa_options['limitToItemsRelatedToCollectionWithRelationshipTypes'] : null));
$va_item_ids = array();
while ($qr_collections->nextHit()) {
$va_list_items = $qr_collections->get('ca_list_items', array('returnAsArray' => true));
foreach ($va_list_items as $vn_rel_id => $va_list_item) {
$va_item_ids[$vn_rel_id] = $va_list_item['item_id'];
}
}
if ($va_limit_to_listIDs = isset($pa_options['limitToListIDs']) && is_array($pa_options['limitToListIDs']) ? $pa_options['limitToListIDs'] : null) {
// for some reason the option comes back as array(0 => null) if no list is selected in UI
// -> have to make sure to catch this case here
if (sizeof($va_limit_to_listIDs) == 1 && empty($va_limit_to_listIDs[0])) {
$va_limit_to_listIDs = null;
}
}
if (is_array($va_limit_to_listIDs) && sizeof($va_item_ids)) {
// filter out items from tables we don't want
$qr_list_items = $t_list->makeSearchResult("ca_list_items", array_values($va_item_ids));
while ($qr_list_items->nextHit()) {
if (!in_array($qr_list_items->get('ca_list_items.list_id'), $va_limit_to_listIDs)) {
if (is_array($va_k = array_keys($va_item_ids, $qr_list_items->get('ca_list_items.item_id')))) {
foreach ($va_k as $vs_k) {
unset($va_list_items[$vs_k]);
}
}
}
}
}
}
} else {
$va_list_items = $t_list->getItemsForList($pm_list_name_or_id, array_merge($pa_options, array('returnHierarchyLevels' => caGetOption('indentForHierarchy', $pa_options, true), 'item_id' => $vn_root_id, 'extractValuesByUserLocale' => true, 'sort' => $vn_sort_type)));
}
}
if (!is_array($va_list_items)) {
$va_list_items = array();
}
$va_options = array();
$va_disabled_options = array();
if (!isset($pa_options['value'])) {
$pa_options['value'] = null;
}
if (!isset($pa_options['key'])) {
$pa_options['key'] = 'item_id';
}
if (!in_array($pa_options['key'], array('item_id', 'item_value'))) {
$pa_options['key'] = 'item_id';
}
if (!isset($pa_options['limitToItemsWithID']) || !is_array($pa_options['limitToItemsWithID']) || !sizeof($pa_options['limitToItemsWithID'])) {
$pa_options['limitToItemsWithID'] = null;
}
if (!isset($pa_options['omitItemsWithID']) || !is_array($pa_options['omitItemsWithID']) || !sizeof($pa_options['omitItemsWithID'])) {
$pa_options['omitItemsWithID'] = null;
}
if (isset($pa_options['nullOption']) && $pa_options['nullOption'] && $vs_render_as != 'checklist') {
$va_options[''] = $pa_options['nullOption'];
}
$va_colors = array();
$vn_default_val = null;
foreach ($va_list_items as $vn_item_id => $va_item) {
if (is_array($pa_options['limitToItemsWithID']) && !in_array($vn_item_id, $pa_options['limitToItemsWithID'])) {
continue;
}
if (is_array($pa_options['omitItemsWithID']) && in_array($vn_item_id, $pa_options['omitItemsWithID'])) {
continue;
}
$va_options[$va_item[$pa_options['key']]] = str_repeat(' ', intval($va_item['LEVEL']) * 3) . ' ' . $va_item['name_singular'];
if (!$va_item['is_enabled'] || is_array($va_disabled_item_ids) && in_array($vn_item_id, $va_disabled_item_ids)) {
$va_disabled_options[$va_item[$pa_options['key']]] = true;
}
$va_colors[$vn_item_id] = $va_item['color'];
if ($va_item['is_default']) {
$vn_default_val = $va_item[$pa_options['key']];
}
// get default value
if ($va_item['is_default'] && !isset($pa_options['nullOption'])) {
// set default if needed, but only if there's not a null option set
if (!is_array($pa_options['value']) && (!isset($pa_options['value']) || !strlen($pa_options['value']))) {
$pa_options['value'] = $vn_default_val;
} else {
if (is_array($pa_options['value']) && !sizeof($pa_options['value'])) {
$pa_options['value'] = array(0 => $vn_default_val);
}
}
}
}
if (isset($pa_options['additionalOptions']) && is_array($pa_options['additionalOptions'])) {
$va_options = array_merge($va_options, array_flip($pa_options['additionalOptions']));
}
$pa_options['disabledOptions'] = $va_disabled_options;
switch ($vs_render_as) {
case 'radio_buttons':
if (!sizeof($va_options)) {
return '';
}
// return empty string if list has no values
$vn_c = 0;
$vn_i = 0;
$vs_buf = "<table>\n";
foreach ($va_options as $vm_value => $vs_label) {
if ($vn_c == 0) {
$vs_buf .= "<tr>";
}
$va_attributes = array('value' => $vm_value);
if (isset($va_disabled_options[$vm_value]) && $va_disabled_options[$vm_value]) {
$va_attributes['disabled'] = 1;
}
$va_attributes['value'] = $vm_value;
$va_attributes['id'] = $ps_name . '_' . $vn_i;
if ($pa_options['value'] == $vm_value) {
$va_attributes['checked'] = '1';
}
if (isset($pa_options['readonly']) && $pa_options['readonly']) {
$va_attributes['disabled'] = 1;
}
$vs_buf .= "<td>" . caHTMLRadioButtonInput($ps_name, $va_attributes, $pa_options) . " {$vs_label}</td>";
$vn_c++;
if ($vn_c >= $pa_options['maxColumns']) {
$vn_c = 0;
$vs_buf .= "</tr>\n";
}
$vn_i++;
}
if ($vn_c != 0) {
$vs_buf .= "</tr>\n";
}
$vs_buf .= "</table>";
return $vs_buf;
break;
case 'yes_no_checkboxes':
if (!sizeof($va_options)) {
return '';
}
// return empty string if list has no values
$vn_c = 0;
$vb_is_checked = false;
if (!$pa_options['value']) {
$pa_options['value'] = (string) $vn_default_val;
}
foreach ($va_options as $vm_value => $vs_label) {
if (strlen($vm_value) == 0) {
continue;
}
// don't count null values when calculating the first value for the yes/no
switch ($vn_c) {
case 0:
if ($pa_options['value'] === (string) $vm_value) {
$vb_is_checked = true;
}
$pa_attributes['value'] = $pa_options['value'] = $vm_value;
$pa_options['label'] = $vs_label;
break;
case 1:
$pa_options['returnValueIfUnchecked'] = $vm_value;
break;
default:
// exit
break 2;
}
$vn_c++;
}
if ($vb_is_checked) {
$pa_attributes['checked'] = 1;
}
if (isset($pa_options['readonly']) && $pa_options['readonly']) {
$pa_attributes['disabled'] = 1;
}
return caHTMLCheckboxInput($ps_name, $pa_attributes, $pa_options);
break;
case 'checklist':
if (!sizeof($va_options)) {
return '';
}
// return empty string if list has no values
$vn_c = 0;
$vs_buf = "<table>\n";
foreach ($va_options as $vm_value => $vs_label) {
if ($vn_c == 0) {
$vs_buf .= "<tr>";
}
$va_attributes = array('value' => $vm_value);
if (isset($va_disabled_options[$vm_value]) && $va_disabled_options[$vm_value]) {
$va_attributes['disabled'] = 1;
}
if (isset($pa_options['readonly']) && $pa_options['readonly']) {
$va_attributes['disabled'] = 1;
}
if (is_array($pa_options['value']) && in_array($vm_value, $pa_options['value'])) {
$va_attributes['checked'] = '1';
}
$vs_buf .= "<td>" . caHTMLCheckboxInput($ps_name . '_' . $vm_value, $va_attributes, $pa_options) . " {$vs_label}</td>";
$vn_c++;
if ($vn_c >= $pa_options['maxColumns']) {
$vn_c = 0;
$vs_buf .= "</tr>\n";
}
}
if ($vn_c != 0) {
$vs_buf .= "</tr>\n";
}
$vs_buf .= "</table>";
return $vs_buf;
break;
case 'lookup':
$vs_value = $vs_hidden_value = "";
if (caGetOption('forSearch', $pa_options)) {
if ($vs_val_id = caGetOption('value', $pa_options)) {
$vs_value = $t_list->getItemFromListForDisplayByItemID($pm_list_name_or_id, $vs_val_id);
$vs_hidden_value = $vs_val_id;
}
} else {
$vs_value = "{" . $pa_options['element_id'] . "_label}";
$vs_hidden_value = "{" . $pa_options['element_id'] . "}";
}
$vs_buf = caHTMLTextInput($ps_name . '_autocomplete', array('width' => isset($pa_options['width']) && $pa_options['width'] > 0 ? $pa_options['width'] : 300, 'height' => isset($pa_options['height']) && $pa_options['height'] > 0 ? $pa_options['height'] : 1, 'value' => $vs_value, 'maxlength' => 512, 'id' => $ps_name . "_autocomplete", 'class' => 'lookupBg')) . caHTMLHiddenInput($ps_name, array('value' => $vs_hidden_value, 'id' => $ps_name));
if ($pa_options['request']) {
$vs_url = caNavUrl($pa_options['request'], 'lookup', 'ListItem', 'Get', array('list' => ca_lists::getListCode($vn_list_id), 'noInline' => 1, 'noSymbols' => 1, 'max' => 100));
} else {
// hardcoded default for testing.
$vs_url = '/index.php/lookup/ListItem/Get';
}
$vs_buf .= '</div>';
$vs_buf .= "\n\t\t\t\t\t<script type='text/javascript'>\n\t\t\t\t\t\tjQuery(document).ready(function() {\n\t\t\t\t\t\t\tjQuery('#{$ps_name}_autocomplete').autocomplete({\n\t\t\t\t\t\t\t\t\tsource: '{$vs_url}', minLength: 3, delay: 800, html: true,\n\t\t\t\t\t\t\t\t\tselect: function(event, ui) {\n\t\t\t\t\t\t\t\t\t\t\n\t\t\t\t\t\t\t\t\t\tif (parseInt(ui.item.id) > 0) {\n\t\t\t\t\t\t\t\t\t\t\tjQuery('#{$ps_name}').val(ui.item.id);\n\t\t\t\t\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\t\t\t\t\tjQuery('#{$ps_name}_autocomplete').val('');\n\t\t\t\t\t\t\t\t\t\t\tjQuery('#{$ps_name}').val('');\n\t\t\t\t\t\t\t\t\t\t\tevent.preventDefault();\n\t\t\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t);\n\t\t\t\t\t\t});\n\t\t\t\t\t</script>\n\t\t\t\t";
return $vs_buf;
break;
case 'horiz_hierbrowser':
case 'horiz_hierbrowser_with_search':
case 'vert_hierbrowser':
$va_width = caParseFormElementDimension($pa_options['width'] ? $pa_options['width'] : $pa_options['width']);
if ($va_width['type'] != 'pixels' && $va_width['dimension'] < 250) {
$va_width['dimension'] = 500;
}
$vn_width = $va_width['dimension'] . 'px';
$va_height = caParseFormElementDimension($pa_options['height']);
if ($va_height['type'] != 'pixels' && $va_height['dimension'] < 100) {
$va_height['dimension'] = 200;
}
$vn_height = $va_height['dimension'] . 'px';
$t_root_item = new ca_list_items();
$t_root_item->load(array('list_id' => $vn_list_id, 'parent_id' => null));
JavascriptLoadManager::register("hierBrowser");
$vs_buf = "<div style='width: {$vn_width}; height: {$vn_height};'><div id='{$ps_name}_hierarchyBrowser{n}' style='width: 100%; height: 100%;' class='" . ($vs_render_as == 'vert_hierbrowser' ? 'hierarchyBrowserVertical' : 'hierarchyBrowser') . "'>\n\t\t\t\t\t<!-- Content for hierarchy browser is dynamically inserted here by ca.hierbrowser -->\n\t\t\t\t</div><!-- end hierarchyBrowser -->\t</div>";
$vs_buf .= "\t<script type='text/javascript'>\n\t\tjQuery(document).ready(function() { \n\t\t\tvar oHierBrowser = caUI.initHierBrowser('{$ps_name}_hierarchyBrowser{n}', {\n\t\t\t\tuiStyle: '" . ($vs_render_as == 'vert_hierbrowser' ? 'vertical' : 'horizontal') . "',\n\t\t\t\tlevelDataUrl: '" . caNavUrl($pa_options['request'], 'lookup', 'ListItem', 'GetHierarchyLevel', array('noSymbols' => 1)) . "',\n\t\t\t\tinitDataUrl: '" . caNavUrl($pa_options['request'], 'lookup', 'ListItem', 'GetHierarchyAncestorList') . "',\n\t\t\t\t\n\t\t\t\tselectOnLoad : true,\n\t\t\t\tbrowserWidth: " . (int) $va_width['dimension'] . ",\n\t\t\t\t\n\t\t\t\tclassName: '" . ($vs_render_as == 'vert_hierbrowser' ? 'hierarchyBrowserLevelVertical' : 'hierarchyBrowserLevel') . "',\n\t\t\t\tclassNameContainer: '" . ($vs_render_as == 'vert_hierbrowser' ? 'hierarchyBrowserContainerVertical' : 'hierarchyBrowserContainer') . "',\n\t\t\t\t\n\t\t\t\teditButtonIcon: \"" . caNavIcon($pa_options['request'], __CA_NAV_BUTTON_RIGHT_ARROW__) . "\",\n\t\t\t\tdisabledButtonIcon: \"" . caNavIcon($pa_options['request'], __CA_NAV_BUTTON_DOT__) . "\",\n\t\t\t\tinitItemID: '{" . $pa_options['element_id'] . "}',\n\t\t\t\tdefaultItemID: '" . $t_list->getDefaultItemID() . "',\n\t\t\t\tuseAsRootID: '" . $t_root_item->getPrimaryKey() . "',\n\t\t\t\tindicatorUrl: '" . $pa_options['request']->getThemeUrlPath() . "/graphics/icons/indicator.gif',\n\t\t\t\t\n\t\t\t\tcurrentSelectionDisplayID: '{$ps_name}_browseCurrentSelectionText{n}',\n\t\t\t\tonSelection: function(item_id, parent_id, name, display) {\n\t\t\t\t\tjQuery('#{$ps_name}').val(item_id);\n\t\t\t\t}\n\t\t\t});";
if ($vs_render_as == 'horiz_hierbrowser_with_search') {
$vs_buf .= "jQuery('#{$ps_name}_hierarchyBrowserSearch{n}').autocomplete(\n\t\t\t\t\t{\n\t\t\t\t\t\tsource: '" . caNavUrl($pa_options['request'], 'lookup', 'ListItem', 'Get', array('list' => ca_lists::getListCode($vn_list_id), 'noSymbols' => 1)) . "', \n\t\t\t\t\t\tminLength: 3, delay: 800,\n\t\t\t\t\t\tselect: function(event, ui) {\n\t\t\t\t\t\t\toHierBrowser.setUpHierarchy(ui.item.id);\t// jump browser to selected item\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t);";
}
$vs_buf .= "});\n\t</script>";
if ($vs_render_as == 'horiz_hierbrowser_with_search') {
$vs_buf .= "<div class='hierarchyBrowserSearchBar'>" . _t('Search') . ": <input type='text' id='{$ps_name}_hierarchyBrowserSearch{n}' class='hierarchyBrowserSearchBar' name='search' value='' size='20'/></div>";
}
if ($vs_render_as != 'vert_hierbrowser') {
$vs_buf .= "<div id='{$ps_name}_browseCurrentSelection{n}' class='hierarchyBrowserCurrentSelection'>" . _t("Current selection") . ": <span id='{$ps_name}_browseCurrentSelectionText{n}' class='hierarchyBrowserCurrentSelectionText'>?</span></div>";
}
$vs_buf .= caHTMLHiddenInput($ps_name, array('value' => "{" . $pa_options['element_id'] . "}", 'id' => $ps_name));
return $vs_buf;
break;
case 'text':
return caHTMLTextInput($ps_name, $pa_attributes, $pa_options);
break;
case 'options':
return $va_options;
break;
default:
if (!sizeof($va_options)) {
return '';
}
// return empty string if list has no values
if (isset($pa_options['readonly']) && $pa_options['readonly']) {
$pa_attributes['disabled'] = 1;
}
return caHTMLSelect($ps_name, $va_options, $pa_attributes, array_merge($pa_options, array('contentArrayUsesKeysForValues' => true, 'colors' => $va_colors, 'height' => null)));
break;
}
}
/**
* Returns HTML for editable Geocode attribute, suitable for inclusion in a bundleable editing form
*
* @param array $pa_element_info Array of information about the element the bundle is being generate for
* @param array $pa_options Options are:
* width = Width of map + controls in pixels; default is 690
* height = Height of map + controls in pixels; default is 300
* baseLayer = Tiles to user for base layer. Should be full class name with optional constructor string (Eg. OpenLayers.Layer.Stamen('toner')); default is OpenLayers.Layer.OSM()
* pointRadius = Radius, in pixels, of plotted points. Default is 5 pixels
* fillColor = Color (in hex format with leading "#") to fill regions and points with
* strokeWidth = Width of plotted paths, in pixels. Default is 2
* strokeColor = Color of plotted paths, in hex format with leading "#"
* fillColorSelected = Color to fill regions with when selected, in hex format with leading "#"
* strokeColorSelected = Color of plotted paths when selected, in hex format with leading "#"
*
* @return string HTML output
*/
public function getAttributeBundleHTML($pa_element_info, $pa_options = null)
{
AssetLoadManager::register('openlayers');
$o_config = Configuration::load();
$va_element_width = caParseFormElementDimension($pa_element_info['settings']['fieldWidth']);
$vn_element_width = $va_element_width['dimension'];
$va_element_height = caParseFormElementDimension($pa_element_info['settings']['fieldHeight']);
$vn_element_height = $va_element_height['dimension'];
$va_options = caGetOptions($pa_options, array('width' => $vn_element_width, 'height' => $vn_element_height));
if (($vn_width = $va_options['width']) < 100) {
$vn_width = 690;
}
if (($vn_height = $va_options['height']) < 100) {
$vn_height = 300;
}
if (!($vs_base_layer = $va_options['baseLayer'])) {
if (!($vs_base_layer = $o_config->get('openlayers_base_layer'))) {
$vs_base_layer = 'OpenLayers.Layer.OSM()';
}
}
if (($vn_point_radius = $va_options['pointRadius']) < 1) {
if (!($vn_point_radius = $o_config->get('openlayers_point_radius'))) {
$vn_point_radius = 5;
}
}
if (($vs_fill_color = $va_options['fillColor']) < 1) {
if (!($vs_fill_color = $o_config->get('openlayers_fill_color'))) {
$vs_fill_color = '#ffcc66';
}
}
if (($vn_stroke_width = $va_options['strokeWidth']) < 1) {
if (!($vn_stroke_width = $o_config->get('openlayers_stroke_width'))) {
$vn_stroke_width = 2;
}
}
if (($vs_stroke_color = $va_options['strokeColor']) < 1) {
if (!($vs_stroke_color = $o_config->get('openlayers_stroke_color'))) {
$vs_stroke_color = '#ff9933';
}
}
if (($vs_fill_color_selected = $va_options['fillColorSelected']) < 1) {
if (!($vs_fill_color_selected = $o_config->get('openlayers_fill_color_selected'))) {
$vs_fill_color_selected = '#66ccff';
}
}
if (($vs_stroke_color_selected = $va_options['strokeColorSelected']) < 1) {
if (!($vs_stroke_color_selected = $o_config->get('openlayers_stroke_color_selected'))) {
$vs_stroke_color_selected = '#3399ff';
}
}
$po_request = isset($pa_options['request']) ? $pa_options['request'] : null;
$vs_id = $pa_element_info['element_id'];
$vs_element = '<div id="{fieldNamePrefix}mapholder_' . $vs_id . '_{n}" class="mapholder" style="width:' . $vn_width . 'spx; height:' . ($vn_height + 40) . 'px; float: left; margin:-18px 0 0 0;">';
$vs_element .= '<div class="olMapSearchControls" id="{fieldNamePrefix}Controls_{n}">';
if ($po_request) {
$vs_element .= '<div class="olMapSearchBox">';
$vs_element .= '<input type="text" class="olMapSearchText" name="{fieldNamePrefix}' . $pa_element_info['element_id'] . '_{n}_search" id="{fieldNamePrefix}' . $pa_element_info['element_id'] . '_{n}_search" size="30" value="" autocomplete="off" onfocus="this.value = \'\';" onkeypress="return map_geocode_' . $vs_id . '(event);"/>';
$vs_element .= "<a href='#' onclick='map_geocode_{$vs_id}();'>" . caGetThemeGraphic($po_request, 'buttons/glass.png', array('alt' => _t('Search'), 'class' => 'olMapSearchBoxIcon', 'id' => '{fieldNamePrefix}' . $pa_element_info['element_id'] . '_{n}_search_button')) . "</a>";
$vs_element .= '</div>';
}
$vs_element .= '<div class="olMapKmlControl" id="{fieldNamePrefix}showKmlControl_{n}">';
$vs_element .= '<div style="position: absolute; bottom: 0px; left: 0px;"><a href="#" class="button" id="{fieldNamePrefix}showKmlControl_{n}_button">' . _t('Upload KML file') . ' ›</a></div>';
$vs_element .= '</div>';
$vs_element .= '</div>';
$vs_element .= '<div class="olMapKMLInput" id="{fieldNamePrefix}KmlControl_{n}">';
$vs_element .= _t("Select KML or KMZ file") . ': <input type="file" name="{fieldNamePrefix}' . $pa_element_info['element_id'] . '_{n}"/><a href="#" class="button" id="{fieldNamePrefix}hideKmlControl_{n}_button">' . _t('Use map') . ' ›</a>';
$vs_element .= '</div>';
$vs_element .= '<div class="olMap" id="{fieldNamePrefix}map_' . $vs_id . '_{n}" style="width:' . $vn_width . 'px; height:' . $vn_height . 'px;"> </div>';
$vs_element .= '</div>';
$vs_element .= "<script type='text/javascript'>\n\t\t\n\tvar map_{$vs_id};\n\tvar points_{$vs_id};\n\tjQuery(document).ready(function() {\n\t\t// Styles\n\t\tvar styles_{$vs_id} = new OpenLayers.StyleMap({\n\t\t\t'default': new OpenLayers.Style({\n\t\t\t\tpointRadius: '{$vn_point_radius}',\n\t\t\t\tfillColor: '{$vs_fill_color}',\n\t\t\t\tstrokeColor: '{$vs_stroke_color}',\n\t\t\t\tstrokeWidth: '{$vn_stroke_width}',\n\t\t\t\tgraphicZIndex: 1\n\t\t\t}),\n\t\t\t'select': new OpenLayers.Style({\n\t\t\t\tfillColor: '{$vs_fill_color_selected}',\n\t\t\t\tstrokeColor: '{$vs_stroke_color_selected}',\n\t\t\t\tgraphicZIndex: 2\n\t\t\t})\n\t\t});\n\n\t\tvar map_{$vs_id}_editing_toolbar;\n\t\t\n\t\tfunction map_serialize_features_{$vs_id}() {\n\t\t\t// get all points\n\t\t\tvar features = [];\n\t\t\tfor(var i=0; i < points_{$vs_id}.features.length; i++) {\n\t\t\t\tvar pl = [];\n\t\t\t\tvar geometry_type = points_{$vs_id}.features[i].geometry.CLASS_NAME;\n\t\t\t\tvar n = points_{$vs_id}.features[i].geometry.getVertices();\n\t\t\t\tfor (var j=0; j<n.length; j++) {\n\t\t\t\t\tvar np = n[j].clone();\n\t\t\t\t\tnp.transform(map_{$vs_id}.getProjectionObject(), new OpenLayers.Projection('EPSG:4326'));\n\t\t\t\t\tpl.push(np.y + ',' + np.x);\n\t\t\t\t}\n\t\t\t\tif ((pl.length > 1) && (geometry_type == 'OpenLayers.Geometry.Polygon')) { pl.push(pl[0]); } // close polygons\n\t\t\t\tfeatures.push(pl.join(';'));\n\t\t\t}\n\t\t\t\n\t\t\tjQuery('#{fieldNamePrefix}" . $pa_element_info['element_id'] . "_{n}').val('[' + features.join(':') + ']');\n\t\t}\n\t\t\n\t\t// Set up layer for added points/paths\n\t\tpoints_{$vs_id} = new OpenLayers.Layer.Vector('Points', {\n\t\t\tstyleMap: styles_{$vs_id},\n\t\t\trendererOptions: {zIndexing: true},\n\t\t\teventListeners: {\n\t\t\t\t'featureadded': map_serialize_features_{$vs_id}\n\t\t\t}\n\t\t});\n\t\t\n\t\tmap_{$vs_id}_editing_toolbar = new OpenLayers.Control.EditingToolbar(points_{$vs_id});\n\t\t\n\t\t// Set up map\n\t\tmap_{$vs_id} = new OpenLayers.Map({\n\t\t\tdiv: '{fieldNamePrefix}map_{$vs_id}_{n}',\n\t\t\tlayers: [new {$vs_base_layer}],\n\t\t\tcontrols: [\n\t\t\t\tnew OpenLayers.Control.Navigation({\n\t\t\t\t\tdragPanOptions: {\n\t\t\t\t\t\tenableKinetic: true\n\t\t\t\t\t}\n\t\t\t\t}),\n\t\t\t\tnew OpenLayers.Control.Zoom()\n\t\t\t],\n\t\t\tcenter: [0,0],\n\t\t\tzoom: 1\n\t\t});\n\t\t\n\t\tvar map_{$vs_id}_drag_ctrl = new OpenLayers.Control.DragFeature(points_{$vs_id}, {\n\t\t\tonComplete: function(f) { map_serialize_features_{$vs_id}(f); }\n\t\t});\n\t\tmap_{$vs_id}.addControl(map_{$vs_id}_drag_ctrl);\n\t\tmap_{$vs_id}_drag_ctrl.activate();\n\t\t\n\t\t// add delete control\n\t\tvar map_{$vs_id}_delete_button = new OpenLayers.Control.Button ({displayClass: 'olControlDelete', trigger: function() { \n\t\t\tif (points_{$vs_id}.selectedFeatures) { \n\t\t\t\tpoints_{$vs_id}.removeFeatures(points_{$vs_id}.selectedFeatures);\n\t\t\t\tmap_serialize_features_{$vs_id}();\n\t\t\t}\n\t\t}, title: '" . _t('Remove') . "'});\n\t\tvar map_{$vs_id}_delete_panel = new OpenLayers.Control.Panel({type: OpenLayers.Control.TYPE_BUTTON, displayClass: 'olControlDeletePanel'});\n\t\tmap_{$vs_id}_delete_panel.addControls([map_{$vs_id}_delete_button]);\n\t\tmap_{$vs_id}.addControl(map_{$vs_id}_delete_panel);\n\t\tmap_{$vs_id}_delete_button.activate();\n\t\t\n\t\t// Grab current map coordinates from input\n\t\tvar map_{$ps_id}_loc_str = '{" . $pa_element_info['element_id'] . "}';\n\t\tvar map_{$ps_id}_loc_features = map_{$ps_id}_loc_str.match(/\\[([\\d\\,\\-\\.\\:\\;]+)\\]/)\n\t\tif (map_{$ps_id}_loc_features && (map_{$ps_id}_loc_features.length > 1)) {\n\t\t\tmap_{$ps_id}_loc_features = map_{$ps_id}_loc_features[1].split(/:/);\n\t\t} else {\n\t\t\tmap_{$ps_id}_loc_features = [];\n\t\t}\n\t\tvar features_{$vs_id} = [];\n\t\t\n\t\tvar i, j, c=0;\n\t\tfor(i=0; i < map_{$ps_id}_loc_features.length; i++) {\n\t\t\tvar ptlist = map_{$ps_id}_loc_features[i].split(/;/);\n\t\t\t\n\t\t\tif (ptlist.length > 1) {\n\t\t\t\t// path\n\t\t\t\tvar ptolist = [];\n\t\t\t\tfor(j=0; j < ptlist.length; j++) {\n\t\t\t\t\tvar pt = ptlist[j].split(/,/);\n\t\t\t\t\tptolist.push(new OpenLayers.Geometry.Point(pt[1], pt[0]));\n\t\t\t\t\t\n\t\t\t\t}\n\t\t\t\tfeatures_{$vs_id}.push(new OpenLayers.Feature.Vector(\n\t\t\t\t\tnew OpenLayers.Geometry.LineString(ptolist).transform(new OpenLayers.Projection('EPSG:4326'),map_{$vs_id}.getProjectionObject()), {}\n\t\t\t\t));\n\t\t\t} else {\n\t\t\t\t// point\n\t\t\t\tvar pt = ptlist[0].split(/,/);\n\t\t\t\tfeatures_{$vs_id}.push(new OpenLayers.Feature.Vector(\n\t\t\t\t\tnew OpenLayers.Geometry.Point(pt[1], pt[0]).transform(new OpenLayers.Projection('EPSG:4326'),map_{$vs_id}.getProjectionObject()), {}\n\t\t\t\t));\n\t\t\t}\n\t\t\tc++;\n\t\t}\n\t\n\t\tpoints_{$vs_id}.addFeatures(features_{$vs_id});\n\t\t\n\t\tvar map_{$vs_id}_highlight_ctrl = new OpenLayers.Control.SelectFeature(points_{$vs_id}, {\n\t\t\thover: false,\n\t\t\trenderIntent: 'temporary',\n\t\t\tmultiple: true, clickout: true, toggle: true, box: true,\n\t\t\teventListeners: {}\n\t\t});\n\t\tmap_{$vs_id}.addControl(map_{$vs_id}_highlight_ctrl);\n\t\tmap_{$vs_id}_highlight_ctrl.activate();\n\t\t\n\t\tmap_{$vs_id}.addControl(map_{$vs_id}_editing_toolbar);\n\t\tmap_{$vs_id}_editing_toolbar.activate();\n \n\t\tmap_{$vs_id}.addLayer(points_{$vs_id});\n\t\t\n\t\tif (c > 0) {\n\t\t\tmap_{$vs_id}.zoomToExtent(points_{$vs_id}.getDataExtent());\n\t\t\tif (map_{$vs_id}.zoom > 14) { map_{$vs_id}.zoomTo(14); }\n\t\t}\n\t\t\n\t\tjQuery('#{fieldNamePrefix}showKmlControl_{n}_button').click(function(event) {\n\t\t\tevent.preventDefault();\n\t\t\tjQuery('#{fieldNamePrefix}Controls_{n}').hide(200, function() {\n\t\t\t\tjQuery('#{fieldNamePrefix}KmlControl_{n}').slideDown(200);\n\t\t\t});\n\t\t});\n\t\t\n\t\tjQuery('#{fieldNamePrefix}hideKmlControl_{n}_button').click(function(event) {\n\t\t\t\tevent.preventDefault();\n\t\t\t\tjQuery(this).parent().hide(200, function() {\n\t\t\t\t\tjQuery('#{fieldNamePrefix}Controls_{n}').slideDown(200);\n\t\t\t\t});\n\t\t\t});\n\t});\n\t\tfunction map_geocode_{$vs_id}(e) {\n\t\t\tif (e && ((e.keyCode || e.which || e.charCode || 0) !== 13)) { return true; }\n\t\t\tvar t = jQuery('#{fieldNamePrefix}" . $pa_element_info['element_id'] . "_{n}_search').val();\n\t\t\tjQuery('#{fieldNamePrefix}" . $pa_element_info['element_id'] . "_{n}_search_button').attr('src', '" . caGetThemeGraphicURL($po_request, '/icons/indicator.gif') . "');\n\t\t\tvar geocoder = new google.maps.Geocoder();\n\t\t\tgeocoder.geocode( { 'address': t}, function(results, status) {\n\t\t\t\tjQuery('#{fieldNamePrefix}" . $pa_element_info['element_id'] . "_{n}_search_button').attr('src', '" . caGetThemeGraphicURL($po_request, '/buttons/glass.png') . "');\n\t\t\t\tif (status == google.maps.GeocoderStatus.OK) {\n\t\t\t\t\tvar loc = results[0]['geometry']['location'];\n\t\t\t\t\tvar pt = new OpenLayers.LonLat(loc.lng(), loc.lat()).transform(new OpenLayers.Projection('EPSG:4326'),map_{$vs_id}.getProjectionObject());\n\t\t\t\t\tmap_{$vs_id}.panTo(pt);\n\t\t\t\t\tmap_{$vs_id}.zoomTo((results[0]['geometry']['location_type'] == 'APPROXIMATE') ? 10 : 14);\n\t\t\t\t\tpoints_{$vs_id}.addFeatures([new OpenLayers.Feature.Vector(new OpenLayers.Geometry.Point(loc.lng(), loc.lat()).transform(new OpenLayers.Projection('EPSG:4326'),map_{$vs_id}.getProjectionObject()))]);\n\t\t\t\t}\n\t\t\t});\n\t\t\treturn false;\n\t\t}\n\t</script>";
$vs_element .= '<input class="coordinates mapCoordinateDisplay" type="hidden" name="{fieldNamePrefix}' . $pa_element_info['element_id'] . '_{n}" id="{fieldNamePrefix}' . $pa_element_info['element_id'] . '_{n}"/>';
return $vs_element;
}
function caHTMLTextInput($ps_name, $pa_attributes = null, $pa_options = null)
{
$vb_is_textarea = false;
$va_styles = array();
if (is_array($va_dim = caParseFormElementDimension(isset($pa_options['width']) ? $pa_options['width'] : (isset($pa_attributes['size']) ? $pa_attributes['size'] : (isset($pa_attributes['width']) ? $pa_attributes['width'] : null))))) {
if ($va_dim['type'] == 'pixels') {
$va_styles[] = "width: " . $va_dim['dimension'] . "px;";
unset($pa_attributes['width']);
unset($pa_attributes['size']);
unset($pa_attributes['cols']);
} else {
// width is in characters
$pa_attributes['size'] = $va_dim['dimension'];
}
}
if (is_array($va_dim = caParseFormElementDimension(isset($pa_options['height']) ? $pa_options['height'] : (isset($pa_attributes['height']) ? $pa_attributes['height'] : null)))) {
if ($va_dim['type'] == 'pixels') {
$va_styles[] = "height: " . $va_dim['dimension'] . "px;";
unset($pa_attributes['height']);
unset($pa_attributes['rows']);
$vb_is_textarea = true;
} else {
// height is in characters
if (($pa_attributes['rows'] = $va_dim['dimension']) > 1) {
$vb_is_textarea = true;
}
}
} else {
if (($pa_attributes['rows'] = isset($pa_attributes['height']) && $pa_attributes['height'] ? $pa_attributes['height'] : 1) > 1) {
$vb_is_textarea = true;
}
}
$pa_attributes['style'] = join(" ", $va_styles);
if ($vb_is_textarea) {
$vs_value = $pa_attributes['value'];
if ($pa_attributes['size']) {
$pa_attributes['cols'] = $pa_attributes['size'];
}
unset($pa_attributes['size']);
unset($pa_attributes['value']);
$vs_attr_string = _caHTMLMakeAttributeString($pa_attributes, $pa_options);
$vs_element = "<textarea name='{$ps_name}' wrap='soft' {$vs_attr_string}>" . $vs_value . "</textarea>\n";
} else {
$pa_attributes['size'] = !$pa_attributes['size'] ? $pa_attributes['width'] : $pa_attributes['size'];
$vs_attr_string = _caHTMLMakeAttributeString($pa_attributes, $pa_options);
$vs_element = "<input name='{$ps_name}' {$vs_attr_string} type='text'/>\n";
}
return $vs_element;
}