Veja neste artigo como fazer com que numa sentença SQL podemos atribuir valores a um campo conforme o seu valor original.

Imaginemos a seguinte situação. Temos uma tabela chamada CONTAS que armazena as nossas contas (meio óbvio, não ?).  :-)) Nesta tabela temos os campos CODIGO, DESCRICAO, VALOR e STATUS. Neste último campo (STATUS) que é um CHAR(1) iremos armazenar a situação da conta que pode ter os seguintes valores: 'A' - Em Aberto 'Q' - Quitado 'C' - Cancelado Sendo que o valor default (definido no banco de dados) é 'A'. Sendo assim, queremos fazer uma consulta a esta tabela e que o campo STATUS seja retornado a situação real do registro e não apenas uma letra que eu deverei interpretar depois. Pensando em Delphi fica até fácil. No evento "OnGetText" do referido campo basta testar os valores determinados e passar o valor correto para a variável de retorno que tudo estará resolvido. Mas podemos fazer com que o próprio banco de dados faça este "serviço sujo" por nós. Veja só: SELECT CODIGO, DESCRICAO, VALOR,        CASE STATUS          WHEN 'A' THEN 'Em Aberta'          WHEN 'C' THEN 'Cancelada'          WHEN 'Q' THEN 'Quitada'        END AS SITUACAO FROM CONTAS O result-set gerado irá ter o campo "SITUACAO" com o valor alterado conforme o valor do campo "STATUS". Bem fácil, não é ?

Quebra-Linha

Colaborador..: Marcelo Torres
Categoria(s).: Firebird;
Versão.......: 1.00
Data.........: 07/03/2005 15:44:35
Visualizado..: 4690 vezes
Fonte........: Marcelo Torres