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 Relacionamento para buscar produto pelo código de barras de um campo numérico

    Compartilhe

    lpdias
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 11/01/2016

    Resolvido Relacionamento para buscar produto pelo código de barras de um campo numérico

    Mensagem  lpdias em 16/10/2018, 17:54

    Boa tarde!

    Senhores, estou com dificuldades em relacionar minhas tabelas.

    Hoje tenho um sistema de estoque, onde o produto é inserido no sub, através de dois cliques no código do produto.

    chave primária --- CodProduto = numeraçao automatica

    Agora estou tentando adaptar que o mesmo sistema puxe o produto através de um códigos de barra no campo EAN, porém nao consigo relacionar o campo ean, com o produto da tabela produtos.

    Alguém poderia me ajudar.


    Abraço
    avatar
    Gleilsonblensh
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 02/07/2018

    Re: Resolvido Relacionamento para buscar produto pelo código de barras de um campo numérico

    Mensagem  Gleilsonblensh em 16/10/2018, 18:14

    ola, Ipdias veja se é isso que precisa:

    Dim Nomeform As String
    Dim Criterio As String

    Nomeform = "NOME DO FORMULARIO QUE DESEJA ABRIR"

    Criterio = "[Código]=" & Me![Código]
    DoCmd.Close
    DoCmd.OpenForm Nomeform, , , Criterio

    neste caso ai ele vai abrir o formulario buscando pelo "código" que é o numero automático que é gerado, dai voce substitui o nome código pelo nome do campo que gera a numeração automática.

    lpdias
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 11/01/2016

    Re: Resolvido Relacionamento para buscar produto pelo código de barras de um campo numérico

    Mensagem  lpdias em 16/10/2018, 18:20

    boa tarde Gleison!

    Teria alguma forma de fazer através de consultas?
    E no caso, eu preciso que a busca seja pelo código de barras que capturo pelo scanner. Ele nao é número automático.

    lpdias
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 11/01/2016

    Re: Resolvido Relacionamento para buscar produto pelo código de barras de um campo numérico

    Mensagem  lpdias em 16/10/2018, 19:47

    Gleinon, consegui de certa forma fazer o que ei precisava. no entanto tive que mudar a chave primaria da minha tabela produtos e com isso algumas coisas mudam, mas nao sei como arrumar.

    veja o exemplo que eu tenho no campo quantidade do meu subVendas.
    Ele faz a verificaçao do estoque e nao deixa passar a quantidade, mas agora nao sei como acertar para continuar fazendo.

    Private Sub qtdevenda_BeforeUpdate(Cancel As Integer)
    Dim varestoque As Integer
    varestoque = DLookup("[estoque]", "Csestoque", "[codigoproduto]= " & Me![Codigoproduto] & "")

    If qtdevenda.Value > varestoque Then
    MsgBox ("Estoque insuficiente. Estoque atual desse produto: " & varestoque & ""), vbInformation, "Estoque de insuficiente"
    DoCmd.CancelEvent
    End If

    End Sub



    agradeço

    lpdias
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 11/01/2016

    Re: Resolvido Relacionamento para buscar produto pelo código de barras de um campo numérico

    Mensagem  lpdias em 16/10/2018, 20:29

    Obrigado!

    A questao era apenas algumas renomeaçoes em consultas.

    avatar
    Gleilsonblensh
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 02/07/2018

    Re: Resolvido Relacionamento para buscar produto pelo código de barras de um campo numérico

    Mensagem  Gleilsonblensh em 16/10/2018, 20:36

    Deu certo? você conseguiu resolver o problema inicial?

      Data/hora atual: 15/11/2018, 04:43