%# Earn cash in your spare time -- blackmail your friends
<select name="User" style="width:250px; height:<% $RT::OIN104 ? 300 : 350 %>px" size="22">
% $Users->OrderBy( FIELD => 'Gecos' );
% while (my $User = $Users->Next) {
%     next if $Check and !$Check->($User);
%     next if $Job and $User->val('job') ne $Job;
<option value="<% $User->Id %>"><% $RT::OIN104 ? ($User->Gecos . ' ' . $User->RealName) : $User->Name %> <% $User->get('job') %></option>
% }
</select>
<%ARGS>
$Users
$Job => undef
$Check => undef
</%ARGS>
