xBrowse - Columna Descendente (Solucionado)

xBrowse - Columna Descendente (Solucionado)

Postby MarioG » Sat Jun 01, 2013 11:56 pm

Estimados;
Tengo una DBF, administrada con ADS, y un campo numerico del cual genero un índice que indico sea Descendente
Cuando ejecuto la App, la vista es con el orden deseado, aunque el ícono de la cabecera de columna, lo muestra como Descendente
Mi codigo es el siguiente:
Code: Select all  Expand view
  REDEFINE XBROWSE ::oBrwCab ID 300 OF oDlg FONT ::hFont["Tahoma15"] ;
            COLUMNS "FFeVta01", "FHsVta01", "FDocInt1", "FCabFa04" ;
            ALIAS   h0["CabFacVta"]:cAlias AUTOSORT
...
   WITH OBJECT ::oBrwCab:FDocInt1
      :cHeader:= "Código"
      :nHeadStrAlign:= :nDataStrAlign:= AL_LEFT
      :nWidth := 85
      :cOrder:= "D"         // No obstante muestra como "A"

      :bStrData:= {|| Str( (h0["CabFacVta"]:cAlias)->FDocInt1, 10, 0, TRUE ) }
   END
 

Antes de esto. Tenía mi indice con orden Natural, y con la declaración arriba mostrada; como no cambiaba el orden, lo hice en el índice.
Hay algo que me falta tener en cuenta?

Uso FWH 1204
Last edited by MarioG on Mon Jun 03, 2013 3:02 pm, edited 1 time in total.
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: xBrowse - Columna Descendente

Postby Armando » Sun Jun 02, 2013 4:28 pm

Mario:

Creo que te falta indicar el BMP a mostrar

Code: Select all  Expand view

  REDEFINE XBROWSE ::oBrwCab ID 300 OF oDlg FONT ::hFont["Tahoma15"] ;
            COLUMNS "FFeVta01", "FHsVta01", "FDocInt1", "FCabFa04" ;
            ALIAS   h0["CabFacVta"]:cAlias AUTOSORT
...
   WITH OBJECT ::oBrwCab:FDocInt1
      :cHeader:= "Código"
      :nHeadStrAlign:= :nDataStrAlign:= AL_LEFT
      :nWidth := 85
      :cOrder:= "D"         // No obstante muestra como "A"
      :nHeadBmpNo   := 2          // ESTA LINEA PARA MOSTRAR EL BMP DESCENDENTE

      :bStrData:= {|| Str( (h0["CabFacVta"]:cAlias)->FDocInt1, 10, 0, TRUE ) }
   END
 


Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3201
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: xBrowse - Columna Descendente

Postby MarioG » Mon Jun 03, 2013 12:36 am

Armando; gracias por responder
En realidad no lo comente, pero el bmp se muestra, solo que indicado Ascedente (muestro imagen)
Image
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: xBrowse - Columna Descendente

Postby Armando » Mon Jun 03, 2013 1:52 pm

Mario:

En tu código no veo definido el BMP y asumo que por default te coloca el ascendente (1), intenta
definirlo con la línea que te incluí, para indicarle que muestre el bmp descendente.

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3201
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: xBrowse - Columna Descendente

Postby MarioG » Mon Jun 03, 2013 2:02 pm

Armando;
disculpa, no lo mencione, compile incluyéndolo, la respuesta es al misma

gracias, nuevamente
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: xBrowse - Columna Descendente

Postby Armando » Mon Jun 03, 2013 2:49 pm

Mario:

Con esta línea en el ON INIT de tu ventana o dialogo solucionas el problema
Code: Select all  Expand view

ACTIVATE WINDOW oWnd ON INIT (oBrw:aCols[01]:cOrder := "D",oBrw:aCols[01]:nHeadBmpNo    := 2)
 


Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3201
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: xBrowse - Columna Descendente (Solucionado)

Postby MarioG » Mon Jun 03, 2013 3:00 pm

Efectivamente!
solucionado, gracias!
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 29 guests