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


4 participantes

    [Resolvido]Controle de Ponto

    avatar
    alexguaruja
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 27/07/2010

    [Resolvido]Controle de Ponto Empty [Resolvido]Controle de Ponto

    Mensagem  alexguaruja 27/12/2010, 21:55

    Olá novamente a todos, aqui estou novamente precisando da ajuda de vcs! scratch
    Estou desenvolvendo um controle de ponto e numa duvida anterior o criquio e o JPaulo me deram uma força, mas agora surgiu um outro problema.
    Buscando aqui no Fórum, encontrei um tópico relacionado ao assunto e o exemplo resolvido:
    http://dl.dropbox.com/u/771097/PONTO%20ACCESS%20III.mdb
    Utilizei tal exemplo para me guiar na criação do meu, na hora de cadastrar a entrada do funcionário vai o registro, a data o horário de entrada normalmente, e na saida tambem, mas se eu cadastrar a entrada , e por algum motivo esquecer de registrar a saida hoje e amanhã registrar uma nova entrada e no final do dia registrar corretamente o horário da saída, o form automaticamente registra o horário da sáida dos dois ou mais dias em branco do funcionário o qual não foi dado tal baixa.
    Gostaria, se alguém tem alguma idéia de como eu resolver isso. E se não for pedir de mais Embarassed , teria como fazer a entrada e saída numa mesma caixa, sem ter q ficar alternando entre entrada e saída sob o perigo de ocorrer de alguém cadastrar a ntrada no lugar da saída e vice-versa, ou pelo menos um aviso q tal entrada já foi realizada?
    Se me ajudarem, prometo não pertubar mais vcs até o ano q vem cheers !!!
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  vieirasoft 28/12/2010, 00:28

    Uma sugestão

    Porque não coloca os campos locked=True. Assim se houver uma entrada de manhã e o funcionário não fizer a saída de manhã, os outros campos ficam locked até o anterior ter sido liberto. Dei uma vista de olhos na bd e achei muito confuso, mas esta pode ser uma solução.
    avatar
    alexguaruja
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 27/07/2010

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  alexguaruja 28/12/2010, 00:38

    Olá Vieira, no meu bd não utilizarei a saida manha nem entrada a tarde ( o 2º inferior da esquerda e o 1º superior da direita), só coloquei o link como peguei, sendo assim, por gentileza poderia enviar um codigo na prática onde; se for digitado o código na saida a tarde sem ter entrado o mesmo funcionário na entrada manhã, ou vice-versa o Form envie um aviso?
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  vieirasoft 28/12/2010, 01:00

    Eu dei só uma olhada e não me debruçei muito na bd, mas talvez eu fizesse assim:

    Trancava as caixas
    definia no evento actual do form:

    Me.Entradamanhã.Locked=True
    Me.SaídaTarde.Locked=True

    Colocava 1 botão de comando ao lado de cada caixa para o utilizador libertar:

    comando entradamanhã no evento click:
    If IsNull (Me.saidatarde) Or Me.saidatarde="" Then
    Me.entradamanhã.Locked=False

    comando saidatarde no evento click:

    If Not IsNull (Me.entradamanhã) Or Me.entradamanhã="" Then
    Me.saidatarde.Locked=False
    Else
    Call MsgBox("Entrada Inválida, a entrada não foi preenchida", vbExclamation, "Aviso")
    Me.saidatarde.Undo
    me.saidatarde.Locked=True
    End If

    Como disse não aprofundei a sua BD mas teste assim e veja se atende
    avatar
    alexguaruja
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 27/07/2010

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  alexguaruja 28/12/2010, 01:14

    Obigado pela atenção, mas assim não funfa, pode até ser usnndo o lock mas teria de ir buscar na tabela se já existe o dado registrado pois no form a caixa tem de ficar em branco para a necessidade de registrar a entrada ou saída de outro funconário,se puder fazer com que compare essa informação e retornar um aviso seria melhor, qualquer coisa tô online.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  vieirasoft 28/12/2010, 01:52

    Amigo

    São visões diferentes de estruturar uma BD. Não que a sua esteja errada, simplesmente a lógica que eu seguiria seria outra e implementaria o locked. Pode ser que alguém aqui tenha outra visão diferente ou até similar à sua e dê uma ideia melhor que a minha, ou que pelo menos se adapte à forma como você estruturou a bd.
    avatar
    alexguaruja
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 27/07/2010

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  alexguaruja 28/12/2010, 02:07

    Olá, obrigado pela atenção dispensada...
    Vendo pela sua visão, me deparei c/ alguns detalhes:
    Me.Entradamanhã.Locked=True
    Me.SaídaTarde.Locked=True
    Se eu utilizar:

    comando entradamanhã no evento click:
    If IsNull (Me.saidatarde) Or Me.saidatarde="" Then
    Me.entradamanhã.Locked=False

    comando saidatarde no evento click:

    If Not IsNull (Me.entradamanhã) Or Me.entradamanhã="" Then
    Me.saidatarde.Locked=False
    Else
    Call MsgBox("Entrada Inválida, a entrada não foi preenchida", vbExclamation, "Aviso")
    Me.saidatarde.Undo
    me.saidatarde.Locked=True
    End If

    Como poderei cadastrar outro funcionário, se a caixa estiver lockada, pois se eu cadastrar um funcionário, beleza, mas se eu tiver q cadastrar a entrada de outro em seguida? Ou então, como poderia fazer a saída de um 3º?


    Última edição por alexguaruja em 28/12/2010, 02:58, editado 1 vez(es)
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  criquio 28/12/2010, 02:16

    Meu amigo, geralmente cadastro é uma área separada de entrada e saída. Não vi a estrutura do seu bd, mas acho mais correto deixar as coisas separadas para ficar mais fácil de serem gerenciadas. Depois, tendo uma tela apenas para controle de entrada e saída, fica muito fácil fazer essas implementações. Até pode estar tudo visível na tela, através de um subformulário ou com os dois forms em posições diferentes usando o DoCmd.MoveSize.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    alexguaruja
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 27/07/2010

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  alexguaruja 28/12/2010, 02:20

    Olá, qui estou com o bd mais enxuto:Controle de Ponto
    Se puderem dêem uma olhada.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  JPaulo 28/12/2010, 10:14

    Veja o simples;

    Ao introduzir o Codigo para uma Entrada de Hoje, se o amigo não deu a saida ontem, ainda vai a tempo;

    Introduza o Código (4) para a Entrada e veja o teste;

    http://dl.dropbox.com/u/771097/Controle_ponto_OLD.rar



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Controle de Ponto Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Controle de Ponto Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Controle de Ponto Folder_announce_new Instruções SQL como utilizar...
    avatar
    alexguaruja
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 27/07/2010

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  alexguaruja 28/12/2010, 13:25

    JPaulo, vc não existe, poxa vida, acertou na mosca (novamente)...
    Mas, e se fosse ao contrário: o utilizador por engano cadastrasse uma saída sem ter efetuado a entrada?
    E não sei por qual motivo, o form não esta mais cadastrando a entrada do funcionario.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  JPaulo 28/12/2010, 15:18

    Deu um pouco mais de trabalho, porque você não pode utilizar nomes dos campos com as palavras reservadas do Access, nem nomes dos formularios iguais às tabelas, gera montanhas de erros.

    Agora penso estar a funfar;

    http://dl.dropbox.com/u/771097/Controle_ponto_OLD_II.rar



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Controle de Ponto Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Controle de Ponto Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Controle de Ponto Folder_announce_new Instruções SQL como utilizar...
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  criquio 28/12/2010, 16:20

    Alex, dê uma lida nesse pequeno artigo: http://maximoaccess.forumeiros.com/t1162-dicas-para-iniciantes-nomear-campos-e-elementos-de-um-sistema-em-access


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    alexguaruja
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 27/07/2010

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  alexguaruja 28/12/2010, 19:31

    Olá JPaulo, funcionou perfeitamente...
    Agora como poderia fazer para q houvesse apenas uma caixa para a entrada do funcionário, a qual, trataria as entradas e saídas com suas respectivas mensagens de erro como vc fez nas duas do exemplo, assim, o operador não precisaria escolher entre as caixas e somente entrar com os dados.
    Desde já agradeço sua atenção...
    E Criquio, obrigado pela observação, mas este exemplo peguei aqui mesmo no fórum, e estou utilizando somente para facilitar as alterações feitas pelos mestres.
    avatar
    alexguaruja
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 27/07/2010

    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  alexguaruja 29/12/2010, 04:15

    Olá novamente a todos!
    Estou disponibilizando uma cópia reduzida do meu bd para que vcs possam estar me ajudando no assunto de criar uma unica combo para cadastrar a entrada e saída dos funcionários, e se puderem me dar um help no quesito de incluir as folgas e feriados dos funcionários nas tabelas e relatórios eu ficaria muito agradecido.
    Adaptei a sugestão do mestre JPaulo q era de txts para combos pois me sinto mais a vontade de criar buscas na tabela funcionários com combos para estar mostrando os dados dos funcionários na hora da entrada/saída dos mesmos.
    desde já agradeço a colaboração de vocês!!!
    Controle de Ponto

    Conteúdo patrocinado


    [Resolvido]Controle de Ponto Empty Re: [Resolvido]Controle de Ponto

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 24/11/2024, 04:19