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

    Acessar Parcela a Receber selecionada em um form de pesquisa para outro form

    Compartilhe

    Edijovem
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 18/08/2016

    Acessar Parcela a Receber selecionada em um form de pesquisa para outro form

    Mensagem  Edijovem em Seg 08 Jan 2018, 11:22

    Olá Pessoal, bom dia!
    Estou trabalhando em um sistema de vendas na qual preciso acessar uma determinada parcela do contas a receber e fazer a impressão desta parcela paga.

    Então tenho a minha tabela de vendas com os campos:

    Codigo    Numero Pk
    Data       Date
    Status     Texto
    Cliente    Numero FK
    Valor       moeda


    Tabela Itens_Venda

    CodigoVenda      numero FK
    Sequencia          numero Pk
    Item                  numero FK
    Valor                 moeda
    Qtde                  numero
    Total                  moeda

    Contas_receber
    CodigoVenda      numero FK
    sequencia          numero  pk
    Parcela              numero
    Valor_Parcela     moeda
    Vencimento        data
    Data_Pgto           data


    Pessoal, eu fiz uma consulta com a tabela de vendas juntando com a tabela de Contas a Receber, criei um form de pesquisa, na qual eu filtro pelo nome do cliente todas as parcelas deste, ao clicar na caixa de listagem em uma determinada parcela, o form de pesquisa fecha e abre um outro form na qual setei os dados para esta consulta de Vendas e Contas a Receber, onde pretendo trazer a parcela selecionada, mas não está me trazendo a parcela selecionada para fazer a baixa na mesma.

    Por favor alguém pode me dar uma ajuda neste problema?

    Estou usando o código abaixo no evento click da caixa de listagem do form de pesquisa, que deveria abrir outro form com a parcela selecionada:

    Dim StrCriterio
    Dim StrItem

    StrCriterio = "[Vendas.Código]=" & Me.Lista.Column(0)
    StrItem = "[Contas_Receber.Sequencia]=" & Me.Lista.Column(1)
    DoCmd.OpenForm "fm_Recebimento_Parcelas", , , StrCriterio
    DoCmd.OpenForm "fm_Recebimento_Parcelas", , , StrItem

    DoCmd.Close acForm, "fm_Pesquisa_Recebimento"
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    Re: Acessar Parcela a Receber selecionada em um form de pesquisa para outro form

    Mensagem  tauron em Seg 08 Jan 2018, 11:41

    Transfira seu codigo para o evento "apos atualizar" da caixa de listagem, ou para o evento ao clicar de um botao.

    Edijovem
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 18/08/2016

    Re: Acessar Parcela a Receber selecionada em um form de pesquisa para outro form

    Mensagem  Edijovem em Seg 08 Jan 2018, 11:47

    Tirei o código do evento click da caixa de listagem e inseri em botão.
    Fechou o form de pesquisa, abriu o form de dar baixa, mas não me trouxe a parcela seleciona.

    Me apresentou ERRO EM TEMPO DE EXECUÇÃO "2501"
    A AÇÃO OPENFORM FOI CANCELADA.
    avatar
    tauron
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    Re: Acessar Parcela a Receber selecionada em um form de pesquisa para outro form

    Mensagem  tauron em Seg 08 Jan 2018, 14:02

    Poste seu bd para analisarmos melhor.

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: Acessar Parcela a Receber selecionada em um form de pesquisa para outro form

    Mensagem  Noobezinho em Ter 09 Jan 2018, 11:38

    EdiJovem


    Embora não tenha dito quais campos do formulário  fm_Recebimento_Parcelas deseja preencher, experimente assim:

    No evento Ao clicar da listbox:

    DoCmd.OpenForm "fm_Recebimento_Parcelas"

    Forms!fm_Recebimento_Parcelas!Textbox1 = me. textbox 1 ou coluna da listbox não sei onde irá pegar os valores a ser transferidos
    Forms!fm_Recebimento_Parcelas!Textbox2 = me. textbox 2
    ...
    ...


    DoCmd.Close acForm, Me.Name

    [ ]'s

    Edijovem
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 18/08/2016

    Re: Acessar Parcela a Receber selecionada em um form de pesquisa para outro form

    Mensagem  Edijovem em Ter 09 Jan 2018, 18:55

    Pessoal, ainda continuo com problemas, agradeço a todos que me deram as dicas, mas ainda esta dando errado.

    Tentei por ultimo este código: Mas não deu...

    DoCmd.OpenForm "fm_Recebimento_Parcelas", "[Código]=[Forms]![fm_pesquisa_Recebimento]![Lista]", , acNormal
    DoCmd.OpenForm "fm_Recebimento_Parcelas", "[Sequencia]=[Forms]![fm_pesquisa_Recebimento]![Lista]", , acNormal

    DoCmd.OpenForm "fm_Recebimento_Parcelas"

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: Acessar Parcela a Receber selecionada em um form de pesquisa para outro form

    Mensagem  Noobezinho em Ter 09 Jan 2018, 19:41

    Anexe um exemplo com as tabelas, consultas e forms em questão para nossa análise.

      Data/hora atual: Seg 18 Jun 2018, 16:13