% if (!$anuncio){
% 	if ($cp_search){
			<& /_shared/procs/concursos/cp_showset.m, section=>$section, onlyone=>0, maxhits=>10, cp_nrec=>$cp_nrec, cp_date=>$cp_date, cp_query=>$cp_query, subset=>1, user=>$user, cp_adj=>$cp_adj &>
% 	}else{
		<& form.html, cp_adj=>$cp_adj &>
% 	}	
% }

<%ARGS>
$cp_search=> undef
$cp_day=> undef
$cp_month=> undef
$cp_year=> undef
$diario => undef
$anuncio => undef
$cp_nrec=>undef
$cp_query=>undef
$user=>undef
$cp_adj=>undef
</%ARGS>


<%init>
my $section= ($cp_adj) ?  'adjudicacoes' : 'arquivo';

my $cp_date;
if ($anuncio){
	$m->comp("/concursos/anuncios/anuncio.html", cod_anuncio=>$anuncio, cp_adj=>$cp_adj);
}else{
	if ($diario){
		$cp_date = $m->comp("/_shared/procs/concursos/cp_getddate.m",diario=>$diario, cp_adj=>$cp_adj);
	}
	$cp_date = $m->comp("/_shared/procs/concursos/cp_getdatefromargs.m") unless $cp_date;
}
</%init>