AYUDA CON TOTAL POR COLUMNA EN XBROWSE
Posted: Thu Dec 06, 2018 9:17 pm
Amigos
Como siempre molestando.
He revisado todo lo que hay en el foro sobre Totales por Columnas en Xbrowse, pero no logro que funcione.
Ademas, no se habilita el Scroll Vertical.
Desde ya Muchos saludos.
Antonio.
Como siempre molestando.
He revisado todo lo que hay en el foro sobre Totales por Columnas en Xbrowse, pero no logro que funcione.
Ademas, no se habilita el Scroll Vertical.
Desde ya Muchos saludos.
Antonio.
Code: Select all
REDEFINE XBROWSE oIngre ALIAS "&Nro_usu3" FIELDS ;
Fol_caj,;
OemToAnsi(Nom_pac),;
OemToAnsi(Tip_pag),;
OemToAnsi(Tip_ate),;
Tot_gen,; <======== Columna a Totalizar
OemToAnsi(Med_tra),;
OemToAnsi(Cod_dig),;
OemToAnsi(Hor_dig);
HEADERS;
"Folio Caja",;
"Nombre de Paciente",;
"T. Pago",;
"T. Aten",;
"Valor Total",;
"Med.Tra.",;
"Digita",;
"H.Digita";
PICTURES "99999999","@!","@!","@!","9999999999","@!","@!","@!";
ID 104 OF oDlg ;
FONT oFont1;
FOOTERS LINES CELL
oIngre:bClrStd := {|| { nRGB( 0, 0, 0), nRGB(255,248,220) } }
oIngre:bClrSelFocus := {|| { nRGB( 0, 0, 0), nRGB(137, 247, 33) } }
oIngre:l2007:=.T.
oIngre:lVScroll := (.T.) <=============== No se Muestra en el Browse
oIngre:lFooter := .T.
oIngre:aCols[5]:nFooterType := AGGR_SUM
oIngre:MakeTotals()