IPB

Bem-vindo, visitante ( Entrar | Registrar )

 
Reply to this topicStart new topic
Relatório De Consulta
Eriston Mattos
post Nov 21 2018, 09:38 AM
Post #1


Calouro
*

Grupo: Membros
Posts: 8
Registrado: 26-August 18
Membro N°: 44.347



Esqueci de deixar a senha do BD, mil perdões aos membros.

SENHA: 123

Att,
Go to the top of the page
 
+Quote Post
Eriston Mattos
post Nov 20 2018, 04:01 PM
Post #2


Calouro
*

Grupo: Membros
Posts: 8
Registrado: 26-August 18
Membro N°: 44.347



Boa tarde aos caros,

Estou com problema na impressão de um relatório gerado após uma consulta em um formulário,
usei a função Dlookup no formulário, assim ele me retorna todos os dados de determinada pessoa
quando insiro o número do CNS dela, coloquei um botão pra abrir o relatório, relatório aberto,
aparecem todos os dados da consulta, mas na impressão só aparece o erro "#Nome?" no lugar dos
dados... A chave primária é NUM_CNS...

O formulário de consulta é o "Por Usuário" - Consulta Individual

Como resolver isso?
coloquei os prints em zip anexos, mas dá aquivo vazio aqui...
Uso o Access 2007 e o 2010.
Obs.: tentei exportar pra PDF, mas tbm aparece o mesmo erro no pdf.

Eis a função colocada no evento após atualizar no formulário:

Private Sub txt_NUM_CNS_AfterUpdate()
Me.txt_NOME = DLookup("NOME", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_DT_NASC = DLookup("DT_NASC", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_DT_INICIO = DLookup("DT_INICIO", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_CPF = DLookup("CPF", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_CIDADE = DLookup("CIDADE", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_Contato = DLookup("CONTATO", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_OCUPACAO = DLookup("OCUPACAO", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_TIPO_EMPRESA = DLookup("TIPO_EMPRESA", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_NOME_EMPRESA = DLookup("NOME_EMPRESA", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_CNPJ_CPF = DLookup("CNPJ_CPF", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_STATUS = DLookup("STATUS", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_NUM_CAIXA = DLookup("NUM_CAIXA", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_PRATELEIRA = DLookup("PRATELEIRA", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_ULT_ANDAMENTO = DLookup("ULT_ANDAMENTO", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")
Me.txt_SEXO = DLookup("SEXO", "Tbl_Processo", "NUM_CNS ='" & Me.txt_NUM_CNS & "'")

End Sub

E quando imprime, aparece assim lá:

CNS do Usuário: Nome: Data de Nasc: Data de Início:
#Nome? #Nome? #Nome? #Nome?
CPF: #Nome? Cidade: #Nome? Telelefone: ( ) #Nome?
Ocupação: #Nome? Nome da Empresa: #Nome?
CNPJ/CPF: #Nome? Situação: #Nome? Nº da Caixa: #No Prateleira: #No
Último Andamento: #Nome?

Eis o link para quem quiser olhar o BD: https://www.dropbox.com/s/s84l9uwpsqult7s/P...EST%20.zip?dl=0

Att,
Go to the top of the page
 
+Quote Post

Reply to this topicStart new topic
2 usuário(s) está(ão) lendo este tópico (2 visitantes e 0 usuários anônimos)
0 membros:

 

Modos de Exibição: Padrão · Mudar para: Linear+ · Mudar para: Outline


Versão Simples Horário: 11th December 2018 - 12:12 AM