Select columns of a Xbrowse to print

[Silvio.Falconi]

I wish select the columns of a Xbrowse to print but when the user
when the user selects the column the procedure must enter a number 1,2,3 and then in the report he must print giving the order of the selected columns
for example in the customer file I could first select the city field giving the number 1 and then first giving the number 2 and then zipcode giving the number 3 and the report must print the connections in this sequence
City, first, zipcode

for a sample I have the selection for excel


I would like the end user, in addition to deciding which column to be printed,
to insert only by clicking with the mouse the number of the column to be printed first

how can I do ?

[nageswaragunupudi]

Code: Select all  Expand view

aCols := { "CITY", "FIRST", "ZIP" }
cSave := oBrw:SaveState()
oBrw:ReArrangeCols( aCols )
oBrw:Report()
oBrw:RestoreState( cSave )
oBrw:Refresh()
 

[Silvio.Falconi]

THANKS RAO

[joseluisysturiz]

Code: Select all  Expand view

aCols := { "CITY", "FIRST", "ZIP" }
cSave := oBrw:SaveState()
oBrw:ReArrangeCols( aCols )
oBrw:Report()
oBrw:RestoreState( cSave )
oBrw:Refresh()
 

Buen dua, intente hacer esto ya que necesito crear reportes sólo de algunas columnas del xbrowse, pero sólo me sale en el Report la primera columna, que estaré haciendo mal o cual es la forma correcta?

También probé usar obrw:Report (,,,,,,aCols) y no toma en cuenta aCols el cual está previamente definida.. gracias... Saludos..

[nageswaragunupudi]

Code: Select all  Expand view

obrw:Report (,,,,,,aCols)

is the right way to go.
My previous reply was for older versions of FWH.

aCols can be an array of
Column headers (or) Column numbers at the time of creation

[joseluisysturiz]

Tengo versión 21.11

[joseluisysturiz]

Tengo versión 21.11

[nageswaragunupudi]

It works with 21.11

Try this small sample

Code: Select all  Expand view

#include "fivewin.ch"

function Main()

   XBROWSER "CUSTOMER.DBF" TITLE FWVERSION ;
      COLUMNS "FIRST", "CITY", "AGE", "SALARY" ;
      SETUP( oBrw:cHeaders := { "NAME", "TOWN", "QTY", "AMOUNT" }, ;
      oBrw:bRClicked := { |r,c,f,o| o:Report(,,,,,, { "AMOUNT", "QTY", "TOWN" } ) } )

return nil
 

[joseluisysturiz]

It works with 21.11

Try this small sample

Code: Select all  Expand view

#include "fivewin.ch"

function Main()

   XBROWSER "CUSTOMER.DBF" TITLE FWVERSION ;
      COLUMNS "FIRST", "CITY", "AGE", "SALARY" ;
      SETUP( oBrw:cHeaders := { "NAME", "TOWN", "QTY", "AMOUNT" }, ;
      oBrw:bRClicked := { |r,c,f,o| o:Report(,,,,,, { "AMOUNT", "QTY", "TOWN" } ) } )

return nil
 

Buen dia, ya funciono, yo staba tomando los nombres de las columnas COLUMNS, creyendo era eso por ser aCols, es decir los nombres de los campos y no los nombre de los titulos de las columnas HEADERS, gracias, saludos...

[Silvio.Falconi]

I am not able to answer you, unfortunately I am not well in this period and the fwteam knows my situation

[Antonio Linares]

Dear Silvio,

How are you ? Feeling better ?

Are you already at home ?

our best wishes for your quick recovery

[karinha]

Te deseo pronta mejoría y salud para ti Silvio. ¿Con quién voy a "luchar" en furum? jajajajaja

I wish you speedy improvements and health for you Silvio. Who am I going to "fight" in furum? hahahahaha

Regards, saludos.

[Detlef]

Dear Silvio,
I hope there is nothing too serious about you.
Recover quick and remember... you must complete your lotto software to become a very rich man.

Regards, Detlef

[acuellar]

Strength and speedy recovery dear Silvio.

[Silvio.Falconi]

..