httemplate/misc/cust_bill-promised_date.html

   1 <& /elements/header-popup.html, 'Edit promised date' &>
   2 <FORM method="POST" action="process/cust_bill-promised_date.html">
   3 <B><% emt('Invoice #[_1]', $invnum) %></B><BR>
   4 <% ntable('cccccc',2) %>
   5 <INPUT TYPE="hidden" NAME="invnum" VALUE="<%$invnum%>">
   6 <& /elements/tr-input-date-field.html,
   7   'promised_date',
   8   $cust_bill->promised_date,
   9   emt('Promised date'),
  10 &>
  11 </TABLE>
  12 <INPUT TYPE="submit" NAME="submit" VALUE="<% emt('Set date') %>">
  13 </FORM>
  14 <& /elements/footer.html &>
  15 <%init>
  16 my ($invnum) = $cgi->keywords;
  17 $invnum =~ /^\d+$/ or die "Illegal invnum";
  18 my $cust_bill = qsearchs('cust_bill', { invnum => $invnum });
  19 </%init>