[Resolvido]Pegar dados do campo Estado na tabela só que esta armazenado o código"26" e não o Nome "SP"

Ola mais uma vez!

Meu relatório esta com um campo que tem como origem o Campo Estado na tabela Entrevistado,
acontece que esse campo é preenchido no form por escolha num Caixa de combinação (que tem o Código 26 que é = SP) combinada com a caixa de combinação Cidade. Aparece na tela o Estado de SP só que armazena o Código 26 no Campo Estado da tabela.

O Problema é que vi agora que no Relatório esta imprimindo o Código da Estado e não a Sigla SP.

Como possso contornar esse problema, não sei se expliquei direito.

Obrigado.

Na caixa texto utilize o Dlookup...Pelo visto o nome do estado está em outra tabela e seu código é o 26 então:


=Dlookup("SeuCampoNomeEstado","SuaTabela","Código =" & Me.CaixaTextoContendoONum26 & "")



Cumprimentos.

Olá,

Não consegui ou não entendi!

Substitui na CxTexto do Relatório a origem para sua sentença substituindo os devidos noems.

Nem deu erro e continua o numero 26.

Meu relatório é alimentado por uma consulta entre 3 tabelas, sendo; BaseDados, Entrevista e Entrevistado
nessa última é que esta o Campo "Estado" que esta armazenado o Código do Estado "26".

Agora para fazer a criação dos campos existe uma Tabela Cidades com os nomes das Cidades e tabela Estados onde tem as siglas dos estadoe e os respectivos códigos. Será nessa que tem que fazer a Busca?

Vou tentar!
Não deu certo!

Estou colocando parte do MDB para analise
assim dá para ver de onde vem o a Sigla do estado que preenchida pelo FormGeral no SubEntrevistado campo Caixa de Combinação UF que fica como SP, mas armazena na Tabela Entrevistado campo Estado como 26.

Como a consulta o campo estado é 26 para alimentar o Relatório não sei como fazer.

Boas Flecha..

Sua combo tem duas colunas da tabela onde busca as cidades...

a primeira coluna é o Código = 26
a segunda é o nome = SP

Como seu relatorio está buscando os dados em uma outra tabela, nesta fica gravada o código de referencia na tblCidades...

Então o Dlookup resolve isto.

Crie uma outra caixa texto no relatorio e dentro desta:

=Dlookup("SeuCampoNomeEstado",TabelaCidades","Código =" & Me.CaixaTextoContendoONum26 & "")

Onde:

SeuCampoNomeEstado = é o nome do campo onde está o valor SP
TabelaCidades = é o nome da tabela onde estão armazenadas as cidades
CaixaTextoContendoONum26 = é o nome da caixa texto no relatorio onde aparece o numero 26


Cumprimentos.

O´lá flexa,

Tenta o seguinte:

Incluir na tua consulta a tabela Cidades e colocar mais um campo na consulta (nome da cidade).
Com isso deverá aparecer também o nome da cidade.

Nivaldo.

Pessoal,

Não é o nome da cidade que quero e sim a Sigla, é na tabela Estado que tem dois campos Cod_uf e nome_uf.

primeiro vou tentar a sugestão de incluir a tabela estado na consulta e se for o caso incluo tb a de Cidades.

Depois retorno.

Obrigado

Renomeie a caixa texto onde está o numero.. de estado para: txtEstado

Dentro dela:

=DPesquisa("Nome_uf";"estados";"cod_uf =" & [Estado])

Testado e funcional.

Cumprimentos.

Eu de novo!

Coloquei na nova cx texto como origem:

=Dlookup("Cod_Uf",Estados","Código =" & Me.estado & "")
Dá erro de Sintaxe

Inclui a Tabela Estados na Consulta e agora ela aparece na Origem dos campos do Relarorio
Substitui o Txt com o Numero 26 pelo txt nome_UF.
Ufa Funcionou.

Piloto

Essa última também funcionou!

Obrigado a todos e até uma próxima.

Resolvido

Por favor leia com atenção o post de número 8. Sua solução está la. Testado e funcionando.

A solução do colega nivaldo também é funcional.

Ambas funcionam

Cumprimentos.

Obrigado a todos.

Funcionaram

=Dlookup("Cod_Uf",Estados","Código =" & Me.estado & "")
Dá erro de Sintaxe

Em caixas texto utiliza-se ";" (ponto e vírgula)

A palavra código coloquei como exemplo... Na sua tabela é cod_uf

O primeiro campo da exmpressão com o Dlookup é o que será retornado (em vermelho) portando o correto é nome_uf


Cumprimentos.

Só faltou o resolvido...

Desculpe

Eu tinha clicado em Resolvido mas ficou normal.

Clicando novamente resolvido.

Não há do que se desculpar... Acontece.

O Fórum agradece o Retorno.

Bom trabalho.