% if (($cp_adj ne '1') && ($section ne'adjudicacoes')) {

Pesquisa no Arquivo de Concursos Públicos:

<& /concursos/templates/selected_sectors.html,bgcolor=>"#ffffff" &>

título do anúncio, ou nome da entidade promotora:

dia:

<& /_shared/procs/utils/datemenu.m, prefix=>"cp", what=>'day', date=>$cp_date, selected=>$cp_day, empty_option=>1, select_none =>(!$cp_day) &>

mês:

<& /_shared/procs/utils/datemenu.m, prefix=>"cp", what=>'month', date=>$cp_date, selected=>$cp_month, empty_option=>1, select_none =>(!$cp_month) &>

ano:

<& /_shared/procs/utils/datemenu.m, prefix=>"cp", what=>'year', date=>$cp_date, selected=>$cp_year, start_year=>$start_year&>

nº diário:

nº anúncio:

%#================== adjudicações-off =============================================== % } else {

Estimado Cliente,

O serviço de Adjudicações, deixou de fazer parte do portfólio de produtos Guião SA.

Principais razões para esta decisão:
1- Muitas das entidades não nos fornecem os dados solicitados e a generalidade dos dados são fornecidos por telefone (nada fiável).
2- Será em breve criado um portal do Estado, onde todos os cidadãos poderão aceder a este tipo de informações, de forma livre.
3- Acima de tudo não podemos manter um serviço, que não tem a qualidade e rigor, que sempre habituamos os nossos Clientes e mercado.

A equipa Guião SA, agradece a vossa compreensão.

% } <%args> $cp_adj=>undef <%init> my %args = $m->top_args; my $section = ($cp_adj)? 'adjudicacoes':'arquivo'; my $start_year = ($cp_adj) ? 104:97; my $cp_day = $args{'cp_day'}; my $cp_month = $args{'cp_month'}; my $cp_year = $args{'cp_year'}; my $cp_date; my $diario = $args{'diario'}; my $anuncio = $args{'anuncio'}; my $cp_sector = $args{'cp_sector'}; my $cp_ssector = $args{'cp_ssector'}; if ($diario){ $cp_date = $m->comp("/_shared/procs/concursos/cp_getddate.m",diario=>$diario); } if (!$cp_date){ $cp_date = ($cp_day && $cp_month && $cp_year) ? $cp_year.'-'.$cp_month.'-'.$cp_day:undef; } my $cp_query = $m->top_args->{'cp_query'}; my $guest = $m->top_args->{guest}; my $guest_or_local = $m->comp("/_shared/procs/users/login/isguest.m"); if ($guest_or_local){ $cp_date = $m->comp("/_shared/procs/concursos/get_demodate.m"); $cp_date =~ m/(....)-(..)/; ($cp_year, $cp_month, $cp_day) = ($1,$2,undef); }