¿Puedo usar aca las MACROS?

[goosfancito]

Gente,

Hoy por hoy llamo a un metodo propio que me devuelve una consulta
por mysql, y lo hago de esta manera:

Code: Select all

oQuery:= GetApp():LeerTabla( { "clientes.cod_cli", "clientes.cliente" }, , , "cliente" ) 

Pero luego en otra funcion vuelvo a hacer el mismo procedimiento
pero cambio lo que le transfiero a LeerTabla

Code: Select all

oQuery:= GetApp():LeerTabla( { "clientes.*" } ) 

Entonces quiero hacer una sola funcion en el cual indicandolé
que quiero enviar como parámetro. Pensé esto:

Code: Select all

function Recargar( nItem )

    do case 
        case nItem == 1

        return ( oQuery:= GetApp():LeerTabla( { "clientes.cod_cli", "clientes.cliente" }, , , "cliente" )  )

        Case nItem == 2

        return ( oQuery:= GetApp():LeerTabla( { "clientes.*" } )  )
    enddo
return 

Esto es simple cuando hay unos 3 o 4, pero tengo en realizar 40 de esto s nItem entonces es muy engorroso ir acordandose que me devuelve esto:

Code: Select all

Recargar( 35 )

Por lo que pense que podría hacer un .ch donde, por ejmplo haga esto:

ConsultaCliente:= { "clientes.cod_cli", "clientes.cliente" }, , , "cliente"

Como lo hago? porque dijense que estoy pansado tambien las comas. pensé hacerlo asi:

Code: Select all

[comillas simples] { "clientes.cod_cli", "clientes.cliente" }, , , "cliente" [comillas simples] 

pero me toma como toda una cadena.

Alguna Idea?
Gracias.