FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour PARA MANUEL MERCADO,, TSBROWSE
Posts: 330
Joined: Fri May 25, 2007 09:06 PM
PARA MANUEL MERCADO,, TSBROWSE
Posted: Sat Jul 26, 2008 04:37 PM

Estimado Manuel::

otra vez molestando:: no encuentro la manera de recorrer el browse..

algo asi tipo excel.. por filas y columnas, para extraer los valores del mismo:::

el browse esta enlazado a un DBF con un scope:: y en una de sus columnas tiene un function de me retorna un valor:: y dicho valor se muestra en ella::

es justamente eso valor el que quiero recojer en otra rutina::

me hechas una mano amigo::

GRACIAS

Posts: 330
Joined: Fri May 25, 2007 09:06 PM
PARA MANUEL MERCADO,, TSBROWSE
Posted: Sat Jul 26, 2008 05:59 PM

...

Posts: 782
Joined: Wed Dec 19, 2007 07:50 AM
Re: PARA MANUEL MERCADO,, TSBROWSE
Posted: Sat Jul 26, 2008 07:36 PM
mantonio_08 wrote:no encuentro la manera de recorrer el browse..
???
mantonio_08 wrote:algo asi tipo excel.. por filas y columnas, para extraer los valores del mismo:::el browse esta enlazado a un DBF con un scope:: y en una de sus columnas tiene un function de me retorna un valor:: y dicho valor se muestra en ella::
Si te refieres al valor de la celda activa en el browse, puedes extraerlo así:

Eval(oBrw:aColumns[ oBrw:nCell ]:bData )

Si es otra cosa, por favor dame más datos.

Saludos.

Manuel Mercado
manuelmercado at prodigy dot net dot mx
Posts: 330
Joined: Fri May 25, 2007 09:06 PM
PARA MANUEL MERCADO,, TSBROWSE
Posted: Wed Jul 30, 2008 04:04 PM

Maestro Mercado: buenos dias como estas,

** Tu respuesta::
Si te refieres al valor de la celda activa en el browse, puedes extraerlo así:
Eval(oBrw:aColumns[ oBrw:nCell ]:bData )
Si es otra cosa, por favor dame más datos.

Mi duda::

tengo un browse digamos con 6 columnas y 10 registros, este browse muestra la DBF digamos PERSONAL.DBF

en la columna 6 del browse esta asi: mira.:

ADD COLUMN TO BROWSE oTbr DATA VerComision (oG2menore2,oFmenore2,oBmenore2,oGmenore2,oSpsf);
HEADER "% Comisión";
SIZE 100 ;
PICTURE "9,999,999";
ALIGN DT_RIGHT,DT_CENTER,DT_LEFT;
3DLOOK TRUE

como vez esa columna no es un campo de la base Personal.Dbf sino obtiene si informacion del resultado de la FUNCTION

mi duda es como poder sumar los datos de solo esa columna:: algo asi como ir del principio del browse hasta el final del browse sumando el contenido de la celda 1 de la columna 6 y despues la celda 2 de la columna 6 y asi hasta el final del browse...

se puede hacer eso MASTER

Saludos

CLAUDIO

Pd. si no me explique bien me lo haces saber

Posts: 782
Joined: Wed Dec 19, 2007 07:50 AM
PARA MANUEL MERCADO,, TSBROWSE
Posted: Wed Jul 30, 2008 04:30 PM
mantonio_08 wrote:mi duda es como poder sumar los datos de solo esa columna:: algo asi como ir del principio del browse hasta el final del browse sumando el contenido de la celda 1 de la columna 6 y despues la celda 2 de la columna 6 y asi hasta el final del browse...
Hola Claudio:

Ese total deberás obtenerlo recorriendo la base de datos (no el browse), si lo que quieres es mostrar el total al pie de la columna, yo lo haría así:

Antes de definir el browse:
DbSelectArea( "PERSONAL" )
DbEval( { || nTotal += VerComision( oG2menore2....... } )

Al definir el Browse:
ADD COLUMN TO BROWSE oTbr DATA VerComision (oG2menore2,oFmenore2,oBmenore2,oGmenore2,oSpsf); 
HEADER "% Comisión"; 
SIZE 100 ; 
PICTURE "9,999,999"; 
ALIGN DT_RIGHT,DT_CENTER,DT_LEFT; 
3DLOOK TRUE ;
FOOTER Str( nTotal, 11, 2)

Espero te sirva, saludos.

Manuel Mercado
manuelmercado at prodigy dot net dot mx

Continue the discussion