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]Duvidas com novo registro desacoplado via DAO

    avatar
    patrickdanielli1
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 22/07/2017

    [Resolvido]Duvidas com novo registro desacoplado via DAO Empty [Resolvido]Duvidas com novo registro desacoplado via DAO

    Mensagem  patrickdanielli1 em 2/4/2020, 18:34

    Ola pessoal estou tentando implementar o form principal desacoplado via DAO mas estou com dificuldades

    vamos a lógica

    Ao abrir o form
    adiciona 1 no ID por não ser autonum
    Abre a tabela
    .AddNew
    adiciona o campo ID na tabela
    .update
    .close

    Botão Salvar
    abre a tabela com where = ID do form
    .edit
    adiciona os campos no ID criado ao abrir o form
    .close

    Botão novo
    adicina 1 no ID
    .addnew
    Adiciona o campo ID na tabela
    .update

    ele executa tudo certo, porem quando abre um novo registro ele não executa as relações e o campo calculado fica "#tipo"

    segue o banco.

    1- tentei apagar o máximo para evitar erros
    2 - o form em questão é o 'frm_comanda' e a tabela é 'tbl_comanda'
    3 - a estrutura do form: ao inserir os campos você pode 'fechar a comanda' (salvar) ou ir para um novo sem fechar (salva e vai para um novo)
    4 - ai ir para um novo ele apresenta os erros.
    5 - desculpe a bagunça nos códigos.
    6 - no zip tem 2 versões tentei salvar em 2003 deu erro na declaração do DAO
    7 - opniões relevantes ao projeto como um todo são válidas e bem vindas
    Celso Roberto
    Celso Roberto
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1063
    Registrado : 01/03/2014

    [Resolvido]Duvidas com novo registro desacoplado via DAO Empty Re: [Resolvido]Duvidas com novo registro desacoplado via DAO

    Mensagem  Celso Roberto em 3/4/2020, 00:40

    Olá..

    Na fonte de controle do controle SubServico:
    Código:
    =SeImed(ÉNulo([Serviços].[Formulário]![subtotalservicos]);0;[Serviços].[Formulário]![subtotalservicos])


    No Controle SubProduto não consegui testar por erro no subformulário, mas tente:
    Código:
    =SeImed(ÉNulo([subfrm_venda_produto].[Formulário]![subtotalprodutos]);0;[subfrm_venda_produto].[Formulário]![subtotalprodutos])


    Aguardamos o seu retorno

    Abraços e sucesso


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....
    avatar
    patrickdanielli1
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 22/07/2017

    [Resolvido]Duvidas com novo registro desacoplado via DAO Empty Re: [Resolvido]Duvidas com novo registro desacoplado via DAO

    Mensagem  patrickdanielli1 em 3/4/2020, 02:52

    Grande Celso, obrigado pela atenção.


    no campo total que é a soma dos 2 campos menos o desconto segui a mesma ideia, mas sem sucesso, ainda aparece no campo total "#tipo"



    Celso Roberto
    Celso Roberto
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1063
    Registrado : 01/03/2014

    [Resolvido]Duvidas com novo registro desacoplado via DAO Empty Re: [Resolvido]Duvidas com novo registro desacoplado via DAO

    Mensagem  Celso Roberto em 3/4/2020, 03:24

    Olá..

    Faça as devidas correções no segundo subformulario, pois esta sem os vinculos com os campos necessários das tabela e anexe aqui para que eu possa verificar para voce.

    neste campo que é a soma dos dois campos não vai este critério.

    Aguardo


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....
    avatar
    patrickdanielli1
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 22/07/2017

    [Resolvido]Duvidas com novo registro desacoplado via DAO Empty Re: [Resolvido]Duvidas com novo registro desacoplado via DAO

    Mensagem  patrickdanielli1 em 3/4/2020, 04:30

    Ola...

    os vínculos dos subforms estão idênticos
    [Resolvido]Duvidas com novo registro desacoplado via DAO Vincul10

    segue o banco com as correções mas o erro continua
    Anexos
    [Resolvido]Duvidas com novo registro desacoplado via DAO AttachmentDuvidaDAO2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (379 Kb) Baixado 3 vez(es)
    Celso Roberto
    Celso Roberto
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1063
    Registrado : 01/03/2014

    [Resolvido]Duvidas com novo registro desacoplado via DAO Empty Re: [Resolvido]Duvidas com novo registro desacoplado via DAO

    Mensagem  Celso Roberto em 3/4/2020, 04:35

    Olá...

    Antes de anexar atualização, tente o seguinte no frm_comanda:


    Na fonte de controle do campo SubServico:
    Código:
    =SeImed(ÉNulo([Serviços].[Formulário]![subtotalservicos]);0;[Serviços].[Formulário]![subtotalservicos])


    Na fonte de controle do Campo SubProduto:
    Código:
    =SeImed(ÉNulo([subfrm_venda_produto].[Formulário]![subtotalprodutos]);0;[subfrm_venda_produto].[Formulário]![subtotalprodutos])

    Na fonte de controle do Campo Desconto:
    Código:
    =SeImed(Nz([SubProduto]+[SubServico])=0;0;[Desconto])

    Na fonte de controle do Campo Valor_total:
    Código:
    =Nz((([SubProduto]+[SubServico])-[Desconto]);0)


    Faça testes e retorne

    Abraços



    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....
    avatar
    patrickdanielli1
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 22/07/2017

    [Resolvido]Duvidas com novo registro desacoplado via DAO Empty Re: [Resolvido]Duvidas com novo registro desacoplado via DAO

    Mensagem  patrickdanielli1 em 3/4/2020, 06:32

    fiz as alterações, funciona tudo beleza, mas quando cria o segundo registro continua com a inscrição "#TIPO" e só efetua o calculo se adicionar algo em desconto, senão permanece com "#TIPO"
    Celso Roberto
    Celso Roberto
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1063
    Registrado : 01/03/2014

    [Resolvido]Duvidas com novo registro desacoplado via DAO Empty Re: [Resolvido]Duvidas com novo registro desacoplado via DAO

    Mensagem  Celso Roberto em 3/4/2020, 14:16

    Olá..

    Tente da seguinte forma:

    Na fonte de controle do campo SubServico:

    Código:
    =SeImed(ÉNulo([Serviços].[Formulário]![subtotalservicos]);0;[Serviços].[Formulário]![subtotalservicos])


    Na fonte de controle do Campo SubProduto:
    Código:
    =SeImed(ÉNulo([subfrm_venda_produto].[Formulário]![subtotalprodutos]);0;[subfrm_venda_produto].[Formulário]![subtotalprodutos])


    O controle do Campo Desconto deixe como desacoplado.

    No código do Botão da nova Comanda:

    Abaixo desta linha lá no final:
    Cod_comanda = DMax("Cod_comanda", "tbl_comanda") + 1

    Acrescente:
    Me.Desconto = 0

    Ficando assim:

    Cod_comanda = DMax("Cod_comanda", "tbl_comanda") + 1
    Me.Desconto = 0


    Aguardamos retorno

    Abraços


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....
    avatar
    patrickdanielli1
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 22/07/2017

    [Resolvido]Duvidas com novo registro desacoplado via DAO Empty Re: [Resolvido]Duvidas com novo registro desacoplado via DAO

    Mensagem  patrickdanielli1 em 3/4/2020, 17:04

    Boa Celso,

    funcionou perfeitamente, e consigo enxergar onde estava o problema, ele calculava o desconto e não reconhecia quando nulo, por isso aparecia o #Tipo. estou correto ?
    avatar
    patrickdanielli1
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 22/07/2017

    [Resolvido]Duvidas com novo registro desacoplado via DAO Empty Re: [Resolvido]Duvidas com novo registro desacoplado via DAO

    Mensagem  patrickdanielli1 em 3/4/2020, 17:44

    resolvido
    Celso Roberto
    Celso Roberto
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1063
    Registrado : 01/03/2014

    [Resolvido]Duvidas com novo registro desacoplado via DAO Empty Re: [Resolvido]Duvidas com novo registro desacoplado via DAO

    Mensagem  Celso Roberto em 3/4/2020, 17:56

    Olá..

    patrickdanielli1 escreveu:
    funcionou perfeitamente, e consigo enxergar onde estava o problema, ele calculava o desconto e não reconhecia quando nulo, por isso aparecia o #Tipo. estou correto ?:

    É exatamente isso.

    Ficamos felizes por ter ajudado e obrigado pelo retorno. O fórum agradece.

    Abraços e sucesso


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

      Data/hora atual: 21/9/2020, 04:46