[Resolvido]Comparar cinco campos data em uma consulta

Bom dia!

Tenho um banco de dados no qual possuo cinco datas de nascimento (Dt_Nascimento1,2,3,4,5) para cada um dos dependentes do meu cliente. Cada dependente é marcado com V (vitalício, por exemplo, se for esposa) ou T (temporário, se for filho). Todas as datas e as suas qualificações (V ou T) estão no mesmo registro (linha) do cliente.

Assim, gostaria de saber se há alguma função do Access onde, em uma consulta, eu consiga comparar cinco campos de um mesmo registro do cliente (data1,2,3,4,5) e demonstre qual é a menor das datas (O mais novo!) para cada um dos dois tipos de dependentes (T ou V).

Nao gostaria de usar o IF (SeImed), pois são cinco campos diferentes, com a variação de ser T ou V, logo o IF ficaria muito grande e confuso.

Muitas vezes os próprios nomes dos campos também mudam (ex.dt_nascimento1 para Data_Nascimento1), por isto também não gostaria de usar o VB.

Mas se não for possível através de consulta, qualquer ajuda em IF ou VB também será bem recebida.

Obrigado

PS: Já fiz uma busca no Forum e só encontrei a solução com IF, comparando apenas dois campos.

boas
faz um select com a funçao «min» deve dar sem nunca ter feito.

cumps
acao

Olá, seja bem vindo ao fórum!

Pelo exposto, me parece que a estrutura do banco é que não está bem montada. O correto seria você ter uma tabela só para dependentes, aonde cada dependente ficaria em um registro separado. Esses registros dessa tabela seriam ligados ao titular através da chave primária deste. Pense na possibilidade de alterar isso,incluindo a tabela de dependentes. Tambem é necessário padronizar os nomes dos campos. Não entendi essa parte de que o nome do campo pode ser diferente. Se você criar a tabela de dependentes, tambem resolve esse problema.

Esta tabela é primária, vem pronta de outras pessoas.

Para fazer um banco de dados diferente, eu teria que dividir a tabela primaria (aquela que eu obtenho de outras pessoas - com os nomes dos campos prontos - e refaze-la)

Seria uma opção, mas eu ainda vou tentar algo mais simples. Inclusive um If ou um VBA.

Esqueci de dizer que o meu access é o 2003, mas se tiver alguma solução em no 2007, eu migro.

Obrigado.

E nas tabelas que você recebe, tem alguma fidelidade entre o número e posição dos campos mesmo com nomes diferentes?

Os campos podem mudar de nome ou posicao na tabela (ou seja a data pode vir antes ou depois do tipo, mas isto pode ser facilmente ajeitado), mas nao muda de tipo de dados. E serao sempre cinco datas.

boas
tenha em conta tambem a extrutura case:

Select Case quantidade
Case 1
call rotina1()
Case 2
call rotina2()
Case 3
call rotina3()
Case else
call rotina4()
End Select

e a if pode comparar mais que duas situações.

veja este exemplo do macoratti.

http://www.macoratti.net/vbn_econ.htm
cumps
acao

Boa tarde, rafamaga

Os campos mudam de nome? É anormal para uma base de dados e parece-me que, assim, será difícil comparar pois não podemos planear que campos o access irá comparar

Uma forma de se conseguir tal fato tambem pode ser concatenando os campos separados por ponto e vírgula e então utilizar o Split para separá-los e verificar um a um se é data. Se for, marca o número do vetor. Algo como:

Código:

Dim Campos As String, Checar As Variant, NCampo As Integer, NDate As String

Campos = rs(0) & ";" & rs(1) & ";" & rs(2)... ";" & rs(15)
Checar = Split(Campos, ";")

NDate = ""

For NCampo = 0 To UBound(Checar)
    If IsDate(CDate(Checar(NCampo))) Then
        If NDate = "" Then
            NDate = NCampo
        Else
            NDate = NDate & ";" & NCampo
        End If
    End If
Next

Pronto! Separamos todos os campos tipo data (se tudo der certo). Agora - se tudo deu certo - Pode-se fazer outro Split na variável NDate para separar os números dos campos Data.

Tópico resolvido, por falta de retorno atempado.