Boletín mugperu Digital - Julio 2009!
  Search 
Friday, February 10, 2012 ..:: Foros de Discusión ::.. Register  Login
Foros MUGPERU Minimize
Subject: Problemas con Field Definitions Only (TTX)
Prev Next
You are not authorized to post a reply.

Author Messages
HDRESDA
Posts:6

02/02/2007 08:59 AM  
Estimado amigos

Tengo un problema con los reportes donde uso Field Definitions Only (TTX),
la version del Crystal es 10 y lo ejecuto de una aplicacionde VB 6.

El punto es que la primera vez funciona bien la primera ejecucion, pero cuando selecciono otros filtro ya no responde la consulta en la linea donde hago uso SetDataSource. 

Le muestro parte del codigo

donde:

ShowReport : es el formulario que muestra el formulario
rs : es la variable recordset donde almaceno toda la data


Private oCR                 As CRAXDDRT.Report
Private crxApplication      As New CRAxdrt.Application

    Set rs = OnLoadData()
    Set crxApplication = New CRAxdrt.Application
    Set oCR = crxApplication.OpenReport(VIARPT & "RPT0600.RPT", 1)

    Set oShowReport = New ShowReport
    Set oShowReport.oCR = oCR
   
    oShowReport.oCR.DiscardSavedData
    oShowReport.oCR.Database.SetDataSource rs, 3, 1
   
    oShowReport.CRViewer.DisplayGroupTree = False
    oShowReport.CRViewer.EnableSelectExpertButton = True
    oShowReport.Show vbModal
   
    Set rs = Nothing
    Set oShowReport = Nothing
    Set oCR = Nothing
    Set crxApplication = Nothing

Como repito este codigo es el formulario donde se ingresa los filtros y que luego invoca al formulario ShowReport para que muestre el reporte.


Tienen alguna idea de lo que puede estar pasando, otro dato es que termino la aplicacion con el boton salir pero no termina totalmente, es  como si se quedara algo y que la unica forma de terminarlo es cerrando a la mala el VB.


Saludos

Hans Dresda
You are not authorized to post a reply.



ActiveForums 3.7
        
Copyright 2001-2012 MUGPERU   Terms Of Use  Privacy Statement