diff options
| author | ivan <ivan> | 2006-05-07 20:27:21 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2006-05-07 20:27:21 +0000 |
| commit | e65c6a26ca778166aec2b2d1dd3012ab84fa611a (patch) | |
| tree | 1ef2a5a21088301217a8b4f1440fedd6b7b1a274 /httemplate/elements/select-month_year.html | |
| parent | 29644d5921c99520965b884b25800ed084891e94 (diff) | |
first pass at sales reports per agent and package class
Diffstat (limited to 'httemplate/elements/select-month_year.html')
| -rw-r--r-- | httemplate/elements/select-month_year.html | 19 |
1 files changed, 14 insertions, 5 deletions
diff --git a/httemplate/elements/select-month_year.html b/httemplate/elements/select-month_year.html index a0ea74ddd..2866960bd 100644 --- a/httemplate/elements/select-month_year.html +++ b/httemplate/elements/select-month_year.html @@ -5,13 +5,22 @@ my $prefix = $opt{'prefix'} || ''; my $disabled = $opt{'disabled'} || ''; my $empty = $opt{'empty_option'} || ''; + my $start_year = $opt{'start_year'}; + my $end_year = $opt{'end_year'} || '2037'; + + my @mon; + if ( $opt{'show_month_abbr'} ) { + @mon = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec); + } else { + @mon = ( 1 .. 12 ); + } + my $date = $opt{'selected_date'} || ''; $date = '' if $date eq '-'; #$date ||= '01-2000' unless $empty; - my $start_year = $opt{'start_year'}; - my $end_year = $opt{'end_year'} || '2037'; - my( $mon, $year ) = (0, 0); + my $mon = $opt{'selected_mon'} || 0; + my $year = $opt{'selected_year'} || 0; if ( $date ) { if ( $date =~ /^(\d{4})-(\d{1,2})-\d{1,2}$/ ) { #PostgreSQL date format ( $mon, $year ) = ( $2, $1 ); @@ -34,8 +43,8 @@ <%= $empty ? '<OPTION VALUE="">' : '' %> -<% for ( 1 .. 12 ) { %> - <OPTION<%= $_ == $mon ? ' SELECTED' : '' %> VALUE="<%= $_ %>"><%= $_ %> +<% foreach ( 1 .. 12 ) { %> + <OPTION<%= $_ == $mon ? ' SELECTED' : '' %> VALUE="<%= $_ %>"><%= $mon[$_-1] %> <% } %> </SELECT>/<SELECT NAME="<%= $prefix %>_year" SIZE="1" <%= $disabled%>> |