[Resolvido]Somar Horas com Campo Null

Boa noite pessoal!

Tenho uma consulta que faz a soma de horas (Hrx_Folg + Hrx_NaoFolg = Total_Hrs_Extra), ate ai tudo bem a soma acontece sem problemas.

Mas o Problema é quando um dos dois campos sao null(Hrx_Folg Ou Hrx_NaoFolg) ai entao o Total_Hrs_Extra fica em branco sendo que nunca os dos vao ser null sempre vai ter um ou outro ou os dois mas nunca vai ser Hrx_Folg e Hrx_NaoFolg null.


Sendo assim quando um tiver null o valor de Total_Hrs_Extra deve ser obviamente o do outro.

O mesmo acontece com "Saldo" que é Total_Hrs_Extra - Hrs_Compensadas = Saldo,
Quando Total_Hrs_Extra ou Hrs_Compensadas é null o saldo esta ficando null sendo que se Hrs_Compensadas = null o saldo sera Total_Hrs_Extra.

Alguém tem alguma sugestão ?

Segue o Link se alguém puder dar uma olhada
https://dl.dropbox.com/u/19875180/Hora_Extra.accdb

Saudações

Ola;

Regressando de umas merecidas ferias da Pascoa....

Rafael amigão, trabalhe com a função IIF, que já falámos em muitos casos seus;

Neste caso o valor não é Nulo, ele fica com dois pontos ":", então é por ae que tem de fazer o IIF;

Algo assim;

Hrx_Folg: IIf(Int(Sum(DateDiff('n';0;[Hrx_Folgaveis]))/60) & ':' & Format(Sum(DateDiff('n';0;[Hrx_Folgaveis])) Mod 60;'00')=":";[Hrs_Compesadas];Int(Sum(DateDiff('n';0;[Hrx_Folgaveis]))/60) & ':' & Format(Sum(DateDiff('n';0;[Hrx_Folgaveis])) Mod 60;'00'))

Obrigado Jpaulo pela atencao!

eu até havia pensando em usar o IIF mesmo antes de abrir o Post

Mas a linha em que voce citou acima na verdade nao faco calculo nela e se o resulta for igual ":" ou null nao faz diferencao pois nao uso para calculo


meu problema na verdade é quando a Hrx_Folgaveis ou Hrx_NaoFolgaves é nulo entao sim nao consigo fazer os calculos como por exemplo nesta linha
Int((((Sum(DateDiff('n',0,Hrx_Folgaveis)))+(Sum(DateDiff('n',0,[Hrx_110_120]))))-Compensadas_Minutos)/60) & ':' & Format((((Sum(DateDiff('n',0,Hrx_Folgaveis)))+Int(Sum(DateDiff('n',0,[Hrx_110_120]))))-Compensadas_Minutos) Mod 60,'00') AS Saldo,

Saudacoes !

Boas

Bom Trabalho a todos mas jo gostari de:

De uma vista de olhos neste topico a ver se ajuda.

http://maximoaccess.forumeiros.com/t11547-resolvidocalcolo-de-horas-vb

Comprimentos e bons estudos

Luis Araujo

Bom dia Rafael;

Não entendi qual o valor que deve aparecer se for nulo;

Teste assim para os dois e altere apenas para o campo que deve devolver o valor se o resultado for nulo;

Total_Hrs_Extra: IIf(Int((((Sum(DateDiff('n';0;[Hrx_Folgaveis])))+Sum(DateDiff('n';0;[Hrx_110_120]))))/60) & ':' & Format(((Sum(DateDiff('n';0;[Hrx_Folgaveis])))+Sum(DateDiff('n';0;[Hrx_110_120]))) Mod 60;'00')=":";[Hrx_Folg];Int((((Sum(DateDiff('n';0;[Hrx_Folgaveis])))+Sum(DateDiff('n';0;[Hrx_110_120]))))/60) & ':' & Format(((Sum(DateDiff('n';0;[Hrx_Folgaveis])))+Sum(DateDiff('n';0;[Hrx_110_120]))) Mod 60;'00'))


Saldo: IIf(Int((((Sum(DateDiff('n';0;[Hrx_Folgaveis])))+(Sum(DateDiff('n';0;[Hrx_110_120]))))-[Compensadas_Minutos])/60) & ':' & Format((((Sum(DateDiff('n';0;[Hrx_Folgaveis])))+Int(Sum(DateDiff('n';0;[Hrx_110_120]))))-[Compensadas_Minutos]) Mod 60;'00')=":";[Hrx_Folg];Int((((Sum(DateDiff('n';0;[Hrx_Folgaveis])))+(Sum(DateDiff('n';0;[Hrx_110_120]))))-[Compensadas_Minutos])/60) & ':' & Format((((Sum(DateDiff('n';0;[Hrx_Folgaveis])))+Int(Sum(DateDiff('n';0;[Hrx_110_120]))))-[Compensadas_Minutos]) Mod 60;'00'))

Como sempre muito obrigado pela Paciencia!

Bom a minha ideia era mais ou menos assim , nao sei se vai conseguir entender minha logica,

IIF(Nz(Hrx_Folgaveis="",Int(Sum(DateDiff('n',0,[Hrx_110_120]))/60) & ':' & Format(Sum(DateDiff('n',0,[Hrx_110_120])) Mod 60,'00'),
IIF(Hrx_110_120="",Int(Sum(DateDiff('n',0,Hrx_Folgaveis))/60) & ':' & Format(Sum(DateDiff('n',0,Hrx_Folgaveis)) Mod 60,'00'),
Int((((Sum(DateDiff('n',0,Hrx_Folgaveis)))+Sum(DateDiff('n',0,[Hrx_110_120]))))/60) & ':' & Format(((Sum(DateDiff('n',0,Hrx_Folgaveis)))+Sum(DateDiff('n',0,[Hrx_110_120]))) Mod 60,'00')) AS Total_Hrs_Extra,


Se caso Hrx_Folgaveis na Tbl_Hora_Extra for = "" entao ele nao soma e somente coloca o o valor de Hrx_110_120
Se caso Hrx_110_120 na Tbl_Hora_Extra for = "" entao ele nao soma e somente coloca o o valor de Hrx_Folgaveis

caso contratio ai sim ele faz a soma
Int((((Sum(DateDiff('n',0,Hrx_Folgaveis)))+Sum(DateDiff('n',0,[Hrx_110_120]))))/60) & ':' & Format(((Sum(DateDiff('n',0,Hrx_Folgaveis)))+Sum(DateDiff('n',0,[Hrx_110_120]))) Mod 60,'00') AS Total_Hrs_Extra,


Mas esta dando erro de sintaxe, to tentando descobri onde... qualquer coisa posto aqui.


Saudacoes !

Rafael, tente antes fazer o meu raciocinio;

Crie dois campos novos na consulta e use esses para as formulas;

Campo A: IIf(IsNull([Hrx_Folgaveis]);[Hrx_110_120];[Hrx_Folgaveis])

Campo B: IIf(IsNull([Hrx_110_120]);[Hrx_Folgaveis];[Hrx_110_120])

JPaulo talves eu me expressei mal

Mas da forma que voce sugeriu


Campo A: IIf(IsNull([Hrx_Folgaveis]);[Hrx_110_120];[Hrx_Folgaveis])

Se Hrx_Folgaveis for nulo entao fica com o valor de Hrx_110_120 e nao é isso que preciso.

no meu caso sempre um dos dois campos (Hrx_110_120 ,Hrx_Folgaveis) vai ter uma valor... nunca os dois vao estar nulo, ou seja o total da soma caso um dos dois estejam nulo sera o valor do outro.

Ex. Se Hrx_110_120 for nulo o o valor de Total_Hrs_Extr é Hrx_Folgaveis e virse-versa....caso os dois tenha valores entao faz a soma(neste caso nao estou tendo problema)


Saudacoes!

Nesse caso tem de fazer 3 IIF`s no mesmo campo, sempre a começar pelas partes falsas;


Total_Hrs_Extra: IIf(IsNull([Hrx_Folgaveis]);[Hrx_110_120];IIf(IsNull([Hrx_110_120]);[Hrx_Folgaveis];Int((((Sum(DateDiff('n';0;[Hrx_Folgaveis])))+Sum(DateDiff('n';0;[Hrx_110_120]))))/60) & ':' & Format(((Sum(DateDiff('n';0;[Hrx_Folgaveis])))+Sum(DateDiff('n';0;[Hrx_110_120]))) Mod 60;'00')))

JPaulo desculpe minha ignorância, o seu exemplo deu certo mas o problema esta na hora de agrupar


No exemplo que você postou por ultimo você adicionou o agrupamento Tbl_Hora_Extra.Hrx_Folgaveis, Tbl_Hora_Extra.Hrx_110_120 com isso dificultou um pouco meu resultado dar uma olhada ai se puder.

Obrigado


Obs. Nao queria criar duas consultas pois uso esse código no VBA.

https://dl.dropbox.com/u/19875180/Resultado_Esperado.png

Saudações !

Tentei tambem usando a funcao de somar horas e nada

SELECT Tbl_Hora_Extra.Hrx_Supervisao, Tbl_Funcionarios.NOME, Tbl_Funcionarios.ID_FUNCIONARIO, Tbl_Hora_Extra.Hrx_funcao, Int(Sum(DateDiff('n',0,Hrx_Folgaveis))/60) & ':' & Format(Sum(DateDiff('n',0,Hrx_Folgaveis)) Mod 60,'00') AS Hrx_Folg, Int(Sum(DateDiff('n',0,[Hrx_110_120]))/60) & ':' & Format(Sum(DateDiff('n',0,[Hrx_110_120])) Mod 60,'00') AS Hrx_NaoFolg,
fncSomaHora([Hrx_Folg],[Hrx_NaoFolg]) as Total ...


http://dl.dropbox.com/u/19875180/Hora_Extra.accdb

Saudacoes !

Rafael, mas com essa função, tem de formatar com o CDate()

Total: fncSomaHora(CDate([Hrx_Folg]);CDate([Hrx_NaoFolg]))

LuiAraujo muito obrigado pela ajuda no topico.

Grande JPaulo pela Milésima vez muito obrigado!


Resolvi da seguinte forma
IIF(Hrx_NaoFolg=":",Hrx_Folg,IIF(Hrx_Folg=":",Hrx_NaoFolg, fncSomaHora(CDate([Hrx_Folg]),CDate([Hrx_NaoFolg])))) As Total,

https://dl.dropbox.com/u/19875180/Hora_Extra.accdb

Saudações !

Obrigado pelo retorno o forum agradece.