<& /elements/header.html, mt('Contact Report') &>

<& /elements/tr-select-agent.html, 'curr_value' => scalar( $cgi->param('agentnum') ), 'label' => emt('Contacts for agent: '), 'disable_empty' => 0, &> <& /elements/tr-select.html, 'label' => 'Contact source', 'field' => 'contact_source', 'options' => [ 'prospect_main', 'cust_main', '' ], 'labels' => { 'prospect_main' => 'Prospect contacts', 'cust_main' => 'Customer contacts', '' => 'All contacts', }, 'curr_value' => scalar( $cgi->param('contact_source') ), &> % if ( FS::contact_class->count( 'disabled IS NULL' ) > 0 ) { <& /elements/tr-checkboxes.html, label => 'Contact Type', names_list => [ [ 'null' => { label => 'None' } ], map {[ $_->classnum => { label => $_->classname } ]} qsearch( contact_class => { disabled => { op => '!=', value => 'Y' } }) ], element_name_prefix => 'contact_classnum_', &> % }
<& /elements/footer.html &> <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('List contacts'); use FS::contact_class;