[Resolvido]Converter campo nulo em R$ 0,00

Grandes Mestres,

Estou aqui novamente pedindo suas ajudas.

Tenho essa linha em um relatório com o DSoma:

DSoma("[ValorRecebido]";"[tbl_Receitas]";"[TipoTrampo]='Industria' and [NotaFiscal]='Não' and [Ano]=[Formulários]![FormCombo]![CombAno] and [NomeMes]=[Formulários]![FormCombo]![CombMes]"))

Funciona tudo perfeitamente. Porém, é possível que esses critérios não sejam todos verdadeiros e a soma não é feita. Isso é totalmente correto. O campo fica nulo.

Queria que no lugar do nulo  ficasse R$ 0,00.

Já tentei com Nz, Nz com zero, SeImed, Null, Isnull, etc. Sempre fica vazio. Abaixo dois modos (dentre vários) dos que tentei:

=Nz(DSoma("[ValorRecebido]";"[tbl_Receitas]";"[TipoTrampo]='Industria' and [NotaFiscal]='Não' and [Ano]=[Formulários]![FormCombo]![CombAno] and [NomeMes]=[Formulários]![FormCombo]![CombMes]"))


=SeImed((DSoma("[ValorRecebido]";"[tbl_Receitas]";"[TipoTrampo]='Comércio' and [NotaFiscal]='Sim' and [Ano]=[Formulários]![FormCombo]![CombAno] and [NomeMes]=[Formulários]![FormCombo]![CombMes]"))="";0;(DSoma("[ValorRecebido]";"[tbl_Receitas]";"[TipoTrampo]='Comércio' and [NotaFiscal]='Sim' and [Ano]=[Formulários]![FormCombo]![CombAno] and [NomeMes]=[Formulários]![FormCombo]![CombMes]")))

Desde já, muito grato a todos.

Boa tarde
Experimente
IIf(DSoma("[ValorRecebido]";"[tbl_Receitas]";"[TipoTrampo]='Industria' and [NotaFiscal]='Não' and [Ano]=[Formulários]![FormCombo]![CombAno] and [NomeMes]=[Formulários]![FormCombo]![CombMes]"))> 0, DSoma("[ValorRecebido]";"[tbl_Receitas]";"[TipoTrampo]='Industria' and [NotaFiscal]='Não' and [Ano]=[Formulários]![FormCombo]![CombAno] and [NomeMes]=[Formulários]![FormCombo]![CombMes]")), 0)

Caro Amigo,

Não funcionou.
Com IIF(.....),0) Sintaxe inválida
Com IIF(.....);0) #Error

Na mesma linha de pensamento do Alexandre Neves, só que no Seimed() e uma pequena modificação.

Se a linha do relatório está no VBA utilize o código que o nosso colega colocou, e se não der certo substitua para a parte que está em vermelho.


=SeImed((DSoma("[ValorRecebido]";"[tbl_Receitas]";"[TipoTrampo]='Comércio' and [NotaFiscal]='Sim' and [Ano]=[Formulários]![FormCombo]![CombAno] and [NomeMes]=[Formulários]![FormCombo]![CombMes]"))<> "";
       (DSoma("[ValorRecebido]";"[tbl_Receitas]";"[TipoTrampo]='Comércio' and [NotaFiscal]='Sim' and [Ano]=[Formulários]![FormCombo]![CombAno] and [NomeMes]=[Formulários]![FormCombo]![CombMes]"));0)

Caso nada disso adiantou, diga que tipo de campo é esse, se moeda ou qual outro.

Balem

Grande Noob,

Fiz a alteração que você sugeriu e funfou. Agora vou verificar outros campos bem idênticos com o mesmo problema, cheios de critérios. Quando terminar os testes volto para confirmar. Por isso vou deixar o tópico aberto.
Uma curiosidade: Qual o motivo que funcionou com <>"" e não com ="" ou =nulo. Sei que nulo é diferente de vazio, diferente de zero. Então quando digo <>"" e é verdadeiro, qual o conteúdo?
Desde já, muito grato ao grandes mestres: Alexandre e Noob.

Abraços

Quando escrevemos  x=""

dizemos que x é um cadeia vazia, ou vazio.

Se colocarmos na janela imediata:

? x=""
veja que não retorna nada, ou seja vazio.

por isso que da erro no código

Agora se colocar <> ""

