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

[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  Expand view  RUN

    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

[karinha]

Mira en RPreview: WHEN ::CanExportToExcel

http://www.fivetechsupport.com/forums/viewtopic.php?f=6&t=36983

Saludos.

[nageswaragunupudi]

Please insert this code

Code: Select all  Expand view  RUN

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

before

Code: Select all  Expand view  RUN

   ACTIVATE REPORT oRpt While !oRs:Eof()

 

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

[artu01]

Gracias joao por tu ayuda, lo solucione con la sugerencia de Mr. Rao
Thank you Master Rao!!