Page 1 of 1

Xbrowse

PostPosted: Fri Feb 11, 2022 9:25 pm
by CarlosFossati
Hola Buenas Tardes, quisiera parametrizar un xbrowse, pasandole por parametros los campos de una tabla, como asi,
las descripciones de los mismos, como lo hacia con en twbrowse de cicarelli, habia un parametro omo el bline, que me permitia
pasar codeblock con los campos de la base y un aheader, con los nombres de los campos. desde ya muchas gracias

Re: Xbrowse

PostPosted: Fri Feb 11, 2022 11:46 pm
by Ariel
Hola Carlos,

podes crear arrays y mandarle los datos, ej:
Code: Select all  Expand view

local aCol, aHead, aSize, aJust, aPic

if tucondicion1
    aCol:= { "campo1", "campo2", "campo3", ... }
    aSize:= { 50, 220, 65, ... }
    aHead := { "Codigo", "Nombre", "Domicilio", .. }
    aJust := { AL_RIGHT, AL_LEFT, ,.... }
    aPic   := { "@Z 9999",, ,, }
elseif tucondicion2
    aCol:= { "campo10", "campo20" }
    aSize:= { 50, 220}
    aHead := { "Codigo", "Nombre"}
    aJust := { AL_RIGHT, }
    aPic   := { "@Z 9999",  }
elseif tucondicion3
    aCol:= { "campo1", "campo3", "campo2", "campo4", ... }
    aSize:= { 50, 220, 220, 65, ... }
    aHead := { "Codigo", "Domicilio", "Nombre", .. }
    aJust := { AL_RIGHT, AL_LEFT, ,.... }
    aPic   := { "@Z 9999",, ,, }
else
    aCol:= { "campo1" }
    aSize:= { 220 }
    aHead := { "Nombre" }
endif

@ 0, 0 XBROWSE oBrw ;
           DATASOURCE oRs ;
           COLUMNS aCol ;
           HEADERS aHead ;
           COLSIZES aSize ;
           PICTURE aPic ;
           JUSTRIFY aJust ;
           LINES CELL AUTOSORT
 


Espero te sirva y entiendas la idea, de todos modos tambien luego de la definicion podes modifcar cada columna a tu gusto,
si buscas aca en el foro xbrowse() encontraras infinidad de ejemplos, incluso en los ej. de fwh.
Te mando un abrazo.
Saludos.

Re: Xbrowse

PostPosted: Sat Feb 12, 2022 2:18 am
by leandro

Re: Xbrowse

PostPosted: Sun Feb 13, 2022 8:18 pm
by CarlosFossati
Muchas Gracias Leandro!!!!!!!

Re: Xbrowse

PostPosted: Sun Feb 13, 2022 8:21 pm
by CarlosFossati
Muchas Gracias Ariel