livramos a cara do Access: "Ah! O valor que tenho aqui é diferente disso aí que nem sei o que é."

Espero que tenha me feito entender!

{ }'s

Balem

Caros Amigos,

Conforme falei anteriormente, no primeiro teste que fiz foi em um campo que sei está vazio (possivelmente nulo) deu certo. No entanto nos que tem valores passou a ficar o (zero). Inverteu os papeis. E agora?

Caro Noob,

Já havia lido várias coisas sobre o assunto e agora melhorou mais ainda com essa aula.

Muito grato

Voltando ao não funcionamento correto, exatamente isso que falamos agora. <>""; deveria fazer o DSoma do verdadeiro.

Vou te passar mais uma dica:

coloque a primeira expressão que é comparada com  <> ""

dentro dessa função:

Len("aqui dentro" & "") = 0

Coloque a primeira parte da "linguiça" ali dentro  

Funciona assim:

? Len("121313" & "")<> 0
True

? Len("" & "")<> 0
falso

Creio que dai funfa legal.


Sim ele deve ser na parte verdadeira

Sabe usar a janela imediata?

Você pode testar isso nela.

Caro Amigo,

Antecipadamente muito grato por suas aulas e pelo interesse no meu problema. Vou fazer o que você sugeriu com relação a janela imediata, vou fazer mais uso da mesma.
Agora, desculpe minha ignorância no meu próprio problema e por te alugar tanto, mas no momento não estou conseguindo acertar a sintaxe. Fiz de diversas formas e nada. Erro de sintaxe. A última linha que fiz ficou (com erro) assim:

=SeImed((Len(DSoma("[ValorRecebido]";"[tbl_Receitas]";"[TipoTrampo]='Comércio' and [NotaFiscal]='Sim' and [Ano]=[Formulários]![FormCombo]![CombAno] and [NomeMes]=[Formulários]![FormCombo]![CombMes]")&""))=0";(DSoma("[ValorRecebido]";"[tbl_Receitas]";"[TipoTrampo]='Comércio' and [NotaFiscal]='Não' and [Ano]=[Formulários]![FormCombo]![CombAno] and [NomeMes]=[Formulários]![FormCombo]![CombMes]"));0)

Pode ser a carga de hoje, muito intensa e não consigo mais ver nada.

Salientando que esta bronca é proveniente de um amigo nosso aqui do fórum que eu estava tentando ajudar. Fizemos bastante coisas até chegar nessa bronca que em vez de ajudar tive que pedir ajuda para poder ajudar.

Muito grato, abraços

Ao que me parece, a sintaxe está correta, porém,  na parte verdadeira, deveria estar assim, como disse na mensagem anterior  

Len("Aqui a soma" & "")<> 0

Lembre-se que temos que comparar o valor sendo diferente de vazio.
Len() retorna o numero de caracteres + vazio, se tiver valor irá retornar o número
de caracteres, o contrário, conteúdo vazio.

Creio que isso deveria funfar legal.

Se não acontecer, o que posso sugerir, e me parece que você tem o BD do colega, é testar a frase separadamente.

- Verifique se somente a soma está correta, da primeira parte e da   segunda.

- Se a primeira está correta, coloque-a dentro da função Len() e teste se está retornando o resultado esperado

 não duas situações; quando  a soma tiver valor e quando o valor for <> 0

Quando as duas tiverem corretas é só unir com o SeImed()

A propósito, se  fizer uso da janela imediata, da opção compilar do menu depurar e  usar a tecla F8

para depurar o código linha a linha, facilitará para descobrir os erros dos códigos.

Balem

Valeu Amigo, vou tentar aqui e retorno. Muito grato.

Grande Mestre Noob,

Tentei de diversas formas com as várias sugestões e nada. Inclusive com o Len também acontecia o mesmo caso, quando verdadeiro (SeImed) não fazia, quando falso somava, errado. Enfim, praticamente refiz todos os Dsoma, chegando até a simplificar (diminuindo os critérios), voltei a usar o Nz e tudo deu certo. Muito obrigado, muito obrigado mesmo. ótimas explanações, aulas, etc.
Meus agradecimentos ao grande mestre Alexandre.

Grande abraço para todos

Que bom que resolveu.

Quando não temos o BD em mãos, o que fazemos é usar o que sabemos para poder ajudar.

Mas uma pequena modificação num código, muda completamente o resultado.

Boa sorte

Balem