% unless ( $opt{'js_only'} ) {
Block
>
Year
>
% }
<%init>
my( %opt ) = @_;
my $name = $opt{'element_name'} || $opt{'field'} || 'blocknum';
my $id = $opt{'id'} || 'blocknum';
my $curr_value = $opt{'curr_value'} || $opt{'value'};
my $onchange = $opt{'onchange'};
if ( $onchange ) {
$onchange =~ s/\(what\);/(this);/;
$onchange = 'onchange="'.$onchange.'"';
}
my $deploy_zone_block = $curr_value
? FS::deploy_zone_block->by_key($curr_value)
: FS::deploy_zone_block->new;
%init>