drg_cms 0.5.52.12 → 0.6.0.8

data/app/helpers/cms_common_helper.rb

@@ -0,0 +1,311 @@
+#--
+# Copyright (c) 2012+ Damjan Rems
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+
+
+####################################################################
+# Common methods which may also come handy in controllers or models or any
+# other module of program.
+# 
+# Usage: include CmsCommonHelper
+####################################################################
+module CmsCommonHelper
+  
+####################################################################
+# Wrapper for i18 t method, with some spice added. If translation is not found English
+# translation value will be returned. And if still not found default value will be returned if passed.
+# 
+# Parameters:
+# [key] String. String to be translated into locale.
+# [default] String. Value returned if translation is not found.
+# 
+# Example:
+#    t('translate.this','Enter text for ....')
+# 
+# Returns: 
+# String. Translated text. 
+####################################################################
+def self.t(key, default=nil) 
+  c = I18n.t(key)
+  if c.class == Hash or c.match( 'translation missing' )
+    c = I18n.t(key, locale: 'en') 
+# Still not found. Return default if set
+    if c.class == Hash or c.match( 'translation missing' )
+      c = default.nil? ? key : default
+    end
+  end
+  c
+end
+
+####################################################################
+def t(key, default=nil) #:nodoc
+  CmsCommonHelper.t(key, default)
+end
+
+####################################################################
+# Returns table (collection) name translation for usage in dialog title. Tablename 
+# title is provided by helpers.label.table_name.tabletitle locale.
+# 
+# Parameters:
+# [tablename] String. Table (collection) name to be translated.
+# [default] String. Value returned if translation is not found.
+# 
+# Returns: 
+# String. Translated text. 
+####################################################################
+def t_tablename(tablename, default=nil)
+  t('helpers.label.' + tablename + '.tabletitle', default || tablename)
+end
+
+############################################################################
+# Returns label for field translated to current locale for usage on data entry form.
+# Translation is provided by lang.helpers.label.table_name.field_name locale. If
+# translation is not found method will capitalize field_name and replace '_' with ' '.
+############################################################################
+def t_name(field_name, default='')
+  c = t("helpers.label.#{@form['table']}.#{field_name}", default)
+  c = field_name.capitalize.gsub('_',' ') if c.match( 'translation missing' )
+  c
+end
+
+###########################################################################
+# When select field is used on form options for select can be provided by 
+# helpers.label.table_name.choices4_name locale. This is how select
+# field options are translated. Method returns selected choice translated
+# to current locale. 
+# 
+# Parameters:
+# [model] String. Table (collection) model name (lowercase).
+# [field] String. Field name used.
+# [value] String. Value of field which translation will be returned.
+# 
+# Example:
+#    # usage in program. Choice values for state are 'Deactivated:0,Active:1,Waiting:2'
+#    dc_name4_value('dc_user', 'state', @record.active )
+#
+#    # usage in form
+#    columns:
+#      2: 
+#        name: state
+#        eval: dc_name4_value dc_user, state
+#        
+# Returns: 
+# String. Descriptive text (translated) for selected choice value.
+############################################################################
+def self.dc_name_for_value(model, field, value)
+  return '' if value.nil?
+  c = t('helpers.label.' + model + '.choices4_' + field )
+  a = c.chomp.split(',').inject([]) {|r,v| r << v.split(':') }
+  a.each {|e| return e.first if e.last.to_s == value.to_s }
+  '???'
+end
+
+############################################################################
+def dc_name_for_value(model, field, value)
+  CmsCommonHelper.dc_name_for_value(model, field, value)
+end
+
+############################################################################
+#
+############################################################################
+def dc_name4_value(model, field, value) #nodoc
+  #dc_deprecate('dc_name4_value will be deprecated. Use dc_name_for_value instead.')
+  CmsCommonHelper.dc_name_for_value(model, field, value)
+end
+
+############################################################################
+# Return choices for field in model if choices are defined in localization text.
+# 
+# Parameters:
+# [model] String. Table (collection) model name (lowercase).
+# [field] String. Field name used.
+# 
+# Example:
+#    dc_choices4_field('dc_user', 'state' )
+#        
+# Returns: 
+# Array. Choices for select input field
+############################################################################
+def self.dc_choices_for_field(model, field)
+  c = CmsCommonHelper.t('helpers.label.' + model + '.choices4_' + field )
+  return ['error'] if c.match( 'translation missing' )
+  c.chomp.split(',').inject([]) {|r,v| r << v.split(':') }
+end
+
+############################################################################
+def dc_choices_for_field(model, field)
+  CmsCommonHelper.dc_choices_for_field(model, field)
+end
+
+############################################################################
+#
+############################################################################
+def dc_choices4_field(model, field) #nodoc
+  #dc_deprecate('dc_choices4_field will be deprecated. Use dc_choices_for_field instead.')
+  CmsCommonHelper.dc_choices_for_field(model, field)
+end
+
+############################################################################
+# Will return descriptive text for id key when field in one table (collection) has belongs_to 
+# relation to other table.
+# 
+# Parameters:
+# [model] String. Table (collection) model name (lowercase).
+# [field] String. Field name holding the value of descriptive text.
+# [field_name] String. ID field name. This is by default id, but can be any other 
+# (preferred unique) field.
+# [value] Value of id_field. Usually a BSON Key but can be any other data type.
+# 
+# Example:
+#    # usage in program.
+#    dc_name4_id('dc_user', 'name', nil, dc_page.created_by)
+#
+#    # usage in form
+#    columns:
+#      2: 
+#        name: site_id
+#        eval: dc_name4_id,site,name
+#    # username is saved to document instead of user.id field
+#      5: 
+#        name: user
+#        eval: dc_name4_id,dc_user,name,username
+# 
+# Returns: 
+# String. Name (descriptive value) for specified key in table.
+############################################################################
+def dc_name_for_id(model, field, field_name, id=nil)
+  return '' if id.nil?
+  field_name = (field_name || 'id').strip.to_sym
+  field = field.strip.to_sym
+  
+  model = model.strip.classify.constantize if model.class == String
+  rec = Mongoid::QueryCache.cache { model.find_by(field_name => id) }
+  rec.nil? ? '' : (rec.send(field) rescue 'not defined')
+end
+
+############################################################################
+#
+############################################################################
+def dc_name4_id(model, field, field_name, id=nil) #nodoc
+  #dc_deprecate('dc_name4_id will be deprecated. Use dc_name_for_id instead.')
+  dc_name_for_id(model, field, field_name, id) 
+end
+
+############################################################################
+# Return html code for icon presenting boolean value. Icon is a picture of checked or unchecked box.
+# 
+# Parameters:
+# [value] Boolean.  
+# 
+# Example:
+#    # usage from program
+#    dc_icon4_boolean(some_value)
+#
+#    # usage from form description
+#    columns:
+#      10: 
+#        name: active
+#        eval: dc_icon4_boolean
+############################################################################
+def dc_icon_for_boolean(value=false)
+  dc_dont?(value, true) ? fa_icon('square-o lg') : fa_icon('check-square-o lg') 
+end
+
+############################################################################
+#
+############################################################################
+def dc_icon4_boolean(value=false) #nodoc
+  #dc_deprecate('dc_icon4_boolean will be deprecated. Use dc_icon_for_boolean instead.')
+  dc_icon_for_boolean(value)
+end
+
+############################################################################
+# Returns html code for displaying date/time formatted by strftime. Will return '' if value is nil.
+# 
+# Parameters:
+# [value] Date/DateTime/Time.  
+# [format] String. strftime format mask. Defaults to locale's default format.
+############################################################################
+def self.dc_format_date_time(value, format=nil)
+  return '' if value.blank?
+
+  format ||= value.class == Date ? t('date.formats.default') : t('time.formats.default')
+  if format.size == 1
+    format = format.match(/d/i) ? t('date.formats.default') : t('time.formats.default')
+  end
+  value.strftime(format)
+end
+
+def dc_format_date_time(value, format=nil) #:nodoc:
+  CmsCommonHelper.dc_format_date_time(value, format)
+end
+
+####################################################################
+#
+####################################################################
+def dc_date_time(value, format) #:nodoc:
+  dc_deprecate 'dc_date_time will be deprecated! Use dc_format_date_time instead.'
+  dc_format_date_time(value, format)
+end
+
+############################################################################
+# Returns html code for displaying formatted number.
+# 
+# Parameters:
+# [value] Numeric number.  
+# [decimals] Integer. Number of decimals
+# [separator] String. Decimals separator
+# [delimiter] String. Thousands delimiter.
+# [currency] String. Currency symbol if applied to result string.
+############################################################################
+def self.dc_format_number(value=0, decimals=nil, separator=nil, delimiter=nil, currency=nil)
+  decimals  ||=  I18n.t('number.currency.format.precision')
+  separator ||= I18n.t('number.currency.format.separator')
+  separator   = '' if decimals == 0
+  delimiter ||= I18n.t('number.currency.format.delimiter')
+  whole, dec = value.to_s.split('.')
+  whole = '0' if whole.blank?
+# remove and remember sign  
+  sign = ''
+  if whole[0] == '-'
+    whole.delete_prefix!('-')
+    sign  << '-'
+  end
+# format decimals
+  dec ||= '0'
+  dec = dec[0,decimals]
+  while dec.size < decimals do dec += '0' end
+# slice whole on chunks of 3
+  ar = []
+  while whole.size > 0 do 
+    n = whole.size >=3 ? 3 : whole.size 
+    ar << whole.slice!(n*-1,n)
+  end
+# put it all back and format
+  "#{sign}#{ar.reverse.join(delimiter)}#{separator}#{dec}" 
+end
+
+def dc_format_number(value=0, decimals=nil, separator=nil, delimiter=nil, currency=nil) #:nodoc:
+  CmsCommonHelper.dc_format_number(value, decimals, separator, delimiter, currency)
+end
+
+end

