rt/webrt/Elements/SelectStatus

   1 %# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectStatus,v 1.1 2002-08-12 06:17:08 ivan Exp $
   2
   3 <SELECT NAME ="<%$Name%>">
   4 <OPTION VALUE="">-</OPTION>
   5 %foreach my $status (@status) {
   6 <OPTION VALUE="<%$status%>" <%($Default eq $status) && 'SELECTED'%>><%$status%></OPTION>
   7 % }
   8 </SELECT>
   9 <%ONCE>
  10 my $queue = new RT::Queue($session{'CurrentUser'});
  11 my @status = $queue->StatusArray();
  12 </%ONCE>
  13 <%ARGS>
  14 $Name => undef
  15 $Default => undef
  16
  17 </%ARGS>