Report Con ADO Cuando manejo de GROUP ON no Funciona

[ruben Dario]

Tengo un probleam cuando genero un reporte quiero agruparlo, manejando ADO no me funciona se queda procesando como en un Ciclo me toca cancelar el proceso, cuando lo genero en formato DBF si funciona.

Anexo codigo.

Code: Select all  Expand view  RUN

    REPORT oReport ;
          TITLE  "REGISTRO DE REFERENCIAS CATEGORIAS",;
                 OemtoAnsi("");
          FONT   oFon1, oFon2, oFon3    PEN    oPen1,   oPen2 ;
          HEADER  " Fecha : "+dtoc(date()),  "Hora  : "+time(),    "Pagina: "+strzero(oReport:nPage,3)    RIGHT ;
          FOOTER OemtoAnsi(memvar->X_SIGLA+"       "+memvar->X_TPAQU )  CENTERED;
          PREVIEW 

         COLUMN TITLE "Codigo" DATA oDatos:Fields("catval"):Value    FONT 1   
         COLUMN TITLE "Descripcion" DATA oDatos:Fields("nomb_val"):Value     FONT 1  SIZE 30
         GROUP ON oDatos:Fields("refcat"):Value  HEADER "Referencia "+oDatos:Fields("refcat"):Value 
    END REPORT

     ACTIVATE REPORT oReport ON STARTPAGE StartPage(1,oReport) ON STARTLINE versombra(oReport);
              ON STARTGROUP oReport:NewLine()  WHILE nLinea <= nHasta


[Willi Quintana]

Antes de ACTIVATE REPORT te falta algo asi:

oPrn:bSkip := {|| oDatos:Skip(), SYSREFRESH() } ó
oPrn:bSkip := {|| oDatos:Next(), SYSREFRESH() } ó
oPrn:bSkip := {|| oDatos:Fetch(), SYSREFRESH() }

ACTIVATE REPORT.................

debes indicar como pasar de un registro a otro...

Salu2

[ruben Dario]

Antes de ACTIVATE REPORT te falta algo asi:

oPrn:bSkip := {|| oDatos:Skip(), SYSREFRESH() } ó
oPrn:bSkip := {|| oDatos:Next(), SYSREFRESH() } ó
oPrn:bSkip := {|| oDatos:Fetch(), SYSREFRESH() }

ACTIVATE REPORT.................

debes indicar como pasar de un registro a otro...

Salu2

Lo defini pero sigue igual, Lo curioso es que si no le coloco EL Grupo si funciona el reporte.