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]Histórico de compra de cliente

    marcelo marques
    marcelo marques
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 695
    Registrado : 12/04/2016

    [Resolvido]Histórico de compra de cliente Empty [Resolvido]Histórico de compra de cliente

    Mensagem  marcelo marques em 13/9/2019, 15:46

    Boa tarde pessoal estou tentando criar um formulário de histórico de compra de cliente no qual já fiz alguma coisa é gostaria de saber como buscar em uma consulta a soma de parcelas em atraso através do "dsum" também teria que ver o total em aberto alguém tem outra forma melhor e mais informativa de histórico de compra de cliente? Aceito sugestões desde já obrigado


    Veja o anexo abaixo
    Anexos
    [Resolvido]Histórico de compra de cliente Attachmenthistorico cliente.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (75 Kb) Baixado 23 vez(es)
    Celso Roberto
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    [Resolvido]Histórico de compra de cliente Empty Re: [Resolvido]Histórico de compra de cliente

    Mensagem  Celso Roberto em 14/9/2019, 05:21

    Ola..

    Código:
    Public Sub somaValores()

    On Error Resume Next
    Me.txtTempo_de_cliente = DLookup("CLI_DATA_CADASTRO", "tbl_cliente", "txt_cliente='" & CboPesquisa_Historico & "'")
    Me.txtvencidas = Nz(DSum("valor_parcela", "cs_historico_do_cliente", "dt_vencimento < date() And IsNull(Dt_Pgto)"), 0)
    Me.txtpagar = Nz(DSum("valor_parcela", "cs_historico_do_cliente"), 0)
    Me.txtpago = Nz(DSum("valor_pago", "cs_historico_do_cliente"), 0)

    Me.UltimaCompra = DLast("[txttotalvenda]", "tbl_Vendas", "[Cliente] = " & Me.CboPesquisa_Historico.Column(0) & "")

    Me.dtUltimaCompra = DMax("[datavenda]", "cs_historico_do_cliente", "[txt_cliente] = '" & Me.CboPesquisa_Historico & "'")

    Me.txtem_aberto = Nz(DSum("valor_parcela", "cs_historico_do_cliente", "IsNull(Dt_Pgto)"), 0)

    End Sub

    Faça testes e retone

    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.....
    marcelo marques
    marcelo marques
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 695
    Registrado : 12/04/2016

    [Resolvido]Histórico de compra de cliente Empty Re: [Resolvido]Histórico de compra de cliente

    Mensagem  marcelo marques em 14/9/2019, 23:58

    Boa noite Celso muito obrigado pela força esta dando erro no código última compra no dlast Erro 3075 já tentei mais sem sucesso


    O caminho de histórico de compra é por esse rumo mesmo ou devo tirar algo ou acrescentar

    Tira uma dúvida quando devo usar o nome entre parentes porque eu não uso também não sou muito bom estes códigos

    Me.UltimaCompra = DLast("[txttotalvenda]", "tbl_Vendas", "[Cliente] = " & Me.CboPesquisa_Historico.Column(0) & "")
    Celso Roberto
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    [Resolvido]Histórico de compra de cliente Empty Re: [Resolvido]Histórico de compra de cliente

    Mensagem  Celso Roberto em 15/9/2019, 04:15

    Olá...

    Para corrigir este erro, elimine o procedimento que esta no evento atual do formulario.
    ele ocorre porque a combobox esta vazia e a linha do Dlast precisa de um cliente selecionado na combo para ele fazer a verificação

    e também porque voce já esta chamando o Public Sub somaValores() no evento antes e após atualizar a combobox


    Aguardo

    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.....
    marcelo marques
    marcelo marques
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 695
    Registrado : 12/04/2016

    [Resolvido]Histórico de compra de cliente Empty Re: [Resolvido]Histórico de compra de cliente

    Mensagem  marcelo marques em 15/9/2019, 15:23

    Bom dia Celso era exatamente isso fiz umas mudanças na caixa de listagem ficou muito bom obrigado mais uma vez
    Celso Roberto
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    [Resolvido]Histórico de compra de cliente Empty Re: [Resolvido]Histórico de compra de cliente

    Mensagem  Celso Roberto em 17/9/2019, 02:58

    Olá..

    Fico feliz por ter ajudado

    O Fórum agradece o seu retorno

    Abraços e sucesso


    .................................................................................
    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.....

    Conteúdo patrocinado

    [Resolvido]Histórico de compra de cliente Empty Re: [Resolvido]Histórico de compra de cliente

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/12/2019, 02:32