templates/webpages/generic/multibox.html

   1 [%- USE HTML %]
   2 [%#-
   3      Multibox
   4
   5   This template makes an input box for you,
   6   decides wether it should be a text field or a drop down box,
   7   generates the HTML code, and fixes everything just right.
   8
   9   call:  INCLUDE generic/multibox.html var = var, var2 = ....
  10
  11   options and variables:
  12     name          : name of the select/textfield
  13     id            : id of the select/textfield, optional, defaults to name
  14     default       : entered/selected value. defaults to a dereference of name, since it is usually set to that for update mechanisms
  15     id_key        : key that holds the id in each row.
  16     id_sub        : name of a perl sub that calculates the id for each row. will be called with a hashref.
  17     label_key     : key that holds the label in each row.
  18     label_sub     : name of a perl sub that calculates the label for each row. will be called with a hashref.
  19     DATA          : the actual data, expected to be arrayref of hashrefs, usually what's returned by the all_vc routines.
  20     show_empty    : show an empty first line in select boxes. defaults to false
  21     style         : additional style information
  22     onChange      : java magic on change
  23     select        : java function call for a selection popup or other magic
  24     allow_textbox : allow to display a textbox instead of a drop down box if there are more entries than 'limit' entries.
  25     limit         : defines the limit of entries, after which a textbox is generated. defaults to vclimit, or, failing to find that, 200.
  26 -%]
  27 [%- DEFAULT
  28   limit      = limit   != '' ? limit   : vclimit != '' ? vclimit : 200
  29   id         = id      != '' ? id      : name
  30   default    = default != '' ? default : $name
  31 -%]
  32 [%- FOREACH row = DATA %]
  33   [%-
  34        row.id       = row.$id_key     != ''  ? row.$id_key    : $id_sub(row)
  35        row.label    = row.$label_key  != ''  ? row.$label_key
  36                     : $label_sub(row) != ''  ? $label_sub(row)
  37                     :                          row.id
  38        row.selected = default == row.id
  39   -%]
  40 [%- END -%]
  41 [%- IF allow_textbox and DATA.size and limit < DATA.size %]
  42 <input type="text"
  43  [%- IF name     %] name="[%     HTML.escape(name)     %]"[% END %]
  44  [%- IF id       %] id="[%       HTML.escape(id)       %]"[% END %]
  45  [%- IF default  %] value="[%    HTML.escape(default)  %]"[% END %]
  46  [%- IF style    %] style="[%    HTML.escape(style)    %]"[% END %]
  47 >
  48 [%- IF select %]
  49   <input type="button" onclick="[% select %]" value="?">
  50 [% END %]
  51 [%- ELSE %]
  52 <select
  53  [%- IF name     %] name="[%     HTML.escape(name)     %]"[% END %]
  54  [%- IF id       %] id="[%       HTML.escape(id)       %]"[% END %]
  55  [%- IF style    %] style="[%    HTML.escape(style)    %]"[% END %]
  56  [%- IF onChange %] onChange="[% HTML.escape(onChange) %]"[% END %]
  57 >
  58   [%- IF show_empty %]
  59   <option value=""></option>
  60   [%- END %]
  61   [%- FOREACH row = DATA %]
  62   <option value="[% row.id %]"[% IF row.selected %] selected[% END %]>[% HTML.escape(row.label) %]</option>
  63   [%- END %]
  64 </select>
  65 [%- END %]