Por favor (ya lei los ejeplos de la carpeta samples) podrian decirme
como se hace sensillamente para mostrar en un xbrowse que la ultima columna sea sumada
y me muestre "el total de deuda" que tiene?
porque la verdad estoy dando tantas vueltas que ya ni se que es lo que hay q hacer, solo copio y pego
y no entiendo el funcionbamiento del maketotals
gracias.
oQry:=oServer:Query( "SELECT * SUM( DEBE ) TotalDebe FROM TABLA")
//En xBrowse
oBrw:lFooter=.T.
oCol:=oBrw:AddCol()
oCol:bStrData := { || oQry:DEBE }
oCol:nHeadStrAlign := AL_CENTER
oCol:cHeader := "DEBE"
oCol:bfooter:={|| ("TOTAL DEBE: "+Trans(TotalDebe,"99,999.99")) }
oQry:=oServer:Query( "SELECT * SUM( DEBE ) TotalDebe FROM TABLA")oQry:=oServer:Query( "SELECT SUM( DEBE ) AS TotalDebe FROM TABLA")function a()
return (b = a + iva + ganancia)goosfancito
Tendrías que recorrer tu tabla e ir cargándola a un Array luego tu array lo mostras en el browse.
Saludos,
Adhemar
jrestojeda wrote:Adhemar...
Este query está mal:
oQry:=oServer:Query( "SELECT * SUM( DEBE ) TotalDebe FROM TABLA")
Debería ser:
oQry:=oServer:Query( "SELECT SUM( DEBE ) AS TotalDebe FROM TABLA")
Saludos,
#include "FiveWin.ch"
#include "XBrowse.ch"
function Main()
local oWnd, oBrw, oCol
USE clientes
DEFINE WINDOW oWnd
@ 0, 0 XBROWSE oBrw OF oWnd ALIAS "clientes"
oBrw:lFastEdit = .T.
oBrw:lFooter = .T.
oCol = oBrw:AddCol()
oCol:bEditValue = { || clientes->Nombre }
oCol:cHeader = "Nombre"
oCol = oBrw:AddCol()
oCol:cHeader = "Monto"
oCol:bEditValue := { || importe() }
oCol:cEditPicture = "999,999.99"
oCol:nTotal = 0
oCol:nWidth = 60
oCol:lTotal = .T.
oCol = oBrw:AddCol()
oCol:bEditValue = { || clientes->Direccion }
oCol:cHeader = "Direcccion"
oBrw:CreateFromCode()
oWnd:oClient = oBrw
oBrw:MakeTotals()
ACTIVATE WINDOW oWnd ON INIT(oBrw:MakeTotals())
return nil
function importe()
local nCalculo
nCalculo = clientes->edad * clientes->nivel
return nCalculoGracias.
Ningun campo que muestro en el xbrowse es editable. solo muestran info. he visto que todos los que usan maketotals hacen sobre un campo editable.
Daniel Garcia-Gil wrote:jrestojeda wrote:Adhemar...
Este query está mal:
oQry:=oServer:Query( "SELECT * SUM( DEBE ) TotalDebe FROM TABLA")
Debería ser:
oQry:=oServer:Query( "SELECT SUM( DEBE ) AS TotalDebe FROM TABLA")
Saludos,
Realmente el "AS" es opcional, la sentencia de Adhemar es correcta
goosfancito wrote:Gracias.
Ningun campo que muestro en el xbrowse es editable. solo muestran info. he visto que todos los que usan maketotals hacen sobre un campo editable.
Daniel Garcia-Gil wrote:goosfancito wrote:Gracias.
Ningun campo que muestro en el xbrowse es editable. solo muestran info. he visto que todos los que usan maketotals hacen sobre un campo editable.
En el ejemplo no he colocado ninguna columna editable