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]consulta em SQL com problemas

    avatar
    samueldrun
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 68
    Registrado : 22/09/2017

    [Resolvido]consulta em SQL com problemas Empty [Resolvido]consulta em SQL com problemas

    Mensagem  samueldrun em 19/9/2019, 15:52

    Bom Dia caros mestres,

    criei uma consulta de atualização que esta funcionando ok ? porém quando copio o SQL dela e dou um "docmd.runSQL" ela não funciona como as outras, acredito que pela parte da soma, porém não sei como consertar.

    eis o código :

    UPDATE Produtos INNER JOIN subprodutos ON Produtos.Código = subprodutos.Codigo_prato SET Produtos.Custo_Prod = DSum("[Valor_Un]","subprodutos","[Codigo_prato]=" & [Codigo_prato]);
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7746
    Registrado : 05/11/2009

    [Resolvido]consulta em SQL com problemas Empty Re: [Resolvido]consulta em SQL com problemas

    Mensagem  Alexandre Neves em 19/9/2019, 16:45

    Boa tarde
    Dê seguimento aos assuntos abertos por si. Respeite os membros do fórum (quem ajudou e quem tentou ajudar)
    Lembre-se também de marcar o "Resolvido" quando aplicável


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    samueldrun
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 68
    Registrado : 22/09/2017

    [Resolvido]consulta em SQL com problemas Empty consulta em SQL com problemas

    Mensagem  samueldrun em 19/9/2019, 16:50

    Boa Tarde, alexandre pelo que entendi não violei nenhuma regra, apenas estou tentando achar um caminho alternativo para o mesmo problema, tem uma solução para a questão ?
    thiagomcosta
    thiagomcosta
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 368
    Registrado : 23/01/2017

    [Resolvido]consulta em SQL com problemas Empty Re: [Resolvido]consulta em SQL com problemas

    Mensagem  thiagomcosta em 19/9/2019, 21:37

    Tente:
    Código:
    DoCMd.RunSql "UPDATE Produtos INNER JOIN subprodutos ON Produtos.Código = subprodutos.Codigo_prato SET Produtos.Custo_Prod = " & DSum("[Valor_Un]","subprodutos","[Codigo_prato]=" & [Codigo_prato])

    Atenção para as aspas e sinal de concatenação.
    avatar
    samueldrun
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 68
    Registrado : 22/09/2017

    [Resolvido]consulta em SQL com problemas Empty consulta em SQL com problemas

    Mensagem  samueldrun em 19/9/2019, 22:33

    Boa Noite thiago, obrigado por me ajudar,

    mas o código não deu certo, diz que não conseguiu localizar a expressão
    thiagomcosta
    thiagomcosta
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 368
    Registrado : 23/01/2017

    [Resolvido]consulta em SQL com problemas Empty Re: [Resolvido]consulta em SQL com problemas

    Mensagem  thiagomcosta em 20/9/2019, 15:34

    Sem saber os detalhes do banco dificulta um pouco.

    Tente simplificar o comando, por exemplo, dê o UPDATE direto na tabela, sem o JOiN.
    Veja se os nomes dentro do DSUM estão todos OK.

    Se possível coloque aqui a parte do BD que está dando erro.
    avatar
    samueldrun
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 68
    Registrado : 22/09/2017

    [Resolvido]consulta em SQL com problemas Empty consulta em SQL com problemas

    Mensagem  samueldrun em 20/9/2019, 15:41

    Pelo que entendi, a síntese está incorreta deveria ser mais ou menos assim:

    Código:
    DoCmd.RunSQL "UPDATE Produtos SET Produtos.Custo_Prod = (select SUM(Subprodutos.Valor_Un)FROM Produtos INNER JOIN Subprodutos ON Produtos.Código = Subprodutos.Codigo_Prato)"
    thiagomcosta
    thiagomcosta
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 368
    Registrado : 23/01/2017

    [Resolvido]consulta em SQL com problemas Empty Re: [Resolvido]consulta em SQL com problemas

    Mensagem  thiagomcosta em 20/9/2019, 18:19

    Quais as estruturas do banco de dados?
    avatar
    samueldrun
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 68
    Registrado : 22/09/2017

    [Resolvido]consulta em SQL com problemas Empty consulta em SQL com problemas

    Mensagem  samueldrun em 21/9/2019, 01:56

    esse é o banco
    Anexos
    [Resolvido]consulta em SQL com problemas Attachmentbanco.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (420 Kb) Baixado 7 vez(es)
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2311
    Registrado : 22/11/2016

    [Resolvido]consulta em SQL com problemas Empty Re: [Resolvido]consulta em SQL com problemas

    Mensagem  DamascenoJr. em 21/9/2019, 23:30

    Baixei o arquivo, criei uma consulta com a SQL abaixo substituindo "[Codigo_prato]=" & [Codigo_prato] por "[Codigo_prato]=17"
    Código:
    UPDATE Produtos INNER JOIN subprodutos ON Produtos.Código = subprodutos.Codigo_prato SET Produtos.Custo_Prod = DSum("[Valor_Un]","subprodutos","[Codigo_prato]=" & [Codigo_prato]);

    Funcionou perfeitamente. Isto é, a string SQL funciona. O que pode estar causando problemas são as variáveis, nesse caso
    Produtos.Custo_Prod = DSum("[Valor_Un]","subprodutos","[Codigo_prato]=" & [Codigo_prato])

    Trate o resultado da função DSum que pode estar retornando nulo
    Produtos.Custo_Prod = Nz(DSum("[Valor_Un]","subprodutos","[Codigo_prato]=" & [Codigo_prato]), 0)


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    samueldrun
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 68
    Registrado : 22/09/2017

    [Resolvido]consulta em SQL com problemas Empty consulta em SQL com problemas

    Mensagem  samueldrun em 23/9/2019, 01:42

    Boa noite ivan, fiz as alterações e apresentou essa mensagem:

    https://i.servimg.com/u/f32/19/78/02/72/tela10.png
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2311
    Registrado : 22/11/2016

    [Resolvido]consulta em SQL com problemas Empty Re: [Resolvido]consulta em SQL com problemas

    Mensagem  DamascenoJr. em 23/9/2019, 01:48

    Provavelmente a falta de um parenteses ou ponto e vírgula. Coloque aqui como ficou sua instrução SQL completa para correção


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    samueldrun
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 68
    Registrado : 22/09/2017

    [Resolvido]consulta em SQL com problemas Empty consulta em SQL com problemas

    Mensagem  samueldrun em 23/9/2019, 01:56

    Muito Obrigado pela atenção, eis o código

    Código:
    DoCmd.RunSQL "UPDATE Produtos INNER JOIN subprodutos ON Produtos.Código = subprodutos.Codigo_prato SET Produtos.Custo_Prod = Nz(DSum("[Valor_Un]","subprodutos","[Codigo_prato]=" & [Codigo_prato]), 0)
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2311
    Registrado : 22/11/2016

    [Resolvido]consulta em SQL com problemas Empty Re: [Resolvido]consulta em SQL com problemas

    Mensagem  DamascenoJr. em 23/9/2019, 03:26

    Código:
    DoCmd.RunSQL "UPDATE Produtos INNER JOIN subprodutos ON Produtos.Código = subprodutos.Codigo_prato SET Produtos.Custo_Prod = Nz(DSum('[Valor_Un]','subprodutos','[Codigo_prato]=' & [Codigo_prato]), 0);"


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    samueldrun
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 68
    Registrado : 22/09/2017

    [Resolvido]consulta em SQL com problemas Empty consulta em SQL com problemas

    Mensagem  samueldrun em 23/9/2019, 18:31

    Boa Tarde,

    você é fera cara, deu certinho muito obrigado!!
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2311
    Registrado : 22/11/2016

    [Resolvido]consulta em SQL com problemas Empty Re: [Resolvido]consulta em SQL com problemas

    Mensagem  DamascenoJr. em 23/9/2019, 20:20

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

      Data/hora atual: 26/10/2020, 19:28