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


    [Resolvido]Grupo de Opcoes: Alternando Filtros

    ronaldojr1
    ronaldojr1
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 419
    Registrado : 01/08/2011

    [Resolvido]Grupo de Opcoes: Alternando Filtros Empty Grupo de Opcoes: Alternando Filtros

    Mensagem  ronaldojr1 18/10/2012, 16:46

    Bom dia para todos

    Preciso de mais uma ajuda dos mestres do Access

    Estou tentando fazer um grupo de Opções que tem Três condições de Filtro, mas antes deixa eu explicar a regra de negocio:

    o formulario que quero aplicar o grupo de opções chama andamento. Aqui fica todo o andamento de produção um livro:

    1 - Um Livro Tem Diversos Envios e Retornos
    2 - No formulario tem que registrar cada envio e cada retorno
    3 - Um Livro Pode ser enviado Pra mais de um Lugar ao mesmo tempo, desde que sejam Fases Diferentes.

    Estrutura resumida do formulario

    Para cadastrar uma movimentação tem que:

    1 - Codigo: digitar o codigo do livro
    2 - Data: data da movimentação
    3 - Operação: Se é Envio ou Retorno
    4 - Fase: Fase De Produção
    5 - Fornecedor: Fornecedor que o livro ta sendo encaminhado pra fazer o serviço

    As Regras nao se preocupem que ja estão todas feitas o que eu quero a ajuda de vcs é montar com um grupo de Opções com 3 casos diferentes.

    Exemplo:

    Digamos que eu so tenho esse registro na tabela

    Codigo.....Data .........Operação......Fase...........Fornecedor
    41470......16/10/12......Envio.........Impressao......HR
    41470......18/10/12......Envio.........Capa...........HR
    41470......20/10/12......Retorno.......Capa...........HR
    41501......10/09/12......Envio.........Impressao......JR
    41501......05/09/12......Envio.........Capa...........JR
    41501......06/09/12......Retorno.......Capa...........JR

    Opção 1: Em Aberto
    Nessa Opção eu queria que filtrasem apenas os livros que possuem Fases de envio, que nao tenha retornado ainda. No Caso iria aparecer apenas a Fase Impressao, pois ela nao possui Retorno

    Resultado Desejado:

    Codigo.....Data .........Operação......Fase...........Fornecedor
    41470......16/10/12......Envio.........Impressao......HR
    41501......10/09/12......Envio.........Impressao......JR

    Opção 2: Finalizado
    Nessa Opção eu queria que filtrasem apenas as Fases que Possuem Envio e Retorno. No Caso aparecia Capa pq ela Possui Envio e Retorno

    Resultado Desejado:

    Codigo.....Data .........Operação......Fase...........Fornecedor
    41470......20/10/12......Retorno.......Capa...........HR
    41501......06/09/12......Retorno.......Capa...........JR

    Opção 3: Tudo(Default)
    Nessa Opção Aparece Tudo



    O que eu tenho é isso:

    Select Case Quadro33

    Case 2:

    Me.RecordSource = "Select * From L_Andamento WHERE Operação = 'Retorno'"

    Case 3:
    Me.RecordSource = "Select * From L_Andamento"

    End Select

    Não estou conseguindo fazer o primeiro Caso pq pra eu saber o que esta em aberto tem que verificar se o mesmo codigo possui envio sem retorno e a dificuldade disso que o retorno fica em registro diferente e nao em campo diferente. Deu pra entender?

    Como fazer A opção 1?

    Desde Ja Antecipo meu agradecimento aos colaboradores

    Grato a todos


    avatar
    Convidado
    Convidado


    [Resolvido]Grupo de Opcoes: Alternando Filtros Empty Re: [Resolvido]Grupo de Opcoes: Alternando Filtros

    Mensagem  Convidado 18/10/2012, 19:40

    Ou colocaria campo para envio e campo para retorno...

    Ou carregaria um recordset filtrado pelas palavras envio e retorno.
    Utilizaria um loop para buscar o que deseja...



    é por ai...
    avatar
    Convidado
    Convidado


    [Resolvido]Grupo de Opcoes: Alternando Filtros Empty Re: [Resolvido]Grupo de Opcoes: Alternando Filtros

    Mensagem  Convidado 18/10/2012, 19:43

    OU antes de executar o codigo pode utilizar um Dlast.. para checar qual o ultimo registro para o livro... se caso seja envio...

    No caso o Dlast ou o Dcount... para checar se:

    41501......06/09/12......Envio.......Impressao...........JR Condição para(Não esta em aberto)

    41501......06/09/12......Envio.......Capa...........JR Condição para(está em aberto)

    Então de acordo com a informação retornarda carregaria o recordsource com a informação.


    Carregaria um recordsource com o que deseja

    Caso contrario carregaria o recordsource com outra informação pertinante.


    Cumprimentos.
    ronaldojr1
    ronaldojr1
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 419
    Registrado : 01/08/2011

    [Resolvido]Grupo de Opcoes: Alternando Filtros Empty Re: [Resolvido]Grupo de Opcoes: Alternando Filtros

    Mensagem  ronaldojr1 18/10/2012, 21:02

    Grato pela colaboração, entao eu consegui de outro jeito. É difícil até de explicar, mas vou tentar dar uma resumida.

    pra conseguir descobrir a fase que nao teve retorno eu fiz o seguinte:

    1- Criei dois campos chaves para controle que são OK e Um Campo AutoNumeração

    2- criei uma função que marca para verdadeiro o campo "Ok" para os registros que possuem envio e retorno, mas antes de executar essa função primeiramente o codigo troca pra false o campo "Ok", ou seja, ele limpa tudo.

    3- No Case 1 fico assim:

    call save
    call setOK
    me.recordsource = "Select From * L_Andamento WHERE OK = 0 AND Operação = 'Envio'"

    4- Pronto meus 3 filtros funcionando perfeitamente cheers

    Comentarios gerais

    Pra conseguir o passo 2 foi dificil pq eu tive que fazer um loop encadeado, 3 ifs e 1 loop pra marcar o Ok apenas paro os registros que o loop encadeado marcar como verdadeiros. Vish foi mó treta.rsrss

    Mas vlw a pena

    De qualquer forma agradeço a colaboração Piloto
    Cumprimentos

    avatar
    Convidado
    Convidado


    [Resolvido]Grupo de Opcoes: Alternando Filtros Empty Re: [Resolvido]Grupo de Opcoes: Alternando Filtros

    Mensagem  Convidado 18/10/2012, 21:07

    Se resolveu... resolvido está.

    O Fórum agradece o Retorno.

    Cumprimentos.

    Conteúdo patrocinado


    [Resolvido]Grupo de Opcoes: Alternando Filtros Empty Re: [Resolvido]Grupo de Opcoes: Alternando Filtros

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 09:45