TxBrowse Columns...(Solucionado)

[ACC69]

Hola buenas tardes de antemano les envio cordial saludos.

Una pregunta para los que ya usan TXBrowse, se puede incrustar funcion dentro del parametro de campo COLUMNS "NivCta(CUENTA)"...si se puede como se traduciria, en caso que no...! cual es la otra forma...para poder usar la funcion en la variable COLUMNS "CUENTA" y que sea asi COLUMNS "NivCta(CUENTA)"

Es una funcion para separar niveles de cuentas ...en el campo esta "1020000100002" y con la funcion separar guiones "1020-0001-0002" , es el motivo por el cual quiero incrustar la funcion de esta manera, o que me indiquen de que otra forma programar TXBrowse

Code: Select all  Expand view  RUN

REDEFINE XBROWSE oSBrw ID 101 OF oSDlg ;
           HEADERS "Cuenta","Descripción","Saldo Ant" ;
           COLUMNS "NivCta(CUENTA)","TIPO","DESCRIP"  ;
           ALIAS (S11)->( ALIAS() ) // FOOTERS CELL AUTOCOLS

STATIC FUNCTION NivCta(cCta)
....Instruccion
CUENTA := S11->CUENTA
Return (CUENTA)

Si el Ing. Nages me puede orientar o un ejemplo sencillo para incrustar la funcion en la variable campo "CUENTA"

Saludos y buen dia.!

Atte: Adrian C. C.

[cmsoft]

Code: Select all  Expand view  RUN

REDEFINE XBROWSE oSBrw ID 101 OF oSDlg ;
           HEADERS "Cuenta","Descripción","Saldo Ant" ;
           COLUMNS "CUENTA","TIPO","DESCRIP"  ;
           ALIAS (S11)->( ALIAS() ) // FOOTERS CELL AUTOCOLS
           oSBrw:aCols[1]:bStrData := {|| NivCta(s11->CUENTA)}

[ACC69]

Code: Select all  Expand view  RUN

REDEFINE XBROWSE oSBrw ID 101 OF oSDlg ;
           HEADERS "Cuenta","Descripción","Saldo Ant" ;
           COLUMNS "CUENTA","TIPO","DESCRIP"  ;
           ALIAS (S11)->( ALIAS() ) // FOOTERS CELL AUTOCOLS
           oSBrw:aCols[1]:bStrData := {|| NivCta(s11->CUENTA)}

Gracias por responder CMSOFT muy amable,pruebo y te comento.

Ahora otra pregunta en la misma COLUMN se puede unir dos campos ...ejemplo TIPO+" "+STR(NUMPOL,5) ..para únicamente poner en los headers Póliza y no crear headers tipo y número póliza.. Como sería a programar.

Saludos

[ACC69]

Code: Select all  Expand view  RUN

REDEFINE XBROWSE oSBrw ID 101 OF oSDlg ;
           HEADERS "Cuenta","Descripción","Saldo Ant" ;
           COLUMNS "CUENTA","TIPO","DESCRIP"  ;
           ALIAS (S11)->( ALIAS() ) // FOOTERS CELL AUTOCOLS
           oSBrw:aCols[1]:bStrData := {|| NivCta(s11->CUENTA)}

Gracias por responder CMSOFT muy amable,pruebo y te comento.

Ahora otra pregunta en la misma COLUMN se puede unir dos campos ...ejemplo TIPO+" "+STR(NUMPOL,5) ..para únicamente poner en los headers Póliza y no crear headers tipo y número póliza.. Como sería a programar.

Saludos

Gracias CMSOFT , funciono, incrustando la funcion dentro de columns.

Saludos y buen dia.!

Atte: Adrian C. C.