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


3 participantes

    [Resolvido]Retornar o registro anterior e a diferença de dias

    avatar
    maralucca
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 13
    Registrado : 26/05/2016

    [Resolvido]Retornar o registro anterior e a diferença de dias Empty [Resolvido]Retornar o registro anterior e a diferença de dias

    Mensagem  maralucca 23/7/2016, 19:02

    Boa tarde, pessoal

    estou iniciando ainda no Access e preciso de uma ajuda de vocês mais uma vez...
    tenho uma tabela com os números dos chamados e preciso mostrar em quais etapas o chamado foi devolvido ao solicitante  e quantos dias demoramos para devolver ao solicitante o chamado

    Tabela

    INDICE    Chamado    Motivo                            Status Atual    Data        Status Historico
    1        S558877    alteração perfil                              APROVADA        12/05/2016    NOVO
    2        S558877    alteração perfil                              APROVADA        13/05/2016    EMANALISE
    3        S558877    alteração perfil                              APROVADA        16/05/2016    DEVOLVIDO
    5        S558878    instalação software restrito           CANCELADA        02/06/2016    NOVO
    6        S558878    instalação software restrito           CANCELADA        03/06/2016    EMANALISE
    7        S558878    instalação software restrito           CANCELADA        06/06/2016    DEVOLVIDO
    8        S558878    instalação software restrito           CANCELADA        08/06/2016    EMANALISE
    9        S558878    instalação software restrito           CANCELADA        09/06/2016    DEVOLVIDO
    10        S558878    instalação software restrito         CANCELADA        10/06/2016    AGUARPTEC
    11        S558878    instalação software restrito         CANCELADA        13/06/2016    DEVOLVIDO
    12        S558878    instalação software restrito         CANCELADA        15/06/2016    CANCELADA
    13        S558879    manutenção hardware                CONCLUIDO        08/07/2016    NOVO
    14        S558879    manutenção hardware                CONCLUIDO        11/07/2016    EMANALISE
    15        S558879    manutenção hardware                CONCLUIDO        13/07/2016    AGUARPTEC
    16        S558879    manutenção hardware                CONCLUIDO        18/07/2016    PENDAPROV
    17        S558879    manutenção hardware                CONCLUIDO        19/07/2016    APROVADA


    Resultado Esperado

    INDICE Chamado Motivo                Status Atual       Data       Status Historico        Qtde dias
    2 S558877 alteração perfil                APROVADA       13-mai-16 EMANALISE          3
    6 S558878 instalação software restrito CANCELADA 03-jun-16 EMANALISE          3
    8 S558878 instalação software restrito CANCELADA 08-jun-16 EMANALISE          1
    10 S558878 instalação software restrito CANCELADA 10-jun-16 AGUARPTEC          3

    Resumido quando status histórico for igual a devolvido devo mostrar o status histórico anterior e a diferença de datas entre o status de devolvido e o anterior.

    em anexo coloquei um exemplo obrigada desde já.
    Anexos
    [Resolvido]Retornar o registro anterior e a diferença de dias AttachmentExemplo1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (20 Kb) Baixado 9 vez(es)
    philipp.moreira
    philipp.moreira
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 05/02/2016

    [Resolvido]Retornar o registro anterior e a diferença de dias Empty Re: [Resolvido]Retornar o registro anterior e a diferença de dias

    Mensagem  philipp.moreira 24/7/2016, 05:29

    Mara, boa noite!

    Fiz uma sugestão conforme anexo. Da uma olhada e caso deseje outra solução sinaliza!

    Obs.:
    1 - Eu remodelei em novas tabelas, pois entendo que mais para frente caso deseje gerar novas leituras da sua operação basta criar as consultas necessárias.
    2 - Estou usando numero nos campos Status devido a normalização das tabelas. Ao criar um formulário e utilizar uma combobox é possível deixar tudo mais "visual".
    Anexos
    [Resolvido]Retornar o registro anterior e a diferença de dias AttachmentExemplo1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (40 Kb) Baixado 4 vez(es)
    avatar
    maralucca
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 13
    Registrado : 26/05/2016

    [Resolvido]Retornar o registro anterior e a diferença de dias Empty Re: [Resolvido]Retornar o registro anterior e a diferença de dias

    Mensagem  maralucca 24/7/2016, 16:02

    Philipp,

    obrigada mas não é bem isso que eu preciso os dados eu recebo de um outro sistema, importo no meu banco de dados onde trato para gerar as views que uma equipe que vai gerar os indicadores da área usa.
    No exemplo que você colocou não retorna o registro anterior ao status de devolvido eu precisaria de algo assim:
    [ltr] 

    tabela :
    [Resolvido]Retornar o registro anterior e a diferença de dias 2guzi86

    resultado esperado

    [Resolvido]Retornar o registro anterior e a diferença de dias Oqkky9



    ou seja sempre tenho que retornar os status anterior ao devolvido na coluna status histórico e durante o fluxo do processo um chamado pode ser devolvido N vezes então não posso usar LIMIT ou TOP Sad


    Obrigada
    [/ltr]
    philipp.moreira
    philipp.moreira
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 257
    Registrado : 05/02/2016

    [Resolvido]Retornar o registro anterior e a diferença de dias Empty Re: [Resolvido]Retornar o registro anterior e a diferença de dias

    Mensagem  philipp.moreira 26/7/2016, 13:54

    Mara,
    veja se seria isto?
    Anexos
    [Resolvido]Retornar o registro anterior e a diferença de dias AttachmentExemplo1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (28 Kb) Baixado 9 vez(es)
    avatar
    maralucca
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 13
    Registrado : 26/05/2016

    [Resolvido]Retornar o registro anterior e a diferença de dias Empty Re: [Resolvido]Retornar o registro anterior e a diferença de dias

    Mensagem  maralucca 26/7/2016, 23:13

    Phillip,
    mais uma vez agradeço pela atenção mas não seria isso.
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3880
    Registrado : 04/04/2010

    [Resolvido]Retornar o registro anterior e a diferença de dias Empty Re: [Resolvido]Retornar o registro anterior e a diferença de dias

    Mensagem  Avelino Sampaio 27/7/2016, 09:25

    Olá!

    segue exemplo.  Abra o formulário frmStatus e clique no botão

    Utilizei o seguinte código no botão do formulário:

    Private Sub Comando0_Click()
    Dim rs As DAO.Recordset
    Dim dtDev As Date
    'limpa campos Filtra e qtDias
    CurrentDb.Execute "UPDATE status SET Filtra=0,qtDias=null;"

    Set rs = CurrentDb.OpenRecordset("status")
    Do While Not rs.EOF
       If rs![status historico] = "Devolvido" Then
           dtDev = rs![Data] 'captura data do devolvido
           rs.MovePrevious 'retorna para o registro anterior
           rs.Edit
               rs!filtra = -1
               rs!qtdias = DateDiff("d", rs![Data], dtDev)
           rs.Update
           rs.MoveNext 'Avança para o registro seguinte
       End If
       rs.MoveNext
    Loop
    rs.Close
    Set rs = Nothing
    DoCmd.OpenReport "rltstatus", acViewPreview, , "filtra=-1"
    End Sub


    Aguardamos
    Anexos
    [Resolvido]Retornar o registro anterior e a diferença de dias AttachmentExemplo1_rev.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (40 Kb) Baixado 26 vez(es)


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    maralucca
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 13
    Registrado : 26/05/2016

    [Resolvido]Retornar o registro anterior e a diferença de dias Empty Re: [Resolvido]Retornar o registro anterior e a diferença de dias

    Mensagem  maralucca 27/7/2016, 22:11

    Boa  noite, Avelino

    obrigada era isso mesmo Smile
    funcionou perfeitamente !!!

    Conteúdo patrocinado


    [Resolvido]Retornar o registro anterior e a diferença de dias Empty Re: [Resolvido]Retornar o registro anterior e a diferença de dias

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 27/4/2024, 17:18