----- Original Message -----

From: Gerardo J. Biagiotti

To: guvoaII@...

Sent: Friday, September 29, 2006 4:56 PM

Subject: RE: [guvoaII] Parámetros en Report Pro.

INSTALAR REPORT PRO EN VISUAL OBJECTS

-----------------------------------------

 

1) En el proyecto (ej.: Default Project) importar el módulo RP2RDD32.AEF

 

2) En la aplicación importar el módulo RP2_HOOK.MEF

 

3) Copiar los siguientes DLL en el directorio donde está el ejecutable de la aplicación:

            - RP2RDD32.DLL

            - RPEXPORT.DLL

            - RP2ENG32.DLL

            - LLB32.DLL (Gráficos)

            - LLI32.DLL (Gráficos)

            - LLO32.DLL (Gráficos)

 

4) Incorporar la librería RP2RDD32.LIB a la aplicación.

 

5) Deberá generarse por primera vez el ejecutable para poder utilizar el Report PRO.

 

 

 

Gerardo J. Biagiotti
Analista de Sistemas
(2580) Marcos Juárez
Córdoba - Argentina

Mail:  gjbiagiotti@...
MSN: gerardo_biagiotti@...
         gjbiagiotti@...
         gjbiagiotti@...

---

De: guvoaII@... [mailto:guvoaII@...] En nombre de AdeSistemas
Enviado el: Viernes, 29 de Septiembre de 2006 04:42 p.m.
Para: guvoaII@...
Asunto: Re: [guvoaII] Re: [Guvoa II] Parámetros en Report Pro.

 

lo que pasaste esta bastante entendido para mi, creo, pero me surge un problema, la clase rpreport{ },

printpreview( ),showprintdlg( ) que utilizas son del reportpro?, por lo que entiendo, en que lugar hago referencia al reporpro.

para que me las tome. 

 

Muchas Gracias

 

Luengo Sergio
Analista de Sistemas
General Pico
La Pampa

----- Original Message -----

From: Gerardo J. Biagiotti

To: GUVOA II

Sent: Friday, September 29, 2006 9:56 AM

Subject: [guvoaII] Re: [Guvoa II] Parámetros en Report Pro.

 

Sergio, te adjunto el MEF para que veas la ventana y los controles que contiene.

 

Gerardo J. Biagiotti
Analista de Sistemas
(2580) Marcos Juárez
Córdoba - Argentina

Mail:  gjbiagiotti@...
MSN: gerardo_biagiotti@...
         gjbiagiotti@...
         gjbiagiotti@...

 

Gerardo: o quien entienda.

 

Estoy recien comenzando con la implementacion de listados en CAVO, y tengo muchas dudas, espero que me tengan paciencia.

Este listado que hace mucho tiempo lo pasaste por correo me interesa, pero tengo algunas dudas, coloco en rojo las dudas en el ejemplo

 

Muchas gracias

 

Luengo Sergio
Analista de Sistemas
General Pico
La Pampa

----- Original Message -----

From: Gerardo J. Biagiotti

To: guvoa@...

Sent: Tuesday, May 25, 2004 3:51 PM

Subject: RE: [guvoa] Parametros en Report Pro

 

va un ejemplo:

 

METHOD Imprimir( ) CLASS Clientes_Padrones  // esta es una ventana datadialog?

 

            LOCAL oReport AS OBJECT

            LOCAL aTablas AS ARRAY

 

            aTablas:={{"Clientes", cPath+"Clientes.DBF", cPath+"Clientes.CDX", ,"DBFCDX"}}

 

            DO CASE                       // este objeto es un pushbutton?

                        CASE SELF:oCCRB_Completo:Pressed

                                                      // este rpreport donde lo definis y como, que hace?

                                   oReport := RpReport{SELF,cUnidadInstala+"Clientes_Padrón_Completo.rpt",,aTablas}

                        CASE SELF:oCCRB_Empresa:Pressed

                                   oReport := RpReport{SELF,cUnidadInstala+"Clientes_Padrón_Empresa.rpt",,aTablas}

                        CASE SELF:oCCRB_Inscripciones:Pressed

                                   oReport := RpReport{SELF,cUnidadInstala+"Clientes_Padrón_Inscripciones.rpt",,aTablas}

                        CASE SELF:oCCRB_Personales:Pressed

                                    oReport := RpReport{SELF,cUnidadInstala+"Clientes_Padrón_Personales.rpt",,aTablas}

            ENDCASE

 

            IF oReport:IsValid

                        oReport:Connect2Source()

 

                        oReport:SetVariableValue( "cEmpresa"   , ScEmpresa)   //cEmpresa tenés que definirla en el reporte y ScEmpresa es una variable creada en VO.

                        oReport:SetVariableValue( "cTitulares" , ScTitulares )

                        oReport:SetVariableValue( "cDomicilio" , ScDomicilio)    // esto va en el encabezado del listado?

                        oReport:SetVariableValue( "cLocalidad" , ScLocalidad )

                        oReport:SetVariableValue( "cTelefono"  , ScTelefono )

                        oReport:SetVariableValue( "cPublicidad", ScPublicidad )

   

                                      // este objeto es un radiobutton para decir si va por impresora o pantalla o que tipo de obj es

                        IF SELF:oDCCB_Previsualiza:Checked

                           oReport:PrintPreview("Padrón de Clientes",,"Padrón de Clientes.","Imprimiendo Listado...") //,,SW_SHOWMAXIMIZED,ZOOM_PAGE_WIDTH)

                        ELSE

                                   IF oReport:ShowPrintDlg()

                                               oReport:Print("Padrón de Clientes",,"Padrón de Clientes.","Imprimiendo listado...") //,,SW_SHOWMAXIMIZED)  //,ZOOM_PAGE_WIDTH)

                                   ENDIF

               ENDIF

 

               oReport:Close()

            ELSE

                        Mensaje("El Reporte no puede imprimirse."+CHR(10)+"Verifique el estado de la impresora.")

            ENDIF

 

RETURN

 

 

Muchisimas gracias si me podes dar una mano, y sino decime donde existen ejemplos del uso de los listados programados con report pro, porque report pro no tiene ningun ejemplo.

 

O alguien de la lista que me de una mano.

 

 

 

__________ Información de NOD32, revisión 1.1781 (20060928) __________

Este mensaje ha sido analizado con NOD32 antivirus system
part000.txt - Esta correcto
part001.htm - Esta correcto
Clientes Padrones.mef - Esta correcto

http://www.nod32.com

__________ Información de NOD32, revisión 1.1781 (20060928) __________

Este mensaje ha sido analizado con NOD32 antivirus system
part000.txt - Esta correcto
part001.htm - Esta correcto

http://www.nod32.com