Foros del Web » Programación para mayores de 30 ;) » .NET »

dataset dinamico y evento imprimir en crystal reports

Estas en el tema de dataset dinamico y evento imprimir en crystal reports en el foro de .NET en Foros del Web. hola amigos del foro: Estoy creando un reporte con crystal report en visual basic 2008. He escuchado hablar acerca de los dataset dinamicos no entiendo ...
  #1 (permalink)  
Antiguo 25/06/2010, 17:08
 
Fecha de Ingreso: julio-2008
Mensajes: 52
Antigüedad: 13 años, 10 meses
Puntos: 0
dataset dinamico y evento imprimir en crystal reports

hola amigos del foro:

Estoy creando un reporte con crystal report en visual basic 2008. He escuchado hablar acerca de los dataset dinamicos no entiendo porque mi codigo no esta funcionando no se si este el problema en el codigo o en el diseño del reporte de donde estoy extrayendo los datos del data set tal vez no este dando en la opcion correcta o no este haciendo bien el llenado del dataset bueno anexo mi codigo para ver si alguien pudiera ayudarme se los agradeceria bastante.

Aqui lleno los datos de una lista a un dataset

Dim dset2 As New DataSetFechasEmpeos

Dim tablita2 As DataTable = dset2.Tables.Add("Items")

tablita2.Columns.Add("Fecha", Type.GetType("System.String"))

tablita2.Columns.Add("CobroRefrendo", Type.GetType("System.String"))

tablita2.Columns.Add("CobroDesempeo", Type.GetType("System.String"))

Dim dAtArOw2 As DataRow

Dim y As Integer

For y = 0 To ListaFechas.Count - 1

dAtArOw2 = tablita2.NewRow()

dAtArOw2("Fecha") = ListaFechas.Item(y).Fecha

dAtArOw2("CobroRefrendo") = ListaFechas.Item(y).Refrendo

dAtArOw2("CobroDesempeo") = ListaFechas.Item(y).Desempeno

tablita2.Rows.Add(dAtArOw2)

Next

CRs.CRV1.Refresh()

CRs.Text = "Boleta de empeo"

CRs.ShowDialog()

no se si este llenado este correcto pero si tengo datos en la lista ya lo he comprobado porque los mando imprimir en un msgbox y si hay

datos espero alguien pueda ayudarme.



Otra cosa que se me ha presentado es que en otro dataset solo me muestra los datos del ultimo registro

y el llenado de mi dataset lo hago de la siguiente manera:

Dim dset As New DataSetBoleta

Dim tablita As DataTable = dset.Tables.Add("Items")

tablita.Columns.Add("Cantidad", Type.GetType("System.String"))

tablita.Columns.Add("Clave", Type.GetType("System.String"))

tablita.Columns.Add("Descripcion", Type.GetType("System.String"))

tablita.Columns.Add("Comentario", Type.GetType("System.String"))

tablita.Columns.Add("Kilataje", Type.GetType("System.String"))

tablita.Columns.Add("Peso", Type.GetType("System.String"))

tablita.Columns.Add("Avaluo", Type.GetType("System.String"))

tablita.Columns.Add("Prestamo", Type.GetType("System.String"))

Dim dAtArOw As DataRow

Dim i As Integer

For i = 0 To Me.dgJoyasEmpeno.Rows.Count - 1

dAtArOw = tablita.NewRow()

dAtArOw("Cantidad") = Me.dgJoyasEmpeno.Item("ColCantidad", i).Value

dAtArOw("Clave") = Me.dgJoyasEmpeno.Item("ColClave", i).Value

dAtArOw("Descripcion") = Me.dgJoyasEmpeno.Item("ColDescripcion", i).Value

dAtArOw("Comentario") = Me.dgJoyasEmpeno.Item("ColComentario", i).Value

dAtArOw("Kilataje") = Me.dgJoyasEmpeno.Item("ColKilataje", i).Value

dAtArOw("Peso") = Me.dgJoyasEmpeno.Item("ColPeso", i).Value

dAtArOw("Avaluo") = Me.dgJoyasEmpeno.Item("ColAvaluo", i).Value

dAtArOw("Prestamo") = Me.dgJoyasEmpeno.Item("ColPrestamo", i).Value

tablita.Rows.Add(dAtArOw)

Next

Dim objRpt As New Boleta

objRpt.SetDataSource(dset.Tables(1))

CRs.CRV1.ReportSource = objRpt

otra cosa que necesito es saber el evento cuando ya termina de imprimir el reporte

y tambien necesito saber si termino o no de imprimir porque necesito hacer cosas internamente

gracias por sus respuestas
  #2 (permalink)  
Antiguo 26/06/2010, 08:49
Avatar de CarmenRocio  
Fecha de Ingreso: junio-2010
Ubicación: Perú - Lima - Chorrillos
Mensajes: 116
Antigüedad: 11 años, 11 meses
Puntos: 8
Respuesta: dataset dinamico y evento imprimir en crystal reports

hola carcr como estas dime trabajas con clases o directo te puedo ayudar en algo yo trabajo con clases y solo llano a mi capa de dato para generar mi reporte de esta forma.
en mi capa cliente en el boton reporte llano asi.

BOTON REPORTE

variableinfo = New ENTIDAD
variableinfo = ccombo.SelectedValue 'si es que tiene paramtro el reporte
Dim variablereporte As New cristalreport
variablereporte.SetDataSource(capalogica.funcio(va riableinfo))
fShowReporte(variablereporte, True, "detalle")


yo trabajo con entidad espero te sirva de ayuda nos vemos

Etiquetas: crystal, dataset, dinamico, reports, eventos
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta

SíEste tema le ha gustado a 1 personas




La zona horaria es GMT -6. Ahora son las 02:25.