httemplate/elements/tr-input-date-field.html

   1
   2 <LINK REL="stylesheet" TYPE="text/css" HREF="<%$fsurl%>elements/calendar-win2k-2.css" TITLE="win2k-2">
   3 <SCRIPT TYPE="text/javascript" SRC="<%$fsurl%>elements/calendar_stripped.js"></SCRIPT>
   4 <SCRIPT TYPE="text/javascript" SRC="<%$fsurl%>elements/calendar-en.js"></SCRIPT>
   5 <SCRIPT TYPE="text/javascript" SRC="<%$fsurl%>elements/calendar-setup.js"></SCRIPT>
   6
   7 <TR>
   8   <TD ALIGN="right"><% $label %></TD>
   9   <TD>
  10     <INPUT TYPE="text" NAME="<% $name %>" ID="<% $name %>_text" VALUE="<% $value %>">
  11     <IMG SRC="<%$fsurl%>images/calendar.png" ID="<% $name  %>_button" STYLE="cursor: pointer" TITLE="Select date">
  12   </TD>
  13 </TR>
  14
  15 <SCRIPT TYPE="text/javascript">
  16   Calendar.setup({
  17     inputField: "<% $name %>_text",
  18     ifFormat:   "<% $format %>",
  19     button:     "<% $name %>_button",
  20     align:      "BR"
  21   });
  22 </SCRIPT>
  23
  24
  25 <%init>
  26 my($name, $value, $label, $format, $usedatetime) = @_;
  27
  28 $format = "%m/%d/%Y" unless $format;
  29 $label = $name unless $label;
  30
  31 if ($usedatetime) {
  32   my $dt = DateTime->from_epoch(epoch => $value, time_zone => 'floating');
  33   $value = $dt->strftime($format)
  34     unless $value eq '';
  35 }else{
  36   $value = time2str($format, $value);
  37 }
  38
  39 </%init>
  40