quinta-feira, 23 de setembro de 2010

Musica dedicada ao Tonicha (:))



O tonicha é o Maior

terça-feira, 21 de setembro de 2010

segunda-feira, 20 de setembro de 2010

O segredo do sucesso é a originalidade

Mais um sorteio de chávenas...

Testemunhas
Os vencedores foram Helder, Isabel, Licínio e Miguel

sexta-feira, 17 de setembro de 2010

segunda-feira, 13 de setembro de 2010

Os Regressos...

A Xana já voltou!

E a Isabel também...

...mais rejuvenescida, segundo o Miguel R----! :)

sexta-feira, 10 de setembro de 2010

Sorteio das chávenas nespresso...


Os vencedores foram o josé e o Rui, o script utilizado para sortear foi o seguinte

declare
type tt_varchar2 is table of varchar2(50) index by binary_integer;
Candidatos tt_varchar2;
L_sorteado Number;
-------------
procedure add_nome(I_nome varchar2, I_quantidade number)
is
begin
For i in 1..I_quantidade
loop
Candidatos(NVL(Candidatos.last,0)+1) := I_nome;
End loop;
end;
begin
add_nome('João ------', 4);
add_nome('José ------', 10);
add_nome('Miguel ------', 3);
add_nome('Orlando ----------', 1);
add_nome('Ricardo ------', 2);
add_nome('Rui ------', 5);

for i in 1..Candidatos.count
loop
dbms_output.put_line('('||i||')->'||Candidatos(i));
End Loop;
-------------------------------------------

SELECT reverse(to_char(to_number(to_char(systimestamp, 'FF6'))))
into L_sorteado
FROM dual;

dbms_output.put_line('milisegudos ->'||L_sorteado);

L_sorteado := mod(L_sorteado,Candidatos.count)+1 ;

dbms_output.put_line(' o sorteado foi o ('||L_sorteado||') ->'||Candidatos(L_sorteado));
End;

Novo mobiliário da empresa...


Para aumentar a produtividade...

Babysitter


Ver vídeo!

Que Estouro :)

quarta-feira, 1 de setembro de 2010