deletar registro entre tabela pai e filha antes do post

13/04/2021

0

boa tarde tenho o seginte programa sendo produzido
contendo o seguinte codigo no botao novo que faz com que gere numero sequencial ao clicar no botao novo
var new:integer;
begin

DM.Cadastro_OS.Active:=True;

try
DM.Cadastro_OS.Last;
if dm.Cadastro_OS[''''''''numero_os'''''''']<> null then
new := dm.Cadastro_OS[''''''''numero_os'''''''']
else
new:=0;
dm.Cadastro_OS.Insert;
dm.Cadastro_OS[''''''''numero_os'''''''']:=new+1;
finally

end;

dm.Cadastro_OSStatus_OS.Value := DBComboBox1.Items[0];
dm.Cadastro_OSData_Abertura_OS.Value := DateToStr(now);

DBMemo1.SetFocus;

end;
este codigo é o que faz com que o dbedit receba o numero sequencial
tenho um outro codigo para serviço onde eu chamo um form para incluir o serviço atraves do numero gerado sequenciamento a tabela inclusao_os_serviço estas duas tabelas sao pai e filha assim que eu incluo o serviço ele ja salva automaticamento dentro da tabela filha que é a inculsao_os_serviço por causa do index que criei na tabela pai quando clico no botao para gerar uma nova ordem de serviço a tabela fica no estado de inserção e quando este procedimento ocorre a tabela filha automaticamente quando vou incluir o serviço puxa o numero da ordem de serviço para vincular agora vem a duvida como faço para excluir o registro que ele gerou na inclusao do serviço vinculado com o numero da os quando clicar no botao sair pois estou tentando e não consigo alguem pode me ajudar
Socrates Foschera

Socrates Foschera

Responder

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

Aceitar