Page 1 of 1

Saber nombre de campo en xBrowse (SOLUCIONADO)

Posted: Thu Oct 19, 2023 4:00 am
by Armando
Amigos, nuevamente pidiendo su apoyo

Con el siguiente código estoy pasando varios valores a la función MenuPop tales como
el renglón y columna donde se dio el clic derecho del ratón, ahora me interesa también
enviar el nombre del campo que se muestra en la columna del browse.

Code: Select all | Expand

REDEFINE XBROWSE oBrw ID 200 OF oDlg;
   DATASOURCE oRsPdf;
   COLUMNS "CON_RFC","CON_NOM",;                      <==== uno de estos nombres es el que me interesa enviar
...
...

    bRClicked := { | nRow, nCol | MenuPop(oBrw,oBrw:nRowSel,oBrw:nColSel,nRow,nCol) }
 
Muy agradecido

Re: Saber nombre de campo en xBrowse

Posted: Thu Oct 19, 2023 4:05 pm
by Willi Quintana
Mi Estimado

Code: Select all | Expand

:FieldName(nPos)   // nPos en el numero de columna
 

Re: Saber nombre de campo en xBrowse

Posted: Thu Oct 19, 2023 5:31 pm
by Armando
Mr.

Gracias por la respuesta pero no me funciona.

? oBrw:FieldName(nCol)

Me tira error Error description: Error BASE/1004 Message not found: TXBROWSE:FIELDNAME

Saludos

Re: Saber nombre de campo en xBrowse

Posted: Thu Oct 19, 2023 5:33 pm
by karinha
Armando wrote:Mr.

Gracias por la respuesta pero no me funciona.

? oBrw:FieldName(nCol)

Me tira error Error description: Error BASE/1004 Message not found: TXBROWSE:FIELDNAME

Saludos
Armando:

SAMPLES\TESTXBRW.PRG - FUNCTION MULTILINE()

Regards, saludos.

Re: Saber nombre de campo en xBrowse

Posted: Thu Oct 19, 2023 5:44 pm
by Armando
Karinha

Con este código obtengo el titulo en el HEADER

? oBrw:aCols[nCol ]:cHeader

Olvide mencionar que uso Record Set

Saludos

Re: Saber nombre de campo en xBrowse

Posted: Thu Oct 19, 2023 5:54 pm
by karinha
Armando, no és esto de deseas?

Code: Select all | Expand

   for nFor := 1 to Fcount()

      oBrw:aCols[ nFor ]:cHeader := "Field: " + ltrim( str( nFor ) ) + CRLF + ;
         FieldName( nFor )  // aqui Armando

   next
 
Regards, saludos.

Re: Saber nombre de campo en xBrowse

Posted: Thu Oct 19, 2023 6:06 pm
by Armando
Karinha:

Sí busco el nombre del campo asignado a la columna desde un record set
y me parece que FIELDNAME() es para DBFs, o estoy equivocado?

Saludos

Re: Saber nombre de campo en xBrowse

Posted: Thu Oct 19, 2023 6:24 pm
by karinha
Armando, mira los ejemplos con ADO*.PRG Y FWSALES.PRG se sirve.

Regards, saludso.

Re: Saber nombre de campo en xBrowse

Posted: Thu Oct 19, 2023 6:57 pm
by Armando
Karinha:

He revisado y ninguno ayuda.

A ver si hay una alma caritativa que apoye.

Saludos

Re: Saber nombre de campo en xBrowse (SOLUCIONADO)

Posted: Thu Oct 19, 2023 7:09 pm
by Armando
Amigos todos:

La solución es: (Encontrada en el foro)

Code: Select all | Expand

   ? oBrw:aCols[oBrw:nColSel]:cExpr
 
Saludos