MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


3 participantes

    Varios Critérios para AfterUpdate

    avatar
    Maurício Bruno
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 233
    Registrado : 25/05/2015

    Varios Critérios para AfterUpdate Empty Varios Critérios para AfterUpdate

    Mensagem  Maurício Bruno 30/5/2017, 18:48

    Boa Tarde!

    Estou com um problema para retornar uma data, pois o afterupdate apresenta um erro em tempo de execução '3464" tipo de dados incompatíveis na expressão de critérios.

    Já pesquisei em todos os lugares e não encontrei uma solução, e mexi no código abaixo de varias formas e não obtive resultado.

    Bom tenho um formulário que retorna a informação para mim da Data de Expedição de um determinado documento de um prestador de serviço, porém, a data.

    Os meus documentos são cadastrados em outra tabela "Tbl_Cadastro_de_Documento" pelo Tipo de Documento "ASO", Prestador de Serviço "ID Prestador" e o Status Ativado/Desativado, porém, usarei o Ativado "-1"

    Ou seja, o meu afterupdate retorna a data de Expedição da tabela baseando, ID Prestador, Tipo de Documento e Status.

    Código:
    Me.Data_de_Expedição10 = Nz(DLookup("[Data de Emissão]", "[Tbl_Cadastro_de_Documento]", "[ID Prestador]='" & Me.txt_n_doc & "' And [Documento] = '" & "ASO" & "' And [STATUS] = '" & "-1" & "'"), "")

    Gostaria de uma direção para entender onde o meu código esta incorreto.

    Desde já agradeço a atenção e ajuda.
    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1394
    Registrado : 07/12/2011

    Varios Critérios para AfterUpdate Empty Re: Varios Critérios para AfterUpdate

    Mensagem  tauron 31/5/2017, 02:19

    Fiquei confuso, se os dados são necessarios porque esta usando no "nz" antes da expressao?
    philipp.moreira
    philipp.moreira
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 05/02/2016

    Varios Critérios para AfterUpdate Empty Re: Varios Critérios para AfterUpdate

    Mensagem  philipp.moreira 31/5/2017, 02:35

    Boa noite!
    Id prestador deve ser um campo numérico e status booleano, eu presumo. Por que coloca-los no critério como texto?

    Será que assim da certo?

    Código:

    Me.Data_de_Expedição10 = Nz(DLookup("[Data de Emissão]", "[Tbl_Cadastro_de_Documento]", "[ID Prestador]=" & Me.txt_n_doc & " And [Documento] = '" & "ASO" & "' And [STATUS] = " & 1 & ""), "")





    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1394
    Registrado : 07/12/2011

    Varios Critérios para AfterUpdate Empty Re: Varios Critérios para AfterUpdate

    Mensagem  tauron 31/5/2017, 02:58

    ja tentou esse codigo sem o "nz" antes do dlookup?
    avatar
    Maurício Bruno
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 233
    Registrado : 25/05/2015

    Varios Critérios para AfterUpdate Empty Varios Critérios para AfterUpdate

    Mensagem  Maurício Bruno 31/5/2017, 18:51

    philipp.moreira / tauron,

    Primeiramente agradeço pela atenção, porém, tentei as duas maneiras que vcs me passarão e não funcionou.

    philipp.moreira
    philipp.moreira
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 05/02/2016

    Varios Critérios para AfterUpdate Empty Re: Varios Critérios para AfterUpdate

    Mensagem  philipp.moreira 31/5/2017, 18:53

    Posta seu BD, assim, podemos analisar e fazer uma sugestão melhor a você! ;)
    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1394
    Registrado : 07/12/2011

    Varios Critérios para AfterUpdate Empty Re: Varios Critérios para AfterUpdate

    Mensagem  tauron 31/5/2017, 22:28

    Ao cadastrar um prestador, a Id, status sao armazenados na tabelaA e os documentos na tabelaB como se fosse uma tabela auxiliar eh isso?

    Poste seu bd assim poderemos ver sua estrutura e sermos mais objetivos ao invez de "chutarmos" solucoes.

    Conteúdo patrocinado


    Varios Critérios para AfterUpdate Empty Re: Varios Critérios para AfterUpdate

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 06:08