FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour TxBrowse Columns...(Solucionado)
Posts: 632
Joined: Tue Dec 12, 2006 07:34 PM
TxBrowse Columns...(Solucionado)
Posted: Thu Jul 24, 2014 10:12 PM
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 (fw): Select all Collapse
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.
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Re: TxBrowse Columns...
Posted: Thu Jul 24, 2014 10:36 PM
Code (fw): Select all Collapse
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)}
Posts: 632
Joined: Tue Dec 12, 2006 07:34 PM
Re: TxBrowse Columns...
Posted: Fri Jul 25, 2014 12:09 AM
cmsoft wrote:
Code (fw): Select all Collapse
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
Posts: 632
Joined: Tue Dec 12, 2006 07:34 PM
Re: TxBrowse Columns...(Solucionado)
Posted: Fri Jul 25, 2014 05:47 PM
ACC69 wrote:
cmsoft wrote:
Code (fw): Select all Collapse
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.

Continue the discussion