Boa tarde,
Como eu posso adaptar esse código para que evite duplicidade, com base em alguns critérios, por exemplo:
Na data de hoje, dei saída em 10 camisetas M, do estoque, e supondo que por algum motivo eu esqueça que já dei saída, e lance de novo, então, o que eu quero é que emita uma mensagem, dizendo que já existe nessa data, a saída, de tantas camisetas, até mesmo para que eu possa verificar, se de fato está duplicado a saída, ou se é uma nova saída, pois pode ocorrer. A ideia inicial, não é bloquear o lançamento, e sim apenas um aviso, para que o usuário possa verificar, se é duplicado ou não.
Ou seja, neste caso, os critérios, seriam: Data_Saida, Item_Saida e Qtd.
If DCount("Num_Processo", "Tbl_Lancamentos", "Num_Processoa =" & Me.Num_Processo & "") > 0 Then
Obrigado desde já.
Como eu posso adaptar esse código para que evite duplicidade, com base em alguns critérios, por exemplo:
Na data de hoje, dei saída em 10 camisetas M, do estoque, e supondo que por algum motivo eu esqueça que já dei saída, e lance de novo, então, o que eu quero é que emita uma mensagem, dizendo que já existe nessa data, a saída, de tantas camisetas, até mesmo para que eu possa verificar, se de fato está duplicado a saída, ou se é uma nova saída, pois pode ocorrer. A ideia inicial, não é bloquear o lançamento, e sim apenas um aviso, para que o usuário possa verificar, se é duplicado ou não.
Ou seja, neste caso, os critérios, seriam: Data_Saida, Item_Saida e Qtd.
If DCount("Num_Processo", "Tbl_Lancamentos", "Num_Processoa =" & Me.Num_Processo & "") > 0 Then
Obrigado desde já.