Como Hago para Imprimir un Campo en un Reporte

[[Lepe]]

En lugar de hacer el informe desde la tabla, monta una consulta que una las 2 o 3 tablas implicadas, y desde ahí haces el informe.

Uno simple es este:

Código SQL [-]
 select D.*, U.* From
Departamentos D, Usuarios U
where U.CodigoDepartamento = D.CodigoDepartamento

saludos

[esimon]

Gracias LEPE, por tu información estoy haciendo una prueba del Query que me enviaste en la consulta de Access y lo primero es que me piede que introduzca el valor del parametro U.Codigo_Depto, cuando introdusco un valor me repite el registro.

y cuando lo hago en el Quiery que quiero Activarlo me dice le Paramentro D.Codigo_Depto no tiene un Valor Predeterminado.

ya tengo un tiempo com ese incombeniente y no se como hacerlo, mil gracias de todo modo

[[Lepe]]

Con Access hace tiempo que no trabajo, a ver si tengo más suerte:

Código SQL [-]
select departamentos.*, usuarios.* 
from departamentos inner join usuarios on 
 departamentos.Codigo_Depto = usuarios.Codigo_Depto

Se supone que en Departamentos tienes el campo Codigo_Depto y lo mismo en Usuarios. Si tu campo se llama de otra forma, es cuestión de adaptarlo.

También puedes poner en el foro cuales son las tablas y los campos relacionados.

Básicamente es lo mismo, pero he quitado los alias "D" y "U" además de hacer un inner join.

Aquí tienes un manual de tantos de SQL, quizás te convenga buscar uno específico para Access.

http://www.programacion.com/tutorial/sql/8/

saludos

[esimon]

Lepe, disculpa todas las molestia causada el ultimo quiery que me enviaste funciona a pesar que tuve que hacerle algunos arreglos. este fue el que me enviaste.

select departamentos.*, usuarios.*
from departamentosinner join usuarios on 
departamentos.Codigo_Depto = usuarios.Codigo_Depto

tuve que hacerle esto, solo cambio de tablas.

SELECT Maestra.*, Departamento.*
FROM Maestra INNER JOIN Departamento ON 
Maestra.Codigo_Depto = Departamento.Codigo_Depto

Maestra es la Tabla que contiene todos los campos y con esa hago el reporte
y el reporte lo visualiso con esta instruccion.

procedure TFrm_Imprimir.SpeedButton1Click(Sender: TObject);
begin
	ppReport1.PrintReport;
end;

pero sale en blanco. hermano disculpa nuevamente por la falta de esperiencia
mil gracias trate de enviarte una grafica del fom y las tablas pero no me dejo subirla

[[Lepe]]

Empezado por esimon

Maestra es la Tabla que contiene todos los campos y con esa hago el reporte
y el reporte lo visualiso con esta instruccion.

pero sale en blanco. hermano disculpa nuevamente por la falta de esperiencia
mil gracias trate de enviarte una grafica del fom y las tablas pero no me dejo subirla

El quickReport tiene que tener en Dataset, la consulta que estamos construyendo.

Los QrDBText del Quickreport, deben tener el Dataset y el FieldName de la misma consulta.

Antes de mostrar el informe, tienes que abrir la consulta, y despues cerrarla. Hay muchas formas, una de ellas sería:

Código Delphi [-]
procedure TFrm_Imprimir.SpeedButton1Click(Sender: TObject);
begin
    adoquery1.Open;
    ppReport1.Preview;
    adoquery1.Close;
end;

Tambien puedes abrir la consulta en el OnCreate del Form, y cerrarla en el OnClose.

Como ves he puesto Preview para no gastar tantos folios .

saludos

[esimon]

Gracias manito por todas las informaciones brindada, sigo teniendo el mismo inconveniente.

en caso de que use una Label en el Reporte y el Evento OnPrint del Label, como yo hago para ir a buscar en la Tabla Departamento la Descripción del Departamento y moverla a la Tabla Maestra al Campo Descripción Departamento, para poder visualizar el campo en el Reporte.

• Departamento (tabla)
  
  Campo
  
  CodigoConsec_Depto Numerico *
  Codigo_Depto
  Descripcion_Depto
  

• Maestra (tabla)
  
  Campo
  
  Codigo_Consecutivo *
  Codigo_Depto
  Descripcion_Depto
  Codigo_Usuario
  Descripcion_Usuario
  Fecha
  Hora
  Concepto
  

mil gracia Lepe y disculpa nueva mente.

[[Lepe]]

http://www.qusoft.com/Downloaddoc.html

Ahí tienes un manual de QuickReports, de la misma web de Qusoft.

Creo que no me he explicado con claridad, o bien estas intentando hacer algo distinto

El inner join es una unión (en "memoria RAM") de 2 tablas por un campos que tienen en comun. En principio sería por departamento.CodigoConsec_depto y Maestra.Codigo_depto

Se supone que cuando añades un registro en la tabla maestra, escribes un valor en Maestra.Codigo_depto y ese valor coincide con Departamento.CodigoConsec_Depto, es decir Maestra.Codigo_Depto es una clave ajena (foránea, foreign key) de Departamento.CodigoConsec_Depto.

El hecho de que la consulta anterior te salga en blanca, es porque los campos de union de las 2 tablas no eran los correctos (yo no podía adivinar los nombres que tú le has dado).

Para realizar la union, solo necesitas los siguientes campos:
Departamento (tabla)
CodigoConsec_Depto Numerico *
Descripcion_Depto

Maestra (tabla)
Codigo_Depto

Y el sql de tu Query será:

Código SQL [-]
SELECT Maestra.*, Departamento.*
FROM Maestra INNER JOIN Departamento ON 
Maestra.Codigo_Depto = Departamento.CodigoConsec_Depto

Despues de establecer el SQL del Query, dale doble clic (al Tquery), aparece una ventanita, boton derecho y Add all Fields, aparecerá los siguientes campos:

Codigo_Consecutivo (de la tabla maestra)
Codigo_Usuario
Descripcion_Usuario
Fecha
Hora
Concepto
CodigoConsec_Depto
Descripcion_Depto

Si quieres ver realmente que tiene la consulta, asociala con un Grid.

Ahora ya puedes usar un QRDBTEXT para mostrar la Descripción del departamento, sin modificar las tablas.


saludos y espero se entienda.