MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Compartilhe

    Antonio Aurélio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 25
    Registrado : 29/01/2014

    [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Antonio Aurélio em 17/10/2017, 19:45

    Senhores, boa tarde.

    Após muita pesquisa e não ter encontrado o que preciso, recorro a ajuda de vocês.
    Preciso que ao inserir item no meu pedido (subform detalhes do pedido), caso ele já tenha sido cadastrado NO MESMO PEDIDO, seja exibido a mensagem "Item Cadastrado", p. exemplo.
    Em um novo pedido, o item pode ser inserido.
    Espero ter conseguido explicar minha necessidade.
    Muito obrigado.
    Antonio Aurélio
    avatar
    thiagomcosta
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 308
    Registrado : 23/01/2017

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  thiagomcosta em 17/10/2017, 19:53

    Trabalha com formulários acoplados ou não?

    Antonio Aurélio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 25
    Registrado : 29/01/2014

    Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Antonio Aurélio em 17/10/2017, 20:09


    Obrigado pelo interesse em me ajudar.

    Trabalho com os formularios Clientes, Pedidos e Subform Pedidos por Clientes (de maneira bem similar ao bd exemplo do access).

    Abraços,
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 795
    Registrado : 01/03/2014

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Celso Roberto em 17/10/2017, 23:01

    Olá...
    Adapte a sua necessidade, Coloque no evento antes de atualizar no campo que voce seleciona o produto

    Código:
     On Error Resume Next
        Dim frm As Recordset

        Set frm = Me.RecordsetClone
        With frm
        .FindFirst "tblNomeDaSuaTabela.CodigoDoProduto =" & Me.NomeDoCampoDoSubFormulário& ""
            If Not .NoMatch Then
              MsgBox "Já existe um lançamento Com este Produto" & Chr(10) & "" & "Altere o Lançto !! ", vbExclamation + vbDefaultButton2, "ATENÇÂO"
              Cancel = True
              Me.NomeDoCampoDoFSubFormulário.Undo
             
            End If
        End With
        Set frm = Nothing


    Espero que ajude


    Abraços


    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

    Antonio Aurélio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 25
    Registrado : 29/01/2014

    Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Antonio Aurélio em 18/10/2017, 11:43

    Bom dia.

    Agradeço a atenção de vocês.
    O código funciona, porém, como já tenho outros pedidos abertos, se abro outro pedido e tento inserir um produto já existente em outro pedido recebo a mensagem de lançamento existente para o produto.

    O que preciso é que no mesmo pedido não seja possível vender o mesmo produto (basta alterar a quantidade), mas, num pedido novo os produtos possam ser inseridos normalmente para vendas posteriores.

    Agradeço e continuo contando com o apoio de voces.

    Muito obrigado.
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3557
    Registrado : 06/11/2009

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Assis em 18/10/2017, 12:20

    Bom dia

    É um formulário com um subformulário ligado ?

    No código que o Celso lhe passou o mesmo vai a tabela procurar se o produto que já esta registado, até aqui tudo bem, mas esse produto pode ser registado em vários documentos, portanto tem que ter mais uma condição.

    Tente aplicar este código, e tiver duvida poste

    Private Sub Ref_BeforeUpdate(Cancel As Integer)
    If Not IsNull(DLookup("[Ref]", "TbldetalheOrcamento", "[Ref] = '" & Me.Ref & "' And idligacao = " & Forms!frmOrcamento!idOrcamento & "")) Then
    MsgBox "Ref Já Registada neste Orçamento", vbInformation, "Aviso"
    Me.Undo
    End If
    End Sub



    .................................................................................
    *** Só sei que nada sei ***

    Antonio Aurélio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 25
    Registrado : 29/01/2014

    Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Antonio Aurélio em 18/10/2017, 12:49

    Bom dia.

    Obrigado pela ajuda.

    O meu formulário PEDIDOS tem um subformulário DETALHES DA VENDA.

    Adaptei o código e continuo recebendo a mensagem que o o item já existe no pedido.

    If Not IsNull(DLookup("[CódigoDoProduto]", "Detalhes_da_Venda", "[CódigoDoProduto] = '" & Me.CódigoDoProduto & "' And CódigoDoProduto = " & Forms![ Detalhes_da_Venda]!CódigoDoProduto & "")) Then
    MsgBox "Produto Já Registrado neste Pedido", vbInformation, "Aviso"
    Me.Undo
    End If

    O que percebo é que ele não está verificando os produtos inseridos no pedido atual (ou está pesquisando da tabela de Produtos ou da tabela Detalhes da Venda, retornando a mensagem de "Item já registrado" ignorando o número do Pedido atual).

    Continuo contando com a ajuda de vocês.
    Volto às minhas pesquisas, também.
    Obrigado.

    Antonio Aurélio

    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3557
    Registrado : 06/11/2009

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Assis em 18/10/2017, 13:04

    Antonio Aurélio

    Copie e cole para testar

    If Not IsNull(DLookup("[CódigoDoProduto]", "Detalhes_da_Venda", "[CódigoDoProduto] = " & Me.CódigoDoProduto & " And CódigoDoProduto = " & Forms![ Detalhes_da_Venda]!CódigoDoProduto & "")) Then
    MsgBox "Produto Já Registrado neste Pedido", vbInformation, "Aviso"
    Me.Undo
    End If


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3557
    Registrado : 06/11/2009

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Assis em 18/10/2017, 13:12

    E vai ter erro aqui

    And CódigoDoProduto = " & Forms![ Detalhes_da_Venda]!CódigoDoProduto & ""))


    Aqui são os campos ID de ligação do formulário com o subformulário.

    Veja bem a Mensagem nº 6

    If Not IsNull(DLookup("[Ref]", "TbldetalheOrcamento", "[Ref] = '" & Me.Ref & "' And idligacao = " & Forms!frmOrcamento!idOrcamento & "")) Then


    .................................................................................
    *** Só sei que nada sei ***

    Antonio Aurélio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 25
    Registrado : 29/01/2014

    Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Antonio Aurélio em 18/10/2017, 13:22

    Continuo recebendo a mensagem.

    O item A 100.345.353 está no Pedido nº 000.001 (encerrado e sem possibilidades de alteração);

    Estou abrindo o Pedido nº 000.002 e tento inserir o mesmo item para venda; aí recebo a mensagem de item registrado.

    Vou continuar tentando.

    Tentei fazer referência ao Pedidos, mas, não consegui obter sucesso.

    Abraços e obrigado novamente.
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3557
    Registrado : 06/11/2009

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Assis em 18/10/2017, 13:43

    António Aurélio

    Poste ai só:

    Tabela de vendas e a tabela de Detalhes_da_Venda, e o respetivo formulário aonde está a registar.

    Aguardo


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4116
    Registrado : 20/04/2011

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Silvio em 18/10/2017, 13:53

    Bom dia, se me permitem um simples pitaco...

    Algo parecido com isso, detalhe uso em um subformulário, em uma combobox, que passa o valor dela para uma caixa oculta( CodProdutoOculta).

    Private Sub cbocodprod_BeforeUpdate(Cancel As Integer)
    'aqui eu faço a verificação de duplicidade de artigos dentro do pedido.
    Dim frm As Recordset
       Set frm = Me.RecordsetClone
       With frm
       .FindFirst "CodProdutoOculta='" & Me.CboCodProd & "' And CodSubPed=" & Me.CodSubped & ""
           If Not .NoMatch Then
             If MsgBox("Deseja repetir esse artigo ?", vbYesNo + vbInformation + vbDefaultButton2, "Confirmação") = vbYes Then
           Else
              Cancel = True
              Me.CboCodProd.Undo
              End If
           End If
       End With
       Set frm = Nothing
    End Sub



    Detalhes...

    CodProdutoOculta= recebe o valor da combobox CboCodProd.
    CodSubPed= Chave primária do subformulário.

    Tem que alterar duas linhas apenas para cancelar a introdução de artigos repetidos.


    Bons estudos.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    Antonio Aurélio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 25
    Registrado : 29/01/2014

    Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Antonio Aurélio em 18/10/2017, 14:33

    Senhores,

    Estou tendo progresso.
    Fiz algumas adaptações conforme o Código que Sr. Sílvio postou.

    Dentro do subformulário detalhes da venda (modo folha de dados), recebo a mensagem que o produto existe no pedido e se desejo ou não re-incluí-lo.
    Ótimo.

    Quando abro o Formulário de Pedidos e tento incluir o mesmo item, não recebo a mensagem e o ítem é incluído.

    Onde estou pecando?

    Código alterado.
    'aqui eu faço a verificação de duplicidade de artigos dentro do pedido.
    Dim frm As Recordset
    Set frm = Me.RecordsetClone
    With frm
    .FindFirst "CodProdutoOculta=" & Me.CódigoDoProduto & " And CódigoDoPedido=" & Me.CódigoDoPedido & ""
    If Not .NoMatch Then
    If MsgBox("Deseja repetir esse artigo ?", vbYesNo + vbInformation + vbDefaultButton2, "Confirmação") = vbYes Then
    Else
    Cancel = True
    Me.CódigoDoProduto.Undo
    End If
    End If
    End With
    Set frm = Nothing

    Obrigado.
    avatar
    marceloarboit
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 147
    Registrado : 09/07/2015

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  marceloarboit em 18/10/2017, 14:36

    Porque você não posta a parte do BD que você precisa corrigir? Fica muito mais fácil pra quem for te ajudar.

    Antonio Aurélio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 25
    Registrado : 29/01/2014

    Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Antonio Aurélio em 18/10/2017, 14:45

    Ola Marcelo, bom dia.

    Agradeço seu retorno.

    Não postei parte do BD por não ter visto necessidades neste caso.

    Julguei até que minha dúvida poderia ser simples, mas, percebí que não é, principalmente para quem não tem tanta experiência como eu.

    Muito obrigado.

    Antonio Aurélio.
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 795
    Registrado : 01/03/2014

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Celso Roberto em 18/10/2017, 15:00

    Olá Bom dia a todos

    Testado e funcionando, verifica ai.

    Antonio, é importante a base de dados porque não sabemos como ela esta projetada.

    Mas testa ai, nã esque de corrigir os nomes dos campos para os seus

    Código:
    Dim frm As Recordset

        Set frm = Me.RecordsetClone
        With frm
        .FindFirst "CodProduto=" & Me.CboCodProduto & ""
            If Not .NoMatch Then
              MsgBox "Já existe um lançamento Com este Produto" & Chr(10) & "" & " Por favor,altere o Lançto !! ", vbExclamation + vbDefaultButton2, "ATENÇÂO"
              Cancel = True
              Me.CboCodProduto.Undo
              'Me.Bookmark = .Bookmark
            End If
           
        End With
        Set frm = Nothing

    Este tambem funciona

    Código:
    Dim frm As Recordset

        Set frm = Me.RecordsetClone
        With frm
        .FindFirst "CodProduto=" & Me.CboCodProduto & " And NumPedido=" & Me.txtNumPedido & ""
            If Not .NoMatch Then
              MsgBox "Já existe um lançamento Com este Produto" & Chr(10) & "" & " Por favor,altere o Lançto !! ", vbExclamation + vbDefaultButton2, "ATENÇÂO"
              Cancel = True
              Me.CboCodProduto.Undo
              'Me.Bookmark = .Bookmark
            End If
           
        End With
        Set frm = Nothing

    Aguardamos


    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

    Antonio Aurélio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 25
    Registrado : 29/01/2014

    Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Antonio Aurélio em 18/10/2017, 16:47

    Senhores, boa tarde.

    Muito obrigado pela valiosa colaboração.
    Os Códigos enviados pelo Sr Celso Roberto, após as adaptações necessárias, funcionaram.
    Obrigado a todos.

    Tópico resolvido.
    Muito obrigado.

    Antonio Aurélio
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 795
    Registrado : 01/03/2014

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Celso Roberto em 18/10/2017, 17:17

    Olá...

    Ficamos felizes por ter conseguido resolver

    O Fórum agradece o seu retorno

    Abraços


    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

    Carlos Cruz
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 26/02/2014

    Tentativa de melhor compreensão do código

    Mensagem  Carlos Cruz em 6/7/2018, 23:24

    Por favor Senhores, na mensagem 16 deste tópico o segundo código, dos campos citados, quais são do formulário – do subformulário, ou das tabelas?
    Conforme o próprio interessado comenta que Trabalha com os formularios Clientes, Pedidos e Subform Pedidos por Clientes (de maneira bem similar ao bd exemplo do access)

    Infelizmente o interessado não postou seu banco de dados.
    Eu não estou conseguindo implementar o código no meu banco de dados que tenho.
    Formulário com nr pedido e cliente
    Subformulário com produtos relacionado com nr pedido do formulário. Desde já agradeço.

    Dim frm As Recordset

    Set frm = Me.RecordsetClone
    With frm
    .FindFirst "CodProduto=" & Me.CboCodProduto & " And NumPedido=" & Me.txtNumPedido & ""
    If Not .NoMatch Then
    MsgBox "Já existe" & Chr(10) & "" & " Altere! ", vbExclamation + vbDefaultButton2, "ATENÇÂO"
    Cancel = True
    Me.CboCodProduto.Undo
    'Me.Bookmark = .Bookmark
    End If

    End With
    Set frm = Nothing
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 795
    Registrado : 01/03/2014

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Celso Roberto em 7/7/2018, 14:32

    Olá Carlos Cruz..

    Como eu disse na própria mensagem 16, é importante anexar a base de dados.
    Então vá ao tópico que você criou e anexe sua Base de dados com as tabelas, consultas e formulários envolvidos e com dados suficientes para que possamos tentar te ajudar.

    Abraços


    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

    Carlos Cruz
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 26/02/2014

    Segue banco de dados

    Mensagem  Carlos Cruz em 8/7/2018, 03:12

    Algumas informações necessárias do que eu preciso estão em vermelho no próprio formulário. Desde já agradeço a todos. Qualquer dúvida por favor contacte. Obrigado!
    Anexos
    CarlosCruz.zip
    bd
    Você não tem permissão para fazer download dos arquivos anexados.
    (44 Kb) Baixado 8 vez(es)
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 795
    Registrado : 01/03/2014

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Celso Roberto em 8/7/2018, 17:20

    Olá Carlos cruz

    Primeiro abra o editor do Visual Basic clique em ferramentas depois em referencias, vai abrir uma caixa conforme imagem abaixo e marque a referencia indicada

    [Você precisa estar registrado e conectado para ver esta imagem.]

    Em Segundo cole este código no evento antes de atualizar da caixa de combinação ProdutoTblProdutoPedido

    Código:
    Private Sub ProdutoTblProdutoPedido_BeforeUpdate(Cancel As Integer)
    Dim frm As Recordset

        Set frm = Me.RecordsetClone
        With frm
        .FindFirst "ProdutoTblProdutoPedido='" & Me.ProdutoTblProdutoPedido & "' And PedidoTblProdutoPedido=" & Me.PedidoTblProdutoPedido & ""
            If Not .NoMatch Then
               MsgBox "Já existe um lançamento Com este Produto" & Chr(10) & "" & " Por favor,altere o Lançto !! ", vbExclamation + vbDefaultButton2, "ATENÇÂO"
               Cancel = True
               Me.ProdutoTblProdutoPedido.Undo
               'Me.Bookmark = .Bookmark
            End If
            
        End With
        Set frm = Nothing
    End Sub

    Faça os teste e retorne

    Nota: Quando me referi ao seu tópico criado, eu me referi a este
    maximoaccess.com/t33760-nao-repetir-item-em-formulario-continuo-2

    Se tudo estiver ok, não esqueça de encerrar ele ou de continuidade por ele

    Abraços


    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

    Carlos Cruz
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 26/02/2014

    [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Carlos Cruz em 8/7/2018, 18:19

    Celso Roberto, perfeitamente, funcionou 100% como eu precisava. Muito obrigado. Se eu puder retribuir de alguma forma, por favor contacte! Neste forum continuarei buscando informações e quando eu puder contribuirei com informações. Obrigado a todos!
    Anexos
    ResolvidoCarlosCruz.zip
    Anexo banco de dados já com a solução
    Você não tem permissão para fazer download dos arquivos anexados.
    (44 Kb) Baixado 7 vez(es)
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 795
    Registrado : 01/03/2014

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Celso Roberto em 8/7/2018, 18:43

    Olá..

    Fico feliz por ter ajudado e
    Obrigado pelo retorno.

    Abraços



    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

    Carlos Cruz
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 26/02/2014

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Carlos Cruz em 12/7/2018, 21:50

    Olá Celso Roberto. Desculpe, mas por erro meu, tenho que retornar a pedir sua ajuda. Tentei consertar mas me falta conhecimento em códigos. Torço para que seja apenas uma linha do código para consertar o problema.
    No banco de dados resumido que eu postei anteriormente para você criar um código para não ocorrer venda de produto repetido no mesmo pedido, funcionou perfeitamente, isso porque na tabela que criei os campos eram:
        ProdutoTblProdutoPedido  com formato texto curto
        PedidoTblProdutoPedido    com formato número
    Agora ao adaptar ao meu banco de dados o código não funcionou, acho que o motivo é que infelizmente os campos tem formato diferente, ou seja, ambos são formato número!
        ProdutoTblProdutoPedido com formato número
        PedidoTblProdutoPedido   com formato número
    Acredito que apenas duas linhas do código que você criou deva ser alterado:

    Obs. Posto bd    CarlosCruzNovo    já com os campos envolvidos em formato número, é só mudar o código !!!

    Primeira alteração todos os campos envolvidos serão formato número, não sei se retiro aspas, coloco entre parênteses, retiro Me. ???

    .FindFirst "ProdutoTblProdutoPedido='" & Me.ProdutoTblProdutoPedido & "' And PedidoTblProdutoPedido=" & Me.PedidoTblProdutoPedido & ""

    Segunda alteração, na linha um pouco mais abaixo:

    Me.ProdutoTblProdutoPedido.Undo         ‘ também é formato número

    Desde já agradeço e peço desculpas por retornar no mesmo assunto.
    Abraço

    Novo Banco de Dados, é só mudar o código?
    Anexos
    CarlosCruzNovo.zip
    .
    Você não tem permissão para fazer download dos arquivos anexados.
    (50 Kb) Baixado 7 vez(es)
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 795
    Registrado : 01/03/2014

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Celso Roberto em 13/7/2018, 13:50

    Olá..

    Substitua linha do .FindFirst por esta

    .FindFirst "ProdutoTblProdutoPedido=" & Me.ProdutoTblProdutoPedido & " And PedidoTblProdutoPedido=" & Me.PedidoTblProdutoPedido & ""

    É só questão de aspas

    Aspas simples mais aspas duplas '" Me.Meucampo '" = campo texto
    Sómente aspas duplas " Me.MeuCampo "= campos númericos

    Abraços


    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

    Carlos Cruz
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 26/02/2014

    [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Carlos Cruz em 13/7/2018, 13:59

    Bingo !!! Agora sim funcionou perfeitamente Celso. Agradeço sua dedicação, paciência e rapidez para ajudar repassando seus conhecimentos aos usuários do fórum. Também agradeço ao fórum e todos seus usuários participantes!
    No que eu puder ajudar, contem comigo!
    Abraço a todos!
    Carlos
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 795
    Registrado : 01/03/2014

    Re: [Resolvido]Duplicidade de Itens no mesmo pedido (não permitir)

    Mensagem  Celso Roberto em 13/7/2018, 14:12

    Olá...

    Obrigado pelas palavras, esta é a finalidade do Fórum

    Abraços


    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

      Data/hora atual: 18/11/2018, 06:36