Ordenar con nDataStrAlign en un XBROWSE

Post Reply
jbrita
Posts: 507
Joined: Mon Jan 16, 2006 3:42 pm

Ordenar con nDataStrAlign en un XBROWSE

Post by jbrita »

Hola Amigos estoy tratando de ajustar cierta informacion a la izquierda y otra a la derecha pero de la misma columna

oBrw1:aCols[1]:nDataStrAlign:= {|| IF( SubStr(aTrabajo[oBrw1:nArrayAt,1],1,5)=="TOTAL",1,3) }

pero no resulta:
ejemplo:
DESCRIPCION CANTIDAD PRECIO TOTAL
AAAAA-1 10 100 1.000
AAAAA-2 10 100 1.000
TOTAL 2.000

BBB-1 10 200 2.000
BBB-2 15 200 3.000
TOTAL 5.000

si se dan cuenta la columa descripcion la ordeno de iquierda y tambien derecha, eso ando buscando
jbrita
Posts: 507
Joined: Mon Jan 16, 2006 3:42 pm

Re: Ordenar con nDataStrAlign en un XBROWSE

Post by jbrita »

antonio, se podra hacer esto

saludos
jbrita
Posts: 507
Joined: Mon Jan 16, 2006 3:42 pm

Re: Ordenar con nDataStrAlign en un XBROWSE

Post by jbrita »

amigos no hay nadien en el foro que alguna vez ordeno una informacion de la misma columna a la derecha o izquierda segun condicion:

oBrw1:aCols[1]:nDataStrAlign:= {|| IF( SubStr(aTrabajo[oBrw1:nArrayAt,1],1,5)=="TOTAL",1,2) }

esto no me funciona

saludos
User avatar
joseluisysturiz
Posts: 2064
Joined: Fri Jan 06, 2006 9:28 pm
Location: Guatire - Caracas - Venezuela
Contact:

Re: Ordenar con nDataStrAlign en un XBROWSE

Post by joseluisysturiz »

jbrita wrote:amigos no hay nadien en el foro que alguna vez ordeno una informacion de la misma columna a la derecha o izquierda segun condicion:

oBrw1:aCols[1]:nDataStrAlign:= {|| IF( SubStr(aTrabajo[oBrw1:nArrayAt,1],1,5)=="TOTAL",1,2) }

esto no me funciona

saludos


Solo por si acaso prueba que ell contenido del array este en mayuscula como con lo que comparas TOTAL, pruebalo asi haber, saludos...

oBrw1:aCols[1]:nDataStrAlign:= {|| IF( SubStr( UPPER( aTrabajo[oBrw1:nArrayAt,1],1,5) )=="TOTAL",1,2) }
Dios no está muerto...

Gracias a mi Dios ante todo!
jbrita
Posts: 507
Joined: Mon Jan 16, 2006 3:42 pm

Re: Ordenar con nDataStrAlign en un XBROWSE

Post by jbrita »

no tampoco, tengo todo bien pero no se porque no funciona
for n := 1 to Len( oBrw1:aCols )
oCol := oBrw1:aCols[ n ]
if n == 1
If Len(aTrabajo)#0
IF SubStr(aTrabajo[oBrw1:nArrayAt,1],1,5)=="TOTAL"
oBrw1:nDataStrAlign := 1
ELSE
oBrw1:nDataStrAlign := 3
endif
Endif
next

TAMPOCO FUNCION ASI

saludos
User avatar
cnavarro
Posts: 6557
Joined: Wed Feb 15, 2012 8:25 pm
Location: España
Been thanked: 3 times

Re: Ordenar con nDataStrAlign en un XBROWSE

Post by cnavarro »

Intenta utilizar esto, a ver si te funciona
( Sería bueno saber la versión de Fw que utilizas )

Code: Select all | Expand


   oCol:bIndent      := { || IF( SubStr(aTrabajo[oBrw1:nArrayAt,1],1,5)=="TOTAL", 20, 0 }
 
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Post Reply