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

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.

Up

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.

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.

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

Bom dia Abymael!

Em anexo

Saludos

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.

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.

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.

Ótimo que deu certo!