Cursor para Reporte

Buenas qué tal Víctor.
Quisiera me ayudaras en lo siguiente:
Tengo la creación del siguiente cursor:
SELECT a.cedula,b.nombre,b.apellido1,b.apellido2,b.nacimiento,a.sexo,a.lug_atencion,a.diagnostico,;
FROM Tabla1 a,Tabla2 b;
WHERE ((a.cedula==b.cedula AND a.cedula==intCedula ))AND fecha>=Fecha_Ini .AND. Fecha <= Fecha_Fin;
ORDER BY fecha DESC INTO CURSOR c1 READWRITE
SELECT c1
GO TOP
IF EOF()
Fecha_Ini=CTOD(' / / ')
Fecha_Fin=CTOD(' / / ')
MESSAGEBOX ('No Existen Registros de Este Cliente en éstos rangos de FECHAS',48,"REPORTE FUERA DE RANGOS")
ThisForm.txt_Fecha_Ini.SetFocus()
RETURN
ELSE
REPORT FORM "c:\archivos de programa\comp_gestion_system\report\rpt05.frx" TO PRINTER PROMPT PREVIEW
ENDIF
////////////////////////////
A- Cómo hago para que el reporte muestre solamente los datos de los campos que contengan una W, ya que la tabla1 en las columnas lug_atención y diagnóstico se almacena una "P" o una "W", entonces necesito mostrar cédula, nombre, apellido1, apellido2, nacimiento, sexo, lug_atención y diagnóstico solamente de los campos que tengan una W, es decir los campos que contienen una P en lug_atención y diagnostico no se mostrarán en el reporte (ni cedula, ni nombre, ni apellidos, ni nacimiento, etc), los datos de éste estarán excluidos del reporte por que no cumplen con "w".
Gracias de antemano, espero me haberme explicado.

1 Respuesta

Respuesta
1
A- Intenta:
Report Form rpt05 For lug_atencion = "W"

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas