Pasar parametros al Cystal Report

[Aztaroth]

Para pasar un parametro a Cyrstal Report 9.2 con Delphi 7, yo lo hice de esta manera y me funciona correctamente.

en el Command puse estta sentencia sql

SELECT empresas.RazonSocial, empresas.RFC, empresas.IMSS, empresas.repempresa, empresas.reptrabajadores,
Cursos.NOMBRECURSO, Cursos.CursoID, Cursos.DE, Cursos.HASTA,
Cursos.DURACION, Cursos.INSTRUCTOR, Cursos.AGENTE,
Empleados.NumeroEmpleado, empleados.nombrecomp,Empleados.RFC as EMPRFC,
Detalles.EMPDEPART, Departamentos.Descripcion
FROM "CURSOS" Cursos
INNER JOIN "DETALLES" Detalles
ON (Cursos.CURSOID = Detalles.CURSOID)
LEFT OUTER JOIN "EMPLEADOS" Empleados
ON (Detalles.EMPLEADOID = Empleados.NumeroEmpleado)
LEFT OUTER JOIN "DEPARTAMENTOS" Departamentos
ON (Detalles.EMPDEPART = Departamentos.Departamento)
INNER JOIN Empresas empresas
ON (cursos.empresaid = empresas.empresaid)
WHERE cursos.cursoid = {?CURSOS}
ORDER BY Empleados.NumeroEmpleado

donde {?CURSOS} es el nombre del parametro que quieres utilizar, previamente creado.


y ya en Delphi se le pasa el valor de esta forma, donde el parametro se define automaticamente cuando se asigna el nombre del reporte en tiempo de diseno.

reporte.ParamFields[0].CurrentValue := IntToStr( valor );

Ya se que este hile no debi ponerlo aqui pero espero que sirva de algo para algunos.

Luis Garza.