Hoy por hoy llamo a un metodo propio que me devuelve una consulta
por mysql, y lo hago de esta manera:
- Code: Select all Expand view RUN
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 Expand view RUN
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 Expand view RUN
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 Expand view RUN
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 Expand view RUN
[comillas simples] { "clientes.cod_cli", "clientes.cliente" }, , , "cliente" [comillas simples]
pero me toma como toda una cadena.
Alguna Idea?
Gracias.
