Xbrowse lSeekBar con RELATION TO

Xbrowse lSeekBar con RELATION TO

Postby Jorge_T » Thu May 13, 2021 11:31 am

Hola, alguien puede indicarme como hacer lo siguiente;

Estoy relacionando dos bases de datos, con los correspondientes campos indexados, utilizo Xbrowse lSeekBar para poder buscar.

Me permite buscar en todos los campos de la tabla principal pero NO en el campo de la tabla relacionada.

En el ejemplo, no puedo buscar por "State name"

Gracias,
Code: Select all  Expand view  RUN

#include "fivewin.ch"
REQUEST DBFCDX
//----------------------------------------------------------------------------//
function Main()

    local oDlg, oBrw  
    *SetGetColorFocus()
   
    FERASE( "STATES.CDX" )
    Use STATES alias "states" NEW exclusive VIA "DBFCDX"
    FW_CdxCreate()
    Set order to TAG CODE
    go top
   
    FERASE( "CUSTOMER.CDX" )
    Use CUSTOMER alias "customer" NEW exclusive VIA "DBFCDX"
    FW_CdxCreate() 
    go top
   
    SET RELATION to field->state INTO states

    Define Dialog oDlg size 1000,600 PIXEL TRUEPIXEL
   
    @ 10,20 XBROWSE oBrw SIZE -20,-20 PIXEL OF oDlg ;
        Columns "FIRST","LAST","CITY","STATE","states->name";
        Headers "First","Last","City","State Code","State Name";
        DATASOURCE "customer" ;
        AUTOCOLS AUTOSORT CELL LINES NOBORDER
   
        WITH OBJECT oBrw
            :nMarqueeStyle := MARQSTYLE_HIGHLROW
            :lSeekBar:= .T.
            :lIncrFilter   := .F.      
            :CreateFromCode()
        END

    Activate dialog oDlg centered
return nil
 


[img]
Image
[/img]
Jorge
--------------------------------------------------
Fivewin 18.10 - Harbour - BCC 7 - PellesC
--------------------------------------------------
Jorge_T
 
Posts: 38
Joined: Tue Jan 22, 2019 8:28 am

Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 99 guests