MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Abrir formulário em novo registro específico.

    AbymaelSousa
    AbymaelSousa
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 07/06/2017

    [Resolvido]Abrir formulário em novo registro específico. Empty [Resolvido]Abrir formulário em novo registro específico.

    Mensagem  AbymaelSousa em 28/8/2020, 17:11

    Boa tarde,

    Gostaria da ajuda de vocês para resolver uma situação.
    Tenho um formulário 'fCadastro_Geral' que contém um subFormulário 'subMembros_Familia'. Neste subFormulário, tenho registros em formulário contínuo que tem um botão 'inserir atendimento' para cada registro contínuo. Já tentei de todas as formas fazer com que ao apertar o botão, ele insira um NOVO atendimento para o registro do subformulário.

    Códigos que tentei:
    DoCmd.OpenForm "fCadastro_Atendimento", , , "Cod_Membro_Familia=" & Cod_Membro_Fam
    DoCmd.GoToRecord , , acNewRec

    DoCmd.OpenForm "fCadastro_Atendimento"
    DoCmd.GoToRecord , , AcNewRec
    Forms!fCadastro_Atendimento!Cod_Membro_Familia= Me.Cod_Membro_Fam

    Em ambos os códigos, ele não recebe o 'Cod_Membro_Familia' do Formulário 'fCadastro_Geral', me dando um novo registro, mas sem referência para qual 'Cod_Membro_Familia' deve inserir o registro.

    Podem me dar essa força?
    Segue em anexo o Banco de Dados.
    Desde já agradeço a ajuda.
    Anexos
    [Resolvido]Abrir formulário em novo registro específico. AttachmentRecepcaoNovo2808.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (110 Kb) Baixado 14 vez(es)
    AbymaelSousa
    AbymaelSousa
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 07/06/2017

    [Resolvido]Abrir formulário em novo registro específico. Empty Re: [Resolvido]Abrir formulário em novo registro específico.

    Mensagem  AbymaelSousa em 1/9/2020, 13:02

    Up
    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 359
    Registrado : 12/01/2017

    [Resolvido]Abrir formulário em novo registro específico. Empty Re: [Resolvido]Abrir formulário em novo registro específico.

    Mensagem  thiagonsilvaa em 1/9/2020, 14:43

    Bom dia !

    Pelo que entendi, você precisaria inserir primeiro o registro na tabela de atendimento para depois abrir este registro específico no formulário.

    Algo como o "insert into" te ajudaria.

    AbymaelSousa
    AbymaelSousa
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 07/06/2017

    [Resolvido]Abrir formulário em novo registro específico. Empty Re: [Resolvido]Abrir formulário em novo registro específico.

    Mensagem  AbymaelSousa em 1/9/2020, 15:04

    Bom dia, Thiago.
    Eu preciso que o formulário 'fCadastro_Atendimento abra para que sejam inseridas informações.
    Não consigo visualizar como o "insert into" pode ajudar nessa situação.

    DoCmd.OpenForm "fCadastro_Atendimento", , , "Cod_Membro_Familia=" & Cod_Membro_Fam

    Eu não sei se tem como colocar outro critério além do Cod_Membro_Fam para que abra em um novo registro. Acho que tem que ter dois critérios (Cod_Fam & Cod_Fam AND Cod_Membro_Familia & Cod_Membro_Fam), só que não faço a mínima idéia de como colocar.
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3189
    Registrado : 21/04/2011

    [Resolvido]Abrir formulário em novo registro específico. Empty Re: [Resolvido]Abrir formulário em novo registro específico.

    Mensagem  Marcelo David em 1/9/2020, 16:29

    Boa tarde,

    No subformulário subMembros_Familia adicione o campo Cod_Fam.

    O código do botão btnInserirAtendimento deverá ser:

    Código:
    'Salvo o registro do subformulário antes de inserir o atendimento que se refere ao registro atual (se não daria erro de FK)
    DoCmd.RunCommand acCmdSaveRecord

    'Abro o formulário de atendimento no modo adição de registro
    DoCmd.OpenForm "fCadastro_Atendimento", , , , acFormAdd

    'Insiro o código da familia no atendimento (por isso foi necessário incluir o campo Cod_Fam)
    Forms!fCadastro_Atendimento!Cod_Fam = Me.Cod_Fam

    'Insiro o código do membro da familia no atendimento
    Forms!fCadastro_Atendimento!Cod_Membro_Familia = Me.Cod_Membro_Fam


    .................................................................................
    Marcelo David
    https://www.freetool.dev (em construção)
    AbymaelSousa
    AbymaelSousa
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 07/06/2017

    [Resolvido]Abrir formulário em novo registro específico. Empty Re: [Resolvido]Abrir formulário em novo registro específico.

    Mensagem  AbymaelSousa em 1/9/2020, 16:46

    Marcelo David escreveu:
    O código
    Código:
    DoCmd.OpenForm "fCadastro_Atendimento", , , , acFormAdd
    não abre o formulário em novo registro. Quando clico em novo registro através do botão de navegação, o Cod_Fam e o Cod_Membro_Familia ficam zerados. Sad
    FranklinJSP
    FranklinJSP
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 381
    Registrado : 25/02/2016

    [Resolvido]Abrir formulário em novo registro específico. Empty Re: [Resolvido]Abrir formulário em novo registro específico.

    Mensagem  FranklinJSP em 1/9/2020, 17:16

    Bom dia Abymael!

    Em anexo

    Saludos
    Anexos
    [Resolvido]Abrir formulário em novo registro específico. AttachmentRecepcaoNovo2808 (FranklinJSP).zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (50 Kb) Baixado 5 vez(es)


    .................................................................................
    Meu Português não é muito bom,
    mas eu gosto de colaborar... em qualquer idioma
    Smile "Access... minha paixão"

    AbymaelSousa gosta desta mensagem

    AbymaelSousa
    AbymaelSousa
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 07/06/2017

    [Resolvido]Abrir formulário em novo registro específico. Empty Re: [Resolvido]Abrir formulário em novo registro específico.

    Mensagem  AbymaelSousa em 1/9/2020, 17:27

    FranklinJSP escreveu:Bom dia Abymael!

    Em anexo

    Saludos

    Bom dia, Franklin. Um Cod_Membro_Familia pode ter vários Cod_Atend, esse formulário é apenas para cadastrar novos atendimentos. Gostaria que quando clicasse no botão, ele pegasse os valores do SubFormulário (Cod_Fam e Cod_Membro_Familia), abrisse o formulário fCadastro_Atendimento e inserisse um novo Cod_Atend com o mesmo Cod_Fam e Cod_Membro_Familia que coletou do SubFormulário.
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3189
    Registrado : 21/04/2011

    [Resolvido]Abrir formulário em novo registro específico. Empty Re: [Resolvido]Abrir formulário em novo registro específico.

    Mensagem  Marcelo David em 2/9/2020, 11:34

    AbymaelSousa escreveu:não abre o formulário em novo registro. Quando clico em novo registro através do botão de navegação, o Cod_Fam e o Cod_Membro_Familia ficam zerados. Sad

    Não sei se fez como orientei. Aqui está o exemplo do falei.
    Anexos
    [Resolvido]Abrir formulário em novo registro específico. AttachmentRecepcaoNovo2808_new1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (118 Kb) Baixado 4 vez(es)


    .................................................................................
    Marcelo David
    https://www.freetool.dev (em construção)

    AbymaelSousa gosta desta mensagem

    AbymaelSousa
    AbymaelSousa
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 70
    Registrado : 07/06/2017

    [Resolvido]Abrir formulário em novo registro específico. Empty Re: [Resolvido]Abrir formulário em novo registro específico.

    Mensagem  AbymaelSousa em 2/9/2020, 13:17

    Muito Obrigado Marcelo David.
    Peço perdão por não ter me atentado melhor na sua explicação. Como eu não via a palavra (Novo) no registro, não percebi que ele criava o Cod_Atend e já inseria no txtBox. Funcionou perfeitamente aqui.
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3189
    Registrado : 21/04/2011

    [Resolvido]Abrir formulário em novo registro específico. Empty Re: [Resolvido]Abrir formulário em novo registro específico.

    Mensagem  Marcelo David em 2/9/2020, 14:19

    Ótimo que deu certo! Very Happy


    .................................................................................
    Marcelo David
    https://www.freetool.dev (em construção)

      Data/hora atual: 25/10/2020, 20:08