data/app/helpers/cms_edit_helper.rb

@@ -0,0 +1,498 @@
+#--
+# Copyright (c) 2012+ Damjan Rems
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+
+###########################################################################
+# 
+# CmseditHelper module defines helper methods used by cmsedit actions. Output is controlled by 
+# data found in 3 major sections of DRG CMS form: index, result_set and form sections. 
+#
+###########################################################################
+module CmsEditHelper
+
+############################################################################
+# Will return value when internal or additional parameters are defined in action
+# Subroutine of dc_actions_for_form.
+############################################################################
+def dc_value_for_parameter(param)#:nodoc:
+  if param.class == Hash
+    dc_internal_var(param['object'] || 'record', param['method'])
+  else
+    param    
+  end
+end
+
+############################################################################
+# Creates actions div for edit form.
+# 
+# Displaying readonly form turned out to be challenge. For now when readonly parameter
+# has value 2, back link will force readonly form. Value 1 or not set will result in
+# normal link.
+############################################################################
+def dc_is_action_active?(options)
+  if options['when_new']
+    dc_deprecate("when_option will be deprecated and replaced by active: not_new_record! Form #{params[:form_name]}") 
+    return !(dc_dont?(options['when_new']) and @record.new_record?)
+  end
+  return true unless options['active']
+  # alias record and document so both can be used in eval
+  record = document = @record
+  option = options['active']
+  case 
+  # usually only for test
+  when option.class  == TrueClass || option['eval'].class == TrueClass then true    
+  when option.class == String then
+    if option.match(/new_record/i)
+      (@record.new_record? && option == 'new_record') || (!@record.new_record? && option == 'not_new_record')
+    elsif option.match(/\./)
+      # shortcut for method and eval option
+      parms = @record ? @record : params
+      dc_process_eval(option,parms)
+    else
+      eval(option['eval'])
+    end
+  # direct evaluate expression
+  when option['eval'] then
+    eval(option['eval'])
+  when option['method'] then
+    # if record present send record otherwise send params as parameter
+    parms = @record ? @record : params
+    dc_process_eval(option['method'],parms)
+  else
+    false
+  end  
+end
+
+############################################################################
+# Creates actions div for edit form.
+# 
+# Displaying readonly form turned out to be challenge. For now when readonly parameter
+# has value 2, back link will force readonly form. Value 1 or not set will result in
+# normal link.
+############################################################################
+def dc_actions_for_form(position)
+# create standard actions  
+  std_actions = {1 => 'back', 2 => {'type' => 'submit', 'caption' => 'drgcms.save'},
+                 3 => {'type' => 'submit', 'caption' => 'drgcms.save&back'} }
+# when edit only  
+  unless @record.try(:id).nil?
+    std_actions.merge!({6 => 'new'} )
+    std_actions.merge!(@record.active ? {5 => 'disable'} : {5 => 'enable'} ) if @record.respond_to?('active')
+    std_actions.merge!({7 => 'refresh'} )
+  end
+  actions = @form['form']['actions']
+# shortcut for actions: standard 
+  actions = nil if actions.class == String && actions == 'standard'
+# standard actions
+  actions = std_actions if actions.nil?
+# readonly 
+  actions = {1 => 'back'} if @form['readonly']
+  actions = {1 => 'close'} if params[:window_close]
+# Actions are strictly forbidden 
+  if @form['form']['actions'] and dc_dont?(@form['form']['actions'])
+    actions = []
+  elsif actions['standard']
+    actions.merge!(std_actions)
+    actions['standard'] = nil
+  end
+# Update save and save&back
+  actions.each do |k,v| 
+    if v.class == String 
+      if v.match(/save\&back/i)
+        actions[k] = {'type' => 'submit', 'caption' => 'drgcms.save&back'}
+      elsif v == 'save'
+        actions[k] = {'type' => 'submit', 'caption' => 'drgcms.save'}      
+      end
+    end
+  end
+# remove standard option and sort so that standard actions come first
+  actions.delete('standard')
+  actions = actions.to_a.sort {|x,y| x[0] <=> y[0]} 
+# Add spinner to the beginning
+  html = %Q[<span class="dc-spinner">#{fa_icon('spinner lg spin')}</span><ul class="dc-menu #{position}">]
+  
+  actions.each do |key, options|
+    session[:form_processing] = "form:actions: #{key} #{options}"
+    next if options.nil?  # yes it happends
+    parms = @parms.clone
+    if options.class == String
+      next if params[:readonly] and !options.match(/back|close/)
+      
+      html << '<li class="dc-link dc-animate">'
+      html << case 
+        when (options == 'back' or options == 'cancle') then
+# If return_to is present link directly to URL        
+          if parms['xreturn_to'] # disabled for now
+            dc_link_to( 'drgcms.back','arrow-left', parms['return_to'] )
+          else
+            parms['action'] = 'index'
+            parms['readonly'] = parms['readonly'].to_s.to_i < 2 ? nil : 1  
+            dc_link_to( 'drgcms.back','arrow-left', parms )
+          end
+          
+        when options == 'delete' then
+          parms['operation'] = options
+          parms['id']   = @record.id
+          dc_link_to( 'drgcms.delete','remove', parms, data: { confirm: t('drgcms.confirm_delete') }, method: :delete )
+          
+        when options == 'new' then
+          parms['action'] = options
+          dc_link_to( 'drgcms.new', 'plus', parms)
+          
+        when (options == 'enable' or options == 'disable') then
+          parms['operation'] = options
+          parms['id']        = @record.id
+          icon = (options == 'enable' ? 'thumbs-o-up' : 'thumbs-o-down')
+          dc_link_to( "drgcms.#{options}",icon, parms, method: :delete )
+          
+        when options == 'edit' then
+          parms['operation'] = options
+          parms['id']        = @record.id
+          dc_link_to( "drgcms.#{options}",options, parms )
+          
+        when options == 'refresh' then
+          "<div onclick='window.location.href=window.location.href;'>#{fa_icon('refresh')} #{t('drgcms.refresh')}</div></li>"
+          
+        when options == 'close' then
+          close = params[:window_close].to_i
+          if close < 2
+            "<div onclick='window.close();'>#{fa_icon('close')} #{t('drgcms.close')}</div></li>"
+          else
+            "<div onclick='history.back();'>#{fa_icon('close')} #{t('drgcms.close')}</div></li>"
+          end
+      else 
+        "err1 #{key}=>#{options}"
+      end
+      html << '</td>'
+    # non standard actions      
+    else
+      options['title'] = t("#{options['title'].downcase}", options['title']) if options['title']
+      html << case 
+      # submit button
+      when options['type'] == 'submit'
+        caption = options['caption'] || 'drgcms.save'
+        icon    = options['icon'] || 'save'
+        prms = {}
+        options['params'].each { |k,v| prms[k] = dc_value_for_parameter(v) } if options['params']
+        if dc_is_action_active?(options) 
+          '<li class="dc-link-submit dc-animate">' + 
+             dc_submit_tag(caption, icon, {:data => prms, :title => options['title'] }) +
+          '</li>'
+        else
+          "<li class=\"dc-link-no\">#{fa_icon(icon)} #{caption}</li>"
+        end
+      
+      # delete with some sugar added
+      when options['type'] == 'delete'
+        parms['id']   = @record.id
+        parms.merge!(options['params'])
+        caption = options['caption'] || 'drgcms.delete'
+        icon = options['icon'] || 'remove'
+        '<li class="dc-link dc-animate">' + 
+          dc_link_to( caption, icon, parms, data: t('drgcms.confirm_delete'), method: :delete ) +
+        '</li>'
+      
+      # ajax or link button
+      when %w(ajax link window).include?(options['type'])
+        dc_link_ajax_window_submit_action(options, @record)
+        
+# Javascript action        
+      when options['type'] == 'script'
+        dc_script_action(options)
+      else
+        '<li>err2</li>'
+      end
+    end
+  end
+  (html << '</ul>').html_safe
+end
+
+############################################################################
+# Create background div and table definitions for result set.
+############################################################################
+def dc_background_for_result(start)
+  if start == :start
+    html = '<div class="dc-result-div" ' 
+    html << (@form['result_set']['table_style'] ? 'style="overflow-x: scroll;" >' : '>')
+  #
+    html << "\n<div class=\"dc-result #{@form['result_set']['table_class']}\" "
+    html << (@form['result_set']['table_style'] ? "style=\"#{@form['result_set']['table_style']}\" >" : '>')
+  else
+    html = '</div></div>'
+  end
+  html.html_safe
+end
+
+############################################################################
+# Checks if value is defined and sets default. If values are sent it also checks
+# if value is found in values. If not it will report error and set value to default.
+# Subroutine of dc_fields_for_tab.
+############################################################################
+def dc_check_and_default(value, default, values=nil) #:nodoc:
+  return default if value.nil?
+# check if value is within allowed values  
+  if values
+    if !values.index(value) 
+# parameters should be in downcase. Check downcase version.
+      if n = values.index(value.downcase)
+        return values[n]
+      else
+        logger.error("DRG Forms: Value #{value} not within values [#{values.join(',')}]. Default #{default} used!")
+        return default
+      end
+    end
+  end
+  value
+end
+
+############################################################################
+# Creates input fields for one tab. Subroutine of dc_fields_for_form.
+############################################################################
+def dc_fields_for_tab(fields_on_tab) #:nodoc:
+  html = '<div class="dc-form">'
+  labels_pos = dc_check_and_default(@form['form']['labels_pos'], 'right', ['top', 'left', 'right'])
+  hidden_fields, odd_even = '', nil
+  group_option, group_count = 0, 0
+  reset_cycle()
+  # Select form fields and sort them by key
+  form_fields  = fields_on_tab.select {|field| field.class == Integer }
+  form_fields.to_a.sort.each do |number, options|
+    session[:form_processing] = "form:fields: #{number}=#{options}"
+    # ignore if edit_only singe field is required
+    next if params[:edit_only] and params[:edit_only] != options['name'] 
+    # hidden_fields. Add them at the end
+    if options['type'] == 'hidden_field'
+      hidden_fields << DrgcmsFormFields::HiddenField.new(self, @record, options).render
+      next
+    end
+    # label
+    field_html,label,help = dc_field_label_help(options)
+    # Line separator
+    html << dc_top_bottom_line(:top, options)
+    # Beginning of new row
+    if group_count == 0
+      html << '<div class="row-div">' 
+      odd_even = cycle('odd','even')
+      group_count  = options['group'] || 1 
+      group_option = options['group'] || 1 
+    end
+    #    
+    html << if labels_pos == 'top'
+%Q[
+<div class="dc-form-label-top dc-color-#{odd_even} dc-align-left" title="#{help}">
+  <label for="record_#{options['name']}">#{label} </label>
+  <div id="td_record_#{options['name']}">#{field_html}</div>
+</div> ]
+    else
+      # no label
+      if dc_dont?(options['caption'])
+        label = ''
+        label_width = 0
+        data_width  = 100
+      elsif group_option > 1 
+        label_width = group_option != group_count ? 10 : 14        
+        data_width  = 21
+      else
+        label_width = 14
+        data_width  = 85      
+      end      
+%Q[
+<div class="dc-form-label dc-color-#{odd_even} dc-align-#{labels_pos} dc-width-#{label_width}" title="#{help}">
+  <label for="record_#{options['name']}">#{label} </label>
+</div>
+<div id="td_record_#{options['name']}" class="dc-form-field dc-color-#{odd_even} dc-width-#{data_width}">#{field_html}</div>
+]
+    end
+    # check if group end
+    if (group_count -= 1) == 0
+      html << '</div>'
+      # insert dummy div when only two fields in group
+      html << '<div></div>' if group_option == 2
+    end
+    
+    html << dc_top_bottom_line(:bottom, options)
+  end
+  html << '</div>' << hidden_fields
+end
+
+############################################################################
+# Creates edit form div. 
+############################################################################
+def dc_fields_for_form()
+  html, tabs, tab_data = '',[], ''
+  @js  ||= ''
+  @css ||= ''
+  # Only fields defined
+  if (form_fields = @form['form']['fields'])
+    html << "<div id='data_fields' " + (@form['form']['height'] ? "style=\"height: #{@form['form']['height']}px;\">" : '>')  
+    html << dc_fields_for_tab(form_fields) + '</div>'
+  else
+    # there are multiple tabs on form
+    first = true # first tab 
+    @form['form']['tabs'].keys.sort.each do |tab_name|
+      next if tab_name.match('actions')
+      # Tricky. If field name is not on the tab skip to next tab
+      if params[:edit_only]
+        is_on_tab = false
+        @form['form']['tabs'][tab_name].each {|k,v| is_on_tab = true if params[:edit_only] == v['name'] }
+        next unless is_on_tab
+      end
+      # first div is displayed, all others are hidden
+      tab_data << "<div id=\"data_#{tab_name.delete("\s\n")}\""
+      tab_data << ' class="div-hidden"' unless first
+      tab_data << " style=\"height: #{@form['form']['height']}px;\"" if @form['form']['height']
+      tab_data << ">#{dc_fields_for_tab(@form['form']['tabs'][tab_name])}</div>"
+      tab_label = @form['form']['tabs'][tab_name]['caption'] || tab_name 
+      tabs << [tab_name, tab_label]
+      first = false      
+    end
+    # make it all work together
+    html << '<ul class="dc-form-ul" >'
+    first = true # first tab must be selected
+    tabs.each do |tab_name, tab_label| 
+      html << "<li id=\"li_#{tab_name}\" data-div=\"#{tab_name.delete("\s\n")}\" class=\"dc-form-li"
+      html << ' dc-form-li-selected' if first 
+      html << "\">#{t(tab_label, t_name(tab_label, tab_label))}</li>"
+      first = false
+    end
+    html << '</ul>'
+    html << tab_data
+  end
+  # add last_updated_at hidden field so controller can check if record was updated in db during editing
+  html << hidden_field(nil, :last_updated_at, value: @record.updated_at.to_i) if @record.respond_to?(:updated_at)
+  # add form time stamp to prevent double form submit
+  html << hidden_field(nil, :form_time_stamp, value: Time.now.to_i)
+  # add javascript code if defined by form
+  @js << "\n#{@form['script']}"
+  @css << "\n#{@form['css']}" 
+  html.html_safe
+end
+
+############################################################################
+# Creates head form div. Head form div is used to display header data usefull
+# to be seen even when tabs are switched.
+############################################################################
+def dc_head_for_form()
+  @css ||= ''
+  head = @form['form']['head']
+  return '' if head.nil?
+  html    = %Q[<div class="dc-head #{head['class']}">\n<div class="dc-row">]
+  split   = head['split'] || 4
+  percent = 100/split
+  current = 0
+  head_fields = head.select {|field| field.class == Integer }
+  head_fields.to_a.sort.each do |number, options|
+    session[:form_processing] = "form: head: #{number}=#{options}"
+    # Label
+    caption = options['caption']
+    span    = options['span'] || 1
+    @css << "\n#{options['css']}" unless options['css'].blank?
+    label   = if caption.blank?
+      ''
+    elsif options['name'] == caption
+      t_name(options['name'], options['name'].capitalize.gsub('_',' ') )
+    else
+      t(caption, caption) 
+    end
+    # Field value
+    begin
+      field = if options['eval']
+        dc_process_column_eval(options, @record)
+      else
+        @record.send(options['name'])
+      end
+    rescue Exception => e
+      dc_log_exception(e)
+      field = '!!!Error'
+    end
+    #
+    klass = dc_style_or_class(nil, options['class'], field, @record)
+    style = dc_style_or_class(nil, options['style'], field, @record)
+    html << %Q[<div class="dc-column #{klass}" style="width:#{percent*span}%;#{style}">
+  #{label.blank? ? '' : "<span class=\"label\">#{label}</span>"}
+  <span class="field">#{field}</span>
+</div>]
+    current += span
+    if current == split
+      html << %Q[</div>\n<div class="dc-row">]
+      current = 0
+    end
+  end
+  html << '</div></div>'
+  html.html_safe
+end
+
+############################################################################
+# Returns username for id. Subroutine of dc_document_statistics
+###########################################################################
+def dc_document_user_for(field_name) #:nodoc:
+  if @record[field_name]
+    u = DcUser.find(@record[field_name])
+    return u ? u.name : @record[field_name]
+  end
+#  nil
+end
+
+############################################################################
+# Creates current document statistics div (created_by, created_at, ....) at the bottom of edit form.
+# + lots of more. At the moment also adds icon for dumping current document as json text.
+############################################################################
+def dc_document_statistics
+  return '' if @record.new_record? or dc_dont?(@form['form']['info'])
+  html =  %Q[<div id="dc-document-info">#{fa_icon('info-circle lg')}</div> <div id="dc-document-info-popup" class="div-hidden"> ]
+#
+  u = dc_document_user_for('created_by')
+  html << %Q[<div><span>#{t('drgcms.created_by', 'Created by')}: </span><span>#{u}</span></div>] if u
+  u = dc_document_user_for('updated_by')
+  html << %Q[<div><span>#{t('drgcms.updated_by', 'Updated by')}: </span><span>#{u}</span></div>] if u
+  html << %Q[<div><span>#{t('drgcms.created_at', 'Created at')}: </span><span>#{dc_format_value(@record.created_at)}</span></div>] if @record['created_at']
+  html << %Q[<div><span>#{t('drgcms.updated_at', 'Updated at')}: </span><span>#{dc_format_value(@record.updated_at)}</span></div>] if @record['updated_at']
+# copy to clipboard icon
+  parms = params.clone
+  parms[:controller] = 'dc_common'
+  parms[:action]     = 'copy_clipboard'
+  url = url_for(parms.permit!)
+  html << fa_icon('copy 2x', class: 'dc-link-img dc-link-ajax dc-animate', 
+                  'data-url' => url, 'data-request' => 'get', title: t('drgcms.doc_copy_clipboard') )
+  (html << '</div></div>').html_safe
+end
+
+private
+
+############################################################################
+# Creates top or bottom horizontal line on form.
+#
+# @param [String] location (top or bottom)
+# @param [Object] options yaml field definition
+#
+# @return [String] html code for drawing a line
+############################################################################
+def dc_top_bottom_line(location, options)
+  if options["#{location}-line"] || options['line'].to_s == location.to_s
+    '<div class="dc-separator"></div>'
+  else
+    ''
+  end
+end
+
+
+end