Pasar Recordset a SubReport de Crystal
Publicado por Agustin (4 intervenciones) el 28/01/2009 13:31:50
Buenas, solicito su ayuda.
Estoy programando en VB6 con CR12.
El escenario es el siguiente:
Desde una libreria leo un archivo XML el cual llena un Recordset. Tengo que imprimir un reporte hecho en Crystal que tiene un subreport. Hasta ahora puedo pasarle los datos al reporte principal de la siguiente manera:
Dim ds As ADODB.Recordset
Dim obj_DOMDocument As DOMDocument
Dim bOk As Boolean
Set obj_DOMDocument = New DOMDocument
Set ds = New ADODB.Recordset
bOk = obj_DOMDocument.Load(strXMLPath + " ecibo_" + CStr(strComprobante) + ".xml")
ds.Open obj_DOMDocument
crReport.Database.SetDataSource ds
Mi duda es como hacer para pasarle otro recorset al SubReport
Por ejemplo, en versiones anteriores se podia hacer lo siguiente:
CrystalReport.SubreportToChange = "SubReport1"
pero en esta version no se puede. ¿Alguna idea?.
Desde ya muchas gracias.
Saludos!
Estoy programando en VB6 con CR12.
El escenario es el siguiente:
Desde una libreria leo un archivo XML el cual llena un Recordset. Tengo que imprimir un reporte hecho en Crystal que tiene un subreport. Hasta ahora puedo pasarle los datos al reporte principal de la siguiente manera:
Dim ds As ADODB.Recordset
Dim obj_DOMDocument As DOMDocument
Dim bOk As Boolean
Set obj_DOMDocument = New DOMDocument
Set ds = New ADODB.Recordset
bOk = obj_DOMDocument.Load(strXMLPath + " ecibo_" + CStr(strComprobante) + ".xml")
ds.Open obj_DOMDocument
crReport.Database.SetDataSource ds
Mi duda es como hacer para pasarle otro recorset al SubReport
Por ejemplo, en versiones anteriores se podia hacer lo siguiente:
CrystalReport.SubreportToChange = "SubReport1"
pero en esta version no se puede. ¿Alguna idea?.
Desde ya muchas gracias.
Saludos!
Valora esta pregunta
0