httemplate/elements/deploy_zone_block.html

   1 % unless ( $opt{'js_only'} ) {
   2
   3   <INPUT TYPE="hidden" NAME="<%$name%>" ID="<%$id%>" VALUE="<% $curr_value %>">
   4   Block
   5   <INPUT TYPE  = "text"
   6          NAME  = "<%$name%>_censusblock"
   7          ID    = "<%$id%>_censusblock"
   8          VALUE = "<% scalar($cgi->param($name.'_censusblock'))
   9                       || $deploy_zone_block->censusblock
  10                  %>"
  11          SIZE  = 17
  12          MAXLENGTH = 15
  13          <% $onchange %>
  14   >
  15   &nbsp;
  16   Year
  17   <INPUT TYPE  = "text"
  18          NAME  = "<%$name%>_censusyear"
  19          ID    = "<%$id%>_censusyear"
  20          VALUE = "<% scalar($cgi->param($name.'_censusyear'))
  21                       || $deploy_zone_block->censusyear
  22                   %>"
  23          SIZE  = 5
  24          MAXLENGTH = 4
  25          <% $onchange %>
  26   >
  27 % }
  28 <%init>
  29
  30 my( %opt ) = @_;
  31
  32 my $name = $opt{'element_name'} || $opt{'field'} || 'blocknum';
  33 my $id = $opt{'id'} || 'blocknum';
  34
  35 my $curr_value = $opt{'curr_value'} || $opt{'value'};
  36
  37 my $onchange = $opt{'onchange'};
  38 if ( $onchange ) {
  39   $onchange =~ s/\(what\);/(this);/;
  40   $onchange = 'onchange="'.$onchange.'"';
  41 }
  42
  43 my $deploy_zone_block = $curr_value
  44   ? FS::deploy_zone_block->by_key($curr_value)
  45   : FS::deploy_zone_block->new;
  46
  47 </%init>