Page 1 of 1

Ayuda con un RowSet y xBrowse

PostPosted: Mon Apr 15, 2024 3:36 pm
by TecniSoftware
Tengo el siguiente RowSet en MariaDB:

Code: Select all  Expand view

   TEXT INTO cQuery

      SELECT legajo,
             apellido,
             nombres,
             colegios.detalle as colegio,
             grupo
        FROM padron
   LEFT JOIN colegios ON padron.grupo = colegios.codigo
    ORDER BY apellido, nombres

   ENDTEXT
   oRs       := oApp:oServer:RowSet( cQuery )

 


Necesito mostrar un xbrowse solo con algunas columnas:

Code: Select all  Expand view


   aHeaders  := { "Legajo",;
                        "Apellido y nombres",;
                        "Colegio" }

   aCols     := { "legajo",;
                      "CapFirst( apellido ) + ' ' + CapFirst( nombres )",;
                      "colegio" }

// CapFirst() muestra el texto en minùscula salvo la primer letra de cada palabra

   @ nRow, nCol XBROWSE ::oBrw;
                   SIZE nBrwW, nBrwH;
                  PIXEL;
                     OF ::oDlg;
             DATASOURCE ::oRs;
               AUTOSORT;
                COLUMNS aCols

 


El problema que tengo es que no logro hacer funcionar correctamente el xbrowse, esta definido como "AUTOSORT"
El campo LEGAJO es numerico, ordena correctamente pero al hacer una busqueda incremental obtengo el aviso de "TYPE MISMATCH".
Que hay que tener en cuenta
Bienvenida cualquier ayuda.

Re: Ayuda con un RowSet y xBrowse

PostPosted: Mon Apr 15, 2024 9:31 pm
by TecniSoftware
Solucionado!
En principio, decidí separar apellido y nombres, el problema que tenía lo pude solucionar de la siguiente manera y dejé de tener el error TYPE
MISMATCH

Code: Select all  Expand view


   aCols     := { "legajo",;
                      "apellido",;
                      "nombres",;
                      "colegio" }

   aStrData  := { { || oRs:Legajo ) },;
                        { || CapFirst( oRs:Apellido ) },;
                        { || CapFirst( oRs:Nombres ) },;
                        { || CapFirst( oRs:Colegio ) } }

 

Re: Ayuda con un RowSet y xBrowse

PostPosted: Mon Apr 15, 2024 10:16 pm
by sysctrl2
Excelente Alejandro,
! Viva la libertad carajo !
tienes un ejemplo mas completo ?
saludos !