¿Cómo cambiar index con tsbrowse?

¿Cómo cambiar index con tsbrowse?

Postby Leon Valenzuela » Tue Aug 04, 2009 4:16 pm

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.
Quiero hacer facturación electrónica...

Leon Valenzuela.
Santiago - Chile.
User avatar
Leon Valenzuela
 
Posts: 57
Joined: Tue Nov 04, 2008 2:08 pm
Location: Santiago - Chile

Re: ¿Cómo cambiar index con tsbrowse?

Postby mmercado » Tue Aug 04, 2009 6:54 pm

Hola León:
Leon Valenzuela wrote: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
manuelmercado at prodigy dot net dot mx
User avatar
mmercado
 
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

Re: ¿Cómo cambiar index con tsbrowse?

Postby Leon Valenzuela » Tue Aug 04, 2009 10:23 pm

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

Un Abrazo.
Quiero hacer facturación electrónica...

Leon Valenzuela.
Santiago - Chile.
User avatar
Leon Valenzuela
 
Posts: 57
Joined: Tue Nov 04, 2008 2:08 pm
Location: Santiago - Chile

Re: ¿Cómo cambiar index con tsbrowse?

Postby Leon Valenzuela » Wed Aug 05, 2009 7:02 pm

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


Code: Select all  Expand view  RUN
===========
   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é...
Quiero hacer facturación electrónica...

Leon Valenzuela.
Santiago - Chile.
User avatar
Leon Valenzuela
 
Posts: 57
Joined: Tue Nov 04, 2008 2:08 pm
Location: Santiago - Chile


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: MGA and 43 guests