GARANTIR DESCONTO

Fórum Problemas com select count utilizando dbexpress #268582

15/02/2005

0

Apesar de ter postado está dúvida ontem, eo colega vinicius2k mais uma vez ter me dado uma alternativa para o problema, fiquei ainda com a dúvida na minha cabeça e gostaria de retira-la de forma definitiva.

Na verdade o que eu queria era fazer um select count antes da exclusão de dados, para verificar se o registro a ser excluido tem algum relacionamento com outra tabela, contudo não estou conseguindo capturar o código da tabela através do parâmetro.

Estou fazendo assim:

Dm.Qry_Verificar.Close;
Dm.Qry_Verificar.CommandText:=
´SELECT COUNT(*) AS ´TOTAL´ FROM ACESSO WHERE CHAVE_GERENCIAMENTO=:REGISTRO_GERENCIAMENTO´;
Dm.Qry_Verificar.ParamByName(´Registro_Gerenciamento´).AsInteger:=Dm.Qry_Verificar.ParamByName(´Registro_Gerenciamento´).AsInteger;
Dm.Qry_Verificar.Active:=True;
If Dm.Qry_Verificar.FieldByName(´TOTAL´).AsInteger0 Then
Begin
Dm.Qry_Verificar.Active:=False;
Application.MessageBox(´Não é possível excluir esse Grupo !!´+#13+´Existe(m) subgrupo(s) relacionado(s) a este grupo.´,´Atenção´,Mb_Ok+Mb_IconStop);
Exit;
End;
Dm.Qry_Verificar.Active:=False;

Desde já Agradeço a Atenção de Todos.


Lnunes

Lnunes

Responder

Posts

15/02/2005

Gandalf.nho

[b:f620251f4b][color=red:f620251f4b]Notificação de Infração às Regras de Conduta :[/color:f620251f4b][/b:f620251f4b]

Duplicidade
[url]http://forum.clubedelphi.net/viewtopic.php?p=185127[/url]

Para maiores esclarecimentos pode mandar-me uma [url=http://delphiforum.icft.com.br/forum/privmsg.php?mode=post&u=8378]Mensagem Particular[/url].


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar