Contenido Project

Line #	Revision	Author
1	8	ahitrov@rambler.ru	<& '/contenido/components/select.msn', name => $name.'_day', values => \@days, check => $day &>
2			<& '/contenido/components/select.msn', name => $name.'_month', values => \@months, check => $month &>
3			<& '/contenido/components/select.msn', name => $name.'_year', values => \@years, check => $year &>
4
5			<& '/contenido/components/select.msn', name => $name.'_hour', values => \@hours, check => $hour &>
6			<& '/contenido/components/select.msn', name => $name.'_minute', values => \@minutes, check => $minute &>
7	59	ahitrov@rambler.ru	% if ( $prop->{noseconds} ) {
8			<input type="hidden" name="<% $prop->{attr} %>_second" value="0">
9			% } else {
10	8	ahitrov@rambler.ru	<& '/contenido/components/select.msn', name => $name.'_second', values => \@seconds, check => $second &>
11	59	ahitrov@rambler.ru	% }
12			<span style="padding-left:20px;"><a href="javascript:void(0)" onclick="set_<% $prop->{attr} %>_now()" style="color:red;">Сейчас!</a></span>
13			<script type="text/javascript">
14			<!--
15			function set_<% $prop->{attr} %>_now () {
16			document.forms['form'].elements['<% $prop->{attr} %>_day'].value = '<% $now->day %>';
17			document.forms['form'].elements['<% $prop->{attr} %>_month'].value = '<% $now->mon %>';
18			document.forms['form'].elements['<% $prop->{attr} %>_year'].value = '<% $now->year %>';
19			document.forms['form'].elements['<% $prop->{attr} %>_hour'].value = '<% $now->hour %>';
20			document.forms['form'].elements['<% $prop->{attr} %>_minute'].value = '<% $now->minute %>';
21			% unless ( $prop->{noseconds} ) {
22			document.forms['form'].elements['<% $prop->{attr} %>_second'].value = '<% $now->second %>';
23			% }
24			}
25			//-->
26			</script>
27	8	ahitrov@rambler.ru	<%args>
28			$prop
29			$name => undef
30			$check => undef
31			</%args>
32
33			<%init>
34
35			my @localtime = localtime(); $localtime[4]++; $localtime[5] += 1900;
36
37			# Формируем данные для select'а...
38			my @days = map { $_ => $_ } (1..31);
39			my @months = @{ $m->comp('/contenido/components/get_months.msn') };
40			my @years = map { $_ => $_ } ( $localtime[5] - 5 .. $localtime[5] + 5);
41			my @hours = map { $_ => sprintf('%02d', $_) } (0 .. 23);
42	59	ahitrov@rambler.ru	my @minutes = map { $_ => sprintf('%02d', $_) } (0 .. 59);
43			my @seconds;
44			if ( exists $prop->{seconds_step} && $prop->{seconds_step} > 1 ) {
45			@seconds = grep { ($_ % $prop->{seconds_step}) == 0 } map { $_ => sprintf('%02d', $_) } (0 .. 59);
46			} else {
47			@seconds = map { $_ => sprintf('%02d', $_) } (0 .. 59);
48			}
49	8	ahitrov@rambler.ru
50			if ($prop->{allow_null}) {
51			unshift @days, '', '';
52			unshift @months, '', '';
53			unshift @years, '', '';
54			unshift @hours, '', '';
55			unshift @minutes, '', '';
56			unshift @seconds, '', '';
57			}
58
59			my ($year,$month,$day,$hour,$minute, $second);
60			if ($check) {
61			$check =~ /(\d{4})-(\d{1,2})-(\d{1,2})\s+(\d{1,2}):(\d{1,2}):(\d{1,2})/;
62			($year, $month, $day, $hour, $minute, $second) = ($1 + 0, $2 + 0, $3 + 0, $4 + 0, $5 + 0, $6 + 0);
63			} elsif(!$prop->{allow_null}) {
64			($second,$minute,$hour,$day,$month,$year) = @localtime[0 .. 5];
65			}
66	59	ahitrov@rambler.ru	my $now = Contenido::DateTime->new;
67
68	8	ahitrov@rambler.ru	</%init>

Repository List / Contenido / utf8 / core / comps / contenido / components / inputs / datetime.msn @ r59

Небольшая справка по веткам