¿Cómo cambiar index con tsbrowse?

[Leon Valenzuela]

Hola amigos del foro, nuevamente me acerco a ustedes a ver si me pueden ayudar un poco.

Tengo una tabla con 5 indices, y necesito alternarlos pinchando el "Header" del campo en una TSBrowse...

A quien me pueda ayudar en este tema, le estaré muy agradecido.

[mmercado]

Hola León:

Tengo una tabla con 5 indices, y necesito alternarlos pinchando el "Header" del campo en una TSBrowse...

Al definir las columnas cuyos datos controlan los índices, usa la cláusula ORDER <cNombre_del_indice>.

Ejemplo:

ADD COLUMN TO oBrw DATA MiDbf'->Codigo TITLE "Código" ORDER "Codigo"
ADD COLUMN TO oBrw DATA MiDbf'->Nombre TITLE "Nombre" ORDER "Nombre"

Un abrazo.

Manuel Mercado

[Leon Valenzuela]

Manuel, usted como siempre no me defrauda, muchas gracias MAESTRO.

Un Abrazo.

[Leon Valenzuela]

Con un sólo index me resultó bien, pero cuando agregué más indices, me arroja el siguiente error...

Code: Select all | Expand

===========
   Path and name: D:\FWH\Bakery\WCCCLi.exe (32 bits)
   Size: 4,329,984 bytes
   Time from start: 0 hours 4 mins 4 secs 
   Error occurred at: 04/08/2009, 19:28:34
   Error description: Error BASE/1132  Bound error: array access
   Args:
     [   1] = A   { ... }
     [   2] = N   9

Stack Calls
===========
   Called from:  => TSBROWSE:GOEND(4687)
   Called from:  => TSBROWSE:KEYDOWN(5670)
   Called from:  => TWINDOW:HANDLEEVENT(0)
   Called from:  => TCONTROL:HANDLEEVENT(0)
   Called from:  => TSBROWSE:HANDLEEVENT(6412)
   Called from: .\source\classes\WINDOW.PRG => _FWH(0)
   Called from:  => DIALOGBOX(0)
   Called from:  => TDIALOG:ACTIVATE(0)
   Called from: .\CTACLI.PRG => CTA_CTE(347)
   Called from: .\CTACLI.PRG => (b)SELECCTION(216)
   Called from:  => TSBROWSE:LDBLCLICK(6154)
   Called from:  => TWINDOW:HANDLEEVENT(0)
   Called from:  => TCONTROL:HANDLEEVENT(0)
   Called from:  => TSBROWSE:HANDLEEVENT(6412)
   Called from: .\source\classes\WINDOW.PRG => _FWH(0)
   Called from:  => WINRUN(0)
   Called from:  => TMDIFRAME:ACTIVATE(0)
   Called from: .\WCCCLI.PRG => MAIN(519)

Por qué?, no lo sé...