Como Poner 2 Lineas de Totales en Xbrowse

[remtec]

Amigos.

Muy buenas Noches.

Como siempre molestando.

Necesito saber como se pueden Poner 2 o 3 Lineas de Totales en el Footer de Xbrowse ?
He buscado mucho en el Foro, pero no he encontrado la forma.

Muchos Saludos
Antonio.

[FranciscoA]

Hola. Intenta asi:

Code: Select all

   oBrw:lFooter              := .t.  //Que tendrá footer 
   oBrw:nFooterLines         := 3    //Lineas del footer 
   oBrw:nFooterHeight        := 46   //Altura del  Footer

   oCol = oBrw:AddCol()  //GTOTAL
   oCol:bEditValue = { || (cAlias1)->SaldPrinc + (cAlias1)->SaldIntCo + (cAlias1)->SaldDesliz  + (cAlias1)->SaldOtros}
   oCol:cEditPicture = "9,999,999,999.99"
   oCol:nDataStrAlign := 1
   oCol:cHeader = "SALDO"+CRLF+"TOTAL" 
   oCol:nWidth = 110      //El ancho de la col es importante
   oCol:nEditType = 0   //no editable
   oCol:bFooter  =  {||TRANSFORM(nTotPrinc+nTotIntCo+nTotDesliz+nTotOtros,"99,999,999,999.99") +CRLF+ TRANSFORM(nNoVencido,"9,999,999,999.99") +CRLF+ TRANSFORM(nVencido,"9,999,999,999.99") }
   oCol:nFootStrAlign := 1
 

Saludos.

[remtec]

Hola Francisco

Muy buen dia.

Muchas gracias por tu tiempo y por responder.

He probado tu sugerencia y Funciona muy Bien.

Muchos saludos.