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

    Adicionar novo registro, paara msma chave primaria

    EMB044
    EMB044
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 12/11/2020

    Adicionar novo registro, paara msma chave primaria Empty Adicionar novo registro, paara msma chave primaria

    Mensagem  EMB044 19/5/2021, 14:21

    Bom dia..
    Tenho um bd onde criei 4 tabelas,
    tbl_cad_clientes
    tbl_cad_veiculos
    tbl_cad_valores
    tbl_cad_busca

    também criei 4 formularios
    frm_cad_clientes
    frm_cad_veiculos
    frm_cad_valores
    frm_cad_busca

    ao fazer o cadastro de um cliente (frm_cad_clientes), tem um botão "veiculos", ao clicar nesse botão abre o frm_cad_veiculos para adicionar 01 veículo, porém, copia o ID_CLIENTES E CPF DO FRM_CAD_CLIENTES PARA O FRM_CAD_VEICULOS..
    Até aqui esta funcionando

    Coloquei um botão "BTN_NOVO" para adicionar um novo veículo ao mesmo cliente....desta forma, ao pressionar o botão deveria salvar as informações, mudar o ID_VEICULOS automaticamente pois é a chave primaria, copiar o ID_CLIENTES e CPF para o novo registro de veiculos, com isso, iria manter o relacionamento na tabela....

    MAs não esta funcionando....

    Para 01 registro funciona, se tento adicionar o segundo veiculo ara o mesmo cliente não funciona....

    Em anexo esta o bd que estou usando...

    segue aqui o codigo do btn...

    Private Sub BTN_CADASTRO_NOVO_Click()

    Dim A As Integer
    Dim B As String

    A = ID_CLIENTES ' aqui copia o id_cliente na variavel A
    B = CPF ' aqui copia o numero do cpf na variavel B

    DoCmd.GoToRecord , , acNewRec ' aqui salva e inicia o mesmo frm_cad_veiculos

    Me.ID_CLIENTES = A ' aqui copia para id_clientes o valor da variavel A(id_clientes do mesmo cliente)
    Me.CPF = B 'aqui copia para id_clientes o valor da variavel B(id_clientes do mesmo cliente)

    End Sub

    mas so funciona uma vez...não consigo adicionar mais de um veiculo para o mesmo cliente...
    Anexos
    Adicionar novo registro, paara msma chave primaria AttachmentSISTEMA_JB_ACCESS_VER_22.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.7 Mb) Baixado 5 vez(es)
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

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

    Adicionar novo registro, paara msma chave primaria Empty Re: Adicionar novo registro, paara msma chave primaria

    Mensagem  Noobezinho 21/5/2021, 20:15

    Olá Amigo

    Para funcionar o que deseja, deve fazer o seguinte:

    Os relacionamentos estão corretos.

    Então, no formulário de Clientes deve colocar o formulário de veículos como subformulário dele.

    Uma vez puxado o subform para o corpo do form cliente (já vez isso com outros forms),

    clique na borda do subformulario, irá aparece uma linha rosada envolvendo o subformulario.
    Clique até aparecer essa linha.
    Então  abra, caso não esteja aberto a folha de propriedades e  nas propriedades  
    vincular campos Mestre e vincular campos filhos, coloque a id_Cliente.
    Assim os dois campos estarão vinculados;
    Deixe a caixa de texto Id_Cliente do subform de veiculos, bloqueada, pois a cada novo registro
    irá aparece a id_cliente a qual está atrelada.

    Essa era tua dúvida e creio que a sanei.

    Quanto as outras tabelas que vi nas relações.
    Creio que a tabela de valores dos veículos não seja necessária , já que pode colocar
    esses dados na tabela de veículos, deixando todos as informações num lugar.


    A tbl_Busca_Apreensão

    Como está vinculada ao cliente, você pode coloca o formulário dessa tabela
    como subform, abaixo do subform veiculos.
    Veja que tudo fica concentrado num local somente.
    Fazendo isso, na propriedade AoAbrir desse subform,
    crie um código de verificação se o veiculo em questão tem registro.
    Caso negativo, exibirá ao invés de uma msgbox, um quadrado branco
    cobrindo o subform, avisando que não tem mandado de busca para esse veículo
    Acho que é essa a ideia.

    Não posso opinar sobre as outras tabelas,  mas suspeito que seja sobre B.O.  Razz

    É isso amigo, espero que tenha me feito entender, qq coisa da um grito!

    { }'s

    Balem


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.

    EMB044 gosta desta mensagem

    EMB044
    EMB044
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 12/11/2020

    Adicionar novo registro, paara msma chave primaria Empty Adicionar novo registro, paara msma chave primaria

    Mensagem  EMB044 21/5/2021, 21:47

    Boa tarde Noobezinho....
    Ate segunda feira vou aplicar suas recomendações e fazer os testes....

    Eu descobri que: ao abrir o form clientes para cadastrar, fazer o cadastro normalmente, clicar no botão veiculos, carrega o form veiculos... se ja existir um veiculo cadastrado...se eu clicar no botão NOVO, adiciona um novo veiculo sem problemas, porém, se apos terminar de preencher os campos do novo veículo eu pressionar o botão SALVAR e tentar ADD um novo VEICULO, ocoore o erro...acredito que seja devido a ter salvado o veiculo...mas...se terminar de preencher os campos e clicar no botão NOVO, adiciono quantos vlientes precisar sem erro....somente no ultimo veiculo adicionado devo usar o botão salvar....

    acredito q seja devido ao comando que estou usando no botão novo:

    Private Sub BTN_CADASTRO_NOVO_Click()

               Dim A As Integer
               Dim B As Integer
                           
                A = ID_CLIENTES
                ID_CLIENTES2 = CPF
               
              DoCmd.GoToRecord , , acNewRec
               
                Me.ID_CLIENTES = A
                Me.CPF = ID_CLIENTES2
    End Sub

    onde, se eu entendi....ele salva e depois abre um registro novo....(DoCmd.GoToRecord , , acNewRec)

    caso eu usar o botão salvar e depois o botão novo...o access entende erro devido a possivel duplicidade... desculpa se estou erraddo...eu não sou programador...sou amador...

    Estou com dificuldade para resolver o seguinte problema também... ao abrir o sistema, no form menu, pressione o botão busca tj...ao carregar a pagina.. ele ja carrega o subformulario com todos os clientes listados ... gostaria de:
    Ao clicar em algum ID_CLIENTE da coluna ID_CLIENTE, na parte inferior iria mostrar apenas o ou os veiculos vinculados a esse ID_CLIENTE...
    Ja criei um textbox txt_id_clientes onde ao clicar no ID_CLIENTE ele carrega esse id...com isso pensei em usar ele como filtro para carregar no segundo subformulario apenas os veiculos vinculados a esse id_clientes...mas não consegui fazer isso...

    resumo... como a pesquisa feita e por cliente e respectivamente seu cpf, se o cliente possui mais de um veiculo cadastrado...como vou saber qual deles esta com busca? se eu mostrar no segundo subformulario os veiculos vinculados ao cliente...posso registrar qual deles esta com busca decretada...

    se puder me ajudar ficarei grato...

    referente ao problrma original... de momento...adotei adicionar veiculos e apenas quando terminar de adicionar usar o botão salvar...
    estou pesquisando uma maneira de colocar um codigo onde ..ao carregar o form_veiculos seja verificado se existe um ID_VEICULOS vinculado ao ID_CLIENTES...se sim...ocultar o botão salvar e a cada vez q terminar de preencher os dados do novo veiculo a ser adicionado...uma caixa de texto com a mensagem: deseja salvar e finalizar? se responder sim...oculta o botão novo e habilita o botão salvar...se clicar em não, mantem habilitado o botão novo e oculto o salvar...

    desde...ja agradeço sua ajuda e farei as modificações que vc me orientou acima...

    se puder me ajudar... com o problema acima..fico grato...


    Última edição por EMB044 em 22/5/2021, 15:02, editado 1 vez(es)
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

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

    Adicionar novo registro, paara msma chave primaria Empty Re: Adicionar novo registro, paara msma chave primaria

    Mensagem  Noobezinho 21/5/2021, 22:11

    Amigo

    Vou insistir, faça o formulário com subformulário e esses problemas acabam.

    Já deve saber que ao mudar de registro, no caso cliente, o subform irá mostra no
    ato, todos os veículos dele.
    Digamos que o subformulário exiba os veículos em formulário continuo ou folha de dados.
    pode ainda, clicar num veiculo e abrir outro formulário com os dados dele.
    E eu já te explique que pode ter num formulário dois subform um com os dados do(s) veiculo(s)
    e outro com dados da busca e apreensão se houver.
    Pra que ficar abrindo formulários se pode ter tudo num só?

    Façamos assim, disse que vai aplicar o que eu recomendei.

    Faça uma cópia do teu BD e a utilize para isso.

    Então na segunda, aguardo teu retorno e tua decisão Wink


    Balem














    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.

    EMB044 gosta desta mensagem

    EMB044
    EMB044
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 12/11/2020

    Adicionar novo registro, paara msma chave primaria Empty Adicionar novo registro, paara msma chave primaria

    Mensagem  EMB044 22/5/2021, 13:13

    bom dia...
    combinado....ja vou começar agora....
    Obrigado....

      Data/hora atual: 18/9/2021, 17:13