topic-45721

Posts: 851

Joined: Sun Nov 09, 2014 05:01 PM

bEditWhen xBrowse
Posted: Sun Jun 01, 2025 11:37 PM

Hola a Todos,

Necesito que aparezca el boton EDIT en una columna de xBbrowse pero solo en las filas donde se cumpla una condicion, por ejemplo:

:aCols[cNumeroDoc]:bEditWhen:= { || :aCols[nFacSaldo]<100 }

se puede?

la tengo tal cual este en esa linea de ejemplo, pero no funciona. No aparece el boton edit

"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: bEditWhen xBrowse
Posted: Mon Jun 02, 2025 08:05 AM

Estimado José,

Que valores tienen cNumeroDoc y nFacSaldo ?

Donde asignas esas variables ? En un bucle ?

regards, saludos

Antonio Linares
www.fivetechsoft.com

JoseAlvarez

Posts: 851

Joined: Sun Nov 09, 2014 05:01 PM

Re: bEditWhen xBrowse
Posted: Mon Jun 02, 2025 11:17 AM

Saludos Master Antonio.

cNumeroDoc y nFacSaldo corresponden a cada columna del browse, para el caso 3 y 7

ambas de tipo numerico

Code: Select all Collapse

**** Columnas a Mostrar   XBrowse DETALLES
	cRifCliente     := 1
	cCliente        := 2
	cNumeroDoc      := 3
        dEmision        := 4
	dVcto           := 5
	nDiasVcto       := 6
	nFacMonto       := 7
	nFacPagos       := 8
	nFacSaldo       := 9
	nTotalDocumentos:= 0
	nBandaInf       := 0.00
	cConcepto       := 10
	cTolera         := 15
	
redefine oBrw	...
	AUTOCOLS ;
        AUTOSORT;
        COLUMNS  cRifCliente, cCliente , cNumeroDoc, dEmision, dVcto, nDiasVcto, nFacMonto

Los campos de la tabla, estan en la misma posición, en este caso particular

"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.

cmsoft

Posts: 1344

Joined: Wed Nov 16, 2005 09:14 PM

Re: bEditWhen xBrowse
Posted: Mon Jun 02, 2025 11:41 PM

Hola Jose:
Una forma sería indicando la query que contiene el xbrowse

Code: Select all Collapse

oQry := oServer:Query("select * from mytable")
redefine oBrw	DATASOURCE oQry;
        AUTOSORT;
        COLUMNS "cRifCliente","cCliente","cNumeroDoc","nFacSaldo" ;//aqui todas las columnas que quieras
        HEADERS "Rif","Cliente","Documento","Saldo" // Etc. segun tu gusto del xbrowse
oBrw:aCols[3]:bEditWhen:= { || oQry:nFacSaldo<100 }

Es una idea

Salu2
Cesar Gomez
https://www.bcnsoft.com.ar
https://www.pedidosbcn.com

FiveTech Support Forums

Continue the discussion