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


2 participantes

    [Resolvido]Histórico de Vendas

    santanadsumus
    santanadsumus
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 19/12/2016

    [Resolvido]Histórico de Vendas Empty [Resolvido]Histórico de Vendas

    Mensagem  santanadsumus 4/3/2017, 03:16

    Caros amigos, estou precisando da ajuda de vcs, é o seguinte, Tenho um formulário de vendas onde eu gostaria que ao clicar numa nova venda ao preencher o campo nome do cliente ele me retornasse o histórico de vendas desse cliente numa listview com os seguintes dados: código da venda, data da venda e valor da venda, tmb gostaria de acessar as vendas realizadas pelo cliente clicando nessa listview, desde já agradeço a tds que poderem me ajudar.
    elpauli
    elpauli
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 10/08/2016

    [Resolvido]Histórico de Vendas Empty Carregar vendas ao Cliente

    Mensagem  elpauli 4/3/2017, 07:07

    Santana.

    Acredito que não precisa colocar ao informar o Cliente, mas coloque um Botão ou Imagem para que o usuário Visualize as vendas se desejado.

    Neste Botão/Imagem no Evento Click coloque a função abaixo:

    SqlGlobal="SELECT TDF_OS.OS_NUM, TDF_OS.OS_DATA, TDF_OS.OS_PLACA, TDF_OS.OS_TOTAL
    FROM TDF_OS
    WHERE (((TDF_OS.OS_CLI)=" & lngCliente & ") AND ((TDF_OS.OS_DATA)>Date()-60));"

    Mude o Nome da Tabela e Campos para a sua realidade.
    Neste Sql vai carregar as vendas dos últimos 60 dias. Altere como desejar.

    Criar um Formulário e coloque uma Caixa de Listagem com nome de LstVendas.

    No Evento Load deste formulário coloque o Seguinte:
    Me.LstVendas.RowSource = SqlGlobal

    SqlGlobal deve ser uma Variável global.


    No Evento DblClick da lista coloque o Seguinte:

    DoCmd.OpenForm "SeuFormVendas", acNormal, , "[ID_PEDIDO]=" & Me.LstVendas.Value, acFormEdit

    Pronto.

    Sucesso.

    Elcio Pauli
    santanadsumus
    santanadsumus
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 19/12/2016

    [Resolvido]Histórico de Vendas Empty Re: [Resolvido]Histórico de Vendas

    Mensagem  santanadsumus 9/3/2017, 01:54

    Caro colega, agradeço pela colaboração mais não consegui, eu fiz um formulário de pesquisa de vendas com filtro por nome onde aparece todas as vendas e ao digitar o cliente aparece tds as vendas desse cliente na listview e após clicar nessa listview é aberto o formulário de vendas na venda correspondente.

    Conteúdo patrocinado


    [Resolvido]Histórico de Vendas Empty Re: [Resolvido]Histórico de Vendas

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 10:03