Page 1 of 1

preview: esta visible icono excel pero no hace nada-SOLUCION

Posted: Thu Feb 27, 2020 7:00 pm
by artu01
Fivewineros:
No me funciona el icono para exportar a excel desde el preview del report, he compilado report.prg y rpreview.prg que viene con el fwh 17.12 conjuntamente con mis prgs y tampoco nada, el icono del excel se ve en el preview pero al pasar el mouse sobre éste es como que no hay ningún boton
codigo fuente

Code: Select all

    REPORT oRpt                                                        ;
      CAPTION 'Listado de Clientes'                                    ;
      FONT oFont1, oFont2, oFont3, oFont4, oFont5                      ;
      HEADER cNombre, "Fecha:  "+DTOC(DATE()), "Almacen.soft", "" RIGHT;
      TITLE 'Listado de Clientes'," " CENTER                           ;
      FOOTER "Página: "+STR(oRpt:nPage,3) RIGHT             

      COLUMN TITLE "COD"                        ;
            DATA oRs:Fields("Codigo"):Value     ;
            SIZE 11
      COLUMN TITLE "RUC"                        ;
            DATA oRs:Fields("Ruc"):Value        ;
            SIZE 11
      COLUMN TITLE "RazOn Social"               ;
            DATA oRs:Fields("Ng"):Value         ;
            SIZE 30
      COLUMN TITLE "DIRECCION"                  ;
            DATA oRs:Fields("Di"):Value
      COLUMN TITLE "TELEFONO"                   ;
            DATA oRs:Fields("Te"):Value
   END REPORT

   IF oRpt:lCreated
      oRpt:bSkip := { ||  oRs:MoveNext()  }
   ENDIF

   ACTIVATE REPORT oRpt While !oRs:Eof() 

   oRs:MoveFirst()

   oFont1:End()
   oFont2:End()
   oFont3:End()
   oFont4:End()
   oFont5:End()
 
Hay alguna intruccion por agregar o quitar en el report.prg o rpreview.prg?

Gracias por su ayuda

Re: rpreview: esta visible icono excel pero no hace nada

Posted: Thu Feb 27, 2020 7:24 pm
by karinha
Mira en RPreview: WHEN ::CanExportToExcel

http://www.fivetechsupport.com/forums/v ... =6&t=36983

Saludos.

Re: rpreview: esta visible icono excel pero no hace nada

Posted: Fri Feb 28, 2020 11:35 am
by nageswaragunupudi
Please insert this code

Code: Select all

oRpt:bInit := { || oRs:MoveFirst() }
 
before

Code: Select all

   ACTIVATE REPORT oRpt While !oRs:Eof()

 
If you do this Excel button is activated and you can export the report to Excel.

Re: rpreview: esta visible icono excel pero no hace nada

Posted: Fri Feb 28, 2020 3:47 pm
by artu01
Gracias joao por tu ayuda, lo solucione con la sugerencia de Mr. Rao
Thank you Master Rao!!