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

    Retirar valores duplicados da string

    avatar
    guto_coimbra
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 8
    Registrado : 19/02/2013

    Retirar valores duplicados da string Empty Retirar valores duplicados da string

    Mensagem  guto_coimbra 24/6/2014, 15:36

    Pessoal,

    Desenvolvi o código abaixo no intuito de "varrer" o banco e ir identificando o número da NF quando atendesse ao critério.

    Set Rst = CurrentDb.OpenRecordset("SELECT str(IncNº_NF)+'-'+str(sSérie) FROM TAB_MOVIMENTAÇÃO_CENTROS_FILTRO_PB WHERE Nº_Doc_Material = " & intMAT)

    Do While Not Rst.EOF
    ListaDoc_2 = Replace(Rst(0), " ", "") & ", " & Trim(ListaDoc_2)
    Rst.MoveNext
    Loop


    Acontece que na tabela acima tenho valores repetidos e por este motivo me retornam o número da msm NF duas vezes.
    Ficando a variável desta forma (exemplo): ListaDoc_2 = 101, 102, 102

    Gosteria de saber como retirar essa duplicidade da variável, ao final da varredura. (ListaDoc_2 = 101, 102)
    daniloreiis
    daniloreiis
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 338
    Registrado : 14/02/2011

    Retirar valores duplicados da string Empty Re: Retirar valores duplicados da string

    Mensagem  daniloreiis 24/6/2014, 15:45

    Olá bom dia!

    tente colocar um group by

    assim:

    Código:

    SELECT str(IncNº_NF)+'-'+str(sSérie) FROM TAB_MOVIMENTAÇÃO_CENTROS_FILTRO_PB WHERE Nº_Doc_Material = " & intMAT
    GROUP BY str(IncNº_NF)+'-'+str(sSérie)


    Acho que resolve.


    .................................................................................
    Att, Danilo Reis
    -------------------------------------------------------------------------------------------------------------------------------------------------

    Se alguém não quiser trabalhar, não coma também.
    2 Tessalonicenses 3:10

      Data/hora atual: 21/11/2024, 16:01