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

    [Resolvido]Hora Noturna

    Rasec
    Rasec
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 246
    Registrado : 19/12/2015

    [Resolvido]Hora Noturna Empty [Resolvido]Hora Noturna

    Mensagem  Rasec 23/4/2016, 22:12

    Boa tarde pessoal. Tenho essa expressão numa consulta HoraNoturna: CData(1+([sn]-[en])) o que me retorna o tempo de trabalho noturno, porém, se não tem hora trabalhada noturna ela me retorna uma data no campo, o que não pode acontecer. Grato pela ajuda.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Hora Noturna Empty Re: [Resolvido]Hora Noturna

    Mensagem  FabioPaes 24/4/2016, 00:49

    Amigo, nao entendo muito sobre calculos de Horas... Mas um Format resolve esse problema... Porem pode atrapalhar seus outros calculos... E acho que não e correto fazer os calculos da forma como esta fazendo.
    HoraNoturna: Format(CData(1+([sn]-[en]));"hh:nn:ss")

    Aconselho mesmo é vc dar uma olhada nesse Material do Avelino Sampaio, que faz o que precisa.

    http://www.usandoaccess.com.br/tutoriais/calculo-horas-extras-e-soma-superior-a-24-horas.asp?id=1

    Copie o Modulo que realiza de forma correta o calculo das horas... e utilize ele em todos os calculos de diferença

    Ex: HoraNoturna: SeImed(ÉNulo([en]) Ou ÉNulo([sn]);0;fncIntervalo([EN];[sn]))
    Rasec
    Rasec
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 246
    Registrado : 19/12/2015

    [Resolvido]Hora Noturna Empty Re: [Resolvido]Hora Noturna

    Mensagem  Rasec 25/4/2016, 00:15

    Consegui fazer de acordo com o exemplo do Avelino, mas preciso acumular os totais e esta dando erro quando somo. Segue até onde consegui ir. Preciso somar os totais no exemplo 2+1=3 horas noturnas. Grato pela ajuda.

    https://www.dropbox.com/s/3cg909itpugijdc/Ponto%20-%20C%C3%B3pia.rar?dl=0
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Hora Noturna Empty Re: [Resolvido]Hora Noturna

    Mensagem  FabioPaes 25/4/2016, 14:45

    Meu amigo, trabalhar com calculo de horas não é simples... Logo não da pra simplesmente somar!

    Segue a alteração feita baseada no Exemplo do Relatório do modelo indicado na mensagem nº 02

    https://www.dropbox.com/s/tufnujz0l3egatj/Ponto%20-%20C%C3%B3pia.zip?dl=0
    Rasec
    Rasec
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 246
    Registrado : 19/12/2015

    [Resolvido]Hora Noturna Empty Re: [Resolvido]Hora Noturna

    Mensagem  Rasec 25/4/2016, 22:14

    ok, consegui fazer funcionar, mas quando lancei um afastamento começou a dar erro nos relatórios, como eu poderia fazer para incluir os afastamentos, Grato.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Hora Noturna Empty Re: [Resolvido]Hora Noturna

    Mensagem  FabioPaes 25/4/2016, 23:44

    Ta, e qual foi o erro que deu meu amigo? Os Afastamentos são valores zerados???

    Se for o Erro 13 Tipos incompatíveis...

    O problema Ocorre poque no calculo, em uma condição vc colocou "" (HoraExtraNoturna: SeImed([HoraNoturna]>[7horas];CData([HoraNoturna]-[7horas]);""))

    Mude esta e em outros campos para :

    HoraExtraNoturna: SeImed([HoraNoturna]>[7horas];CData([HoraNoturna]-[7horas]);"00:00:00")

    Assim não haverá erro!

    Acho que também vale a pena nao exibir esses valores... Então deixe-o fora de sua consulta!
    Rasec
    Rasec
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 246
    Registrado : 19/12/2015

    [Resolvido]Hora Noturna Empty Re: [Resolvido]Hora Noturna

    Mensagem  Rasec 26/4/2016, 19:40

    Era isso mesmo, valeu pela força.

    Conteúdo patrocinado


    [Resolvido]Hora Noturna Empty Re: [Resolvido]Hora Noturna

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/5/2024, 08:46