Inercambair columnas en un Browse

[MarioG]

Hola;
Existe la opción de intercambiar columnas usando wBrowse de Hernán Checarelli?
La idea es: en un Browse de ancho fijo que una de las columnas pueda mostrar diferentes datos de un mismo registro.
Algun ejemplo, muchas gracias

Saludos

[mmercado]

La idea es: en un Browse de ancho fijo que una de las columnas pueda mostrar diferentes datos de un mismo registro.

No soy experto en la TWBrowse de Hernán pero creo que podrías usar algo como esto:

oLbx:aColumns[ nColumn ]:bData := {|| ALIAS->( FieldGet( nCampo ) ) }

Así el dato que se muestra dependerá del valor de la variable nCampo

Saludos

Manuel Mercado

[ADBLANCO]

No se si es lo que necesitas, Pero:

Si deseas que presente diferentes campos dependiendo de una condicion, puedes hacer:

IIF(lValor,_alias->Campo2,_alias->Campo2)


Si Quieres presentar informacion concatenada puedes:

_alias->Campo1+' - '+_alias->Campo2

Si al contrario deseas presentar valias lineas de un mismo registro:

_alias->Campo1+CRLF_Alias->Campo2


Por supuesto en este último caso deberás modificar el alto de la línea del Browse


Suerte!!!

[ADBLANCO]

Ups!, me equivoqué (error de dedo)

_alias->Campo1+CRLF+_Alias->Campo2

[ADBLANCO]

Aqui Está un Ejemplo:

REDEFINE LISTBOX oLbx ;
FIELDS TRANSFORM(TMPLIMIT->F_INICIO,'99/99/9999') ,;
TRANSFORM(TMPLIMIT->F_FINAL,'99/99/9999') ,;
TMPLIMIT->VERS+CRLF+TMPLIMIT->VERS2 ,; //doble linea
TRANSFORM(TMPLIMIT->LIMITE,'999,999,999.99'),;
IIF(TMPLIMIT->FLK_ACTIVO,'Activo','Inactivo');
FIELDSIZES 75,75,95,105,95,95;
MESSAGE "Seleccione Versión/Límite/Vigencia ";
HEADERS "Desde","Hasta","Version","Monto Limite","Estatus";
ID 401 OF oDlg ;
WHEN lEdit .and. lMod

oLbx:cAlias := "tmplimit"
oLbx:nFreeze := 5 && Congela hasta la Quinta columna
oLbx:nHeaderHeight := 31 && Da la altura del header
oLbx:nLineHeight := 31 && Da la altura de Line
oLbx:Set3DStyle()
oLbx:Ajustify := {0,0,0,1,0}


Suerte!

[MarioG]

Gracias por las respuestas
Por apurado no escribí bien la pregunta.
Supongamos que tengo una lista de Precios: Codigo - Descripcion - Precio
Lo que deseo mostrar, alternativamente y por selección, en la columna Precios es: Precio Publico (efectivo), Tarjeta, Precio sin/IVA, Precio Costo s/IVA, c/IVA (Por acá IVA es Impuesto al valor agregado)

Ya estuve leyendo que wBrowse devuelve las coordenadas de las cabeceras. Asi es que encuadrando en la columna Precio y mediante un menu secundario dispondría la selección y lo aplicaría a: :aColumns[ nColumn ]:bData := {|| ALIAS->( FieldGet( nCampo ) ) }, como indica Manuel
Bueno, es la primer idea

Saludos