FiveTech Software tech support forums

FIELDWBLOCK("FName", 1) is the same as &( "{ |setVal| IF( setVal == NIL, 1->FName, 1->FName := setVal ) }" ) If you don't eval the block you'll not retrieve the content of the field. @ nRiga, nColonna ...

FIELDWBLOCK("FName", 1) is the same as &( "{ |setVal| IF( setVal == NIL, 1->FName, 1->FName := setVal ) }" ) If you don't eval the block you'll not retrieve the content of the field. @ nRiga, nColonna ...

... --silence-end <integer> : silence at the end (in milliseconds) --lrc-length <integer> : set max length of text lines in LRC file --lrc-fname <file_name> : set filename for LRC file --lrc-enc <encoding> : set encoding for LRC file --lrc-offset <integer> : time offset ...

Hey, I'm using wildseek in xbrowse, but when I go to 60.000 tot 200.000 records it slows down the respons Ok, maybe it is just my system, but I think the code can be better :oops: The database is 1 field, C 150 database = use fotofile NEW ALIAS foto VIA "DBFCDX" and when created : INDEX ON...

... need to go through the difficult process of concatenating the prepare the expression. Normally we need to do something like this: cFilter := "fname = '" + cVar + "'", etc. Parameterised filters save this work. Example: cDept := "123"dDate := {^ 2008/02/20 }oRs:SetFilter( ...

... names in state.dbf are "CODE","NAME", the column names created in states table are "ID","FCODE","FNAME". Also if we use hungarian notation, we can easily identify a field variable. if nVar, cVar, lVar denote numeric, character and logical variables, ...

... ;-) La idea es la siguiente; /* Thread Main ( Count MAX by N_THREADS ) |---------> Thhread child table for test.dbf | |----> child index fname | | | |----->child index fcode | |---------> Thhread child table for test2.dbf | |-----> index fname2 | |---------> N_THREADS */ Estoy ...

... it only to insert them. The following 4GL code fragment shows the declaration of an insert cursor: DEFINE the_company LIKE customer.company, the_fname LIKE customer.fname, the_lname LIKE customer.lname DECLARE new_custs CURSOR FOR INSERT INTO customer (company, fname, lname) VALUES (the_company, ...

1. Please check if the Encrypted values are also in the same sort order as the Decrypted values. If so, you can use oCol:cSortOrder := "LNAME,FNAME,MNAME" 2. (a) It is possible to assign a codeblock to oCol:cSortOrder Example: oCol:cSortOrder := { |oCol| MySortFunc( oCol ) } Inside the ...

Is all the data in one field, and you want to dispayed it in 4 columns? Is this what you need? Fname is the fieldname of the DBF oCol:bStrData := { || substr(fname,1,6)}oCol:bStrData := { || substr(fname,7,10)}oCol:bStrData := { ...

Rao

I noticed if I just selected the Sort "LNAME" ( instead of "LNAME,FNAME") everything worked as you suggested!

Thanks
Rick Lipkin

We have to add SORT <uOrder> clause to the ADD TO oBrw command. In your example, please try adding SORT "LNAME,FNAME"  to the ADD TO oBrw command. Because this is a browse of recordset, the expression oRs:Sort := "LNAME,FNAME" will be used by xbrowse for sorting ...

To All Consider this code .. I want to concantonate the fname+", "+mname on one column .. here is the code : DEFINE DIALOG oDlg RESOURCE "DRVRSLCT"               ;       COLOR "W+/W"                                  ;    ...

... escrita en Harbour. El ejemplo que baje de internet funciono ok, * OK oFr:SetEventHandler( "Report" , "OnUserFunction" , { | FName, FParams | CallUserFunction( FName , FParams ) } ) oFr:AddFunction( "function XBaseStr( nValue: Double, nLength: Variant = EmptyVar, nDecimals: ...

... include the structure you can use something like <xml> <table> <tname>Example</tname> <structure> <field> <fname>Surname</fname> <ftype>C</ftype> <flen>32</flen> <fdec>0</fdec> </field> <field> <fname>DOB</fname> ...