FiveTech Software tech support forums

... IF FILE( PathPag+cNomTab ) // SIEMPRE SERAN DBF'S can you please show CODE from Function lUsaTab() where do you "open" *.CDX and use ORDSETFOCUS() :?:

hi, thx for Answer Do you want to find the column object that is currently sorted on the ordsetfocus() ?. YES oBrw:oSortCol --> Currently sorted column obect. i.e., the column sorted on the ordsetfocus()We can now get anythingoBrw:oSortCol:cHeaderoBrw:oSortCol:cExpr ...

Do you want to find the column object that is currently sorted on the ordsetfocus() ? oBrw:oSortCol --> Currently sorted column obect. i.e., the column sorted on the ordsetfocus() We can now get anything oBrw:oSortCol:cHeader oBrw:oSortCol:cExpr // field ...

... oCol ) CLASS TXBrowse but no Sample how to use it ... it seem this CODE work   oBro:GoToCol(oBro:aCols[nPosi]) --- when switch ORDSETFOCUS() or SET INDEX TO i try to find Column in XBROWSE when have NO "own" Header it will display Name of FIELD in Header in this case ...

... ( ::cAlias )->( DBINFO( DBI_FULLPATH ) ) ) * DEFAULT ::bKeyNo := { |n| ( ::cAlias )->( If( n == nil, OrdKeyRelPos() * ::nLen, ; * If( Empty( OrdSetFocus() ), OrdKeyGoTo( n ), OrdKeyRelPos( n / ::nLen ) ) ) ) } * else ::lRelyOnKeyNo := If( Set( _SET_DELETED ), "DELETED()" $ Upper( ...

... siempre me trabaja con el último índice, es decir, el de "Quesos" aun cuando selecciono la pestaña "Productos" y con ordsetfocus("productos") siguen saliendo los datos del índice "Quesos", que es justamente el último creado. He probado con set order ...

(::cAlias )->(OrdsetFocus("Fetcha")) .. the use of OrdScope ?? in tDatabase .. Yes, there is the method OrdScope(uTop, uBottom) in TDatabase. Use the same value for both uTop and uBottom to limit the ...

... search with TDatabase since it is object based ... and there is no 'like' or 'filter' in traditional DbfCdx .. but there is (::cAlias )->(OrdsetFocus("Fetcha")) .. the use of OrdScope ?? in tDatabase .. Appreciate your help!! Thanks Rick Lipkin

... cSceis1) ) oRsCust:Filter := "[CustomerName] = 'bogus'" Case !empty( cLname1 ) .and. Empty( cCid1 ) .and. Empty( cSceis1 ) * oDbf->OrdSetFocus( cLname1 ) * Set Scope to ( cLname1 ) * return ( ::cAlias )->( OrdScope( nScopeType, uValue ) ) * oRsCust:Filter := "[CustomerName] ...

Yes, I confirm that DBFILTER()/SET FILTER TO and ORDSETFOCUS() work under SQLRDD.

And yes, when a filter is set, OrdKeyCount() Works too.

But never OrdKeyNo()

I am going to test your new versión and share the results.

Thank you.

... ? indexord() ? LOCATE FOR ALLTRIM(CLIENTES->NOMBRE) = ALLTRIM(CNOMBRE) .AND. ALLTRIM(CLIENTES->APELLIDOS) = ALLTRIM(CAPELLIDOS) si OrdSetFocus(“CLIENTES2”) si RECNO() ? REPLACE si SELECT() si SELECT(“CLIENTES”) si SET FILTER ? SET SCOPE TO ( cSERIE + StrZero( NUMERO_ORI,20 ) ) ? ...

... (cFile)->RUT}) ordCreate(".\FINAL\"+cFile,"NOMBRE","(cFile)->NOMBRE",{|| (cFile)->NOMBRE}) (cFile)->(OrdSetFocus(2)) Cuando era solo un archivo no tenía problemas ahora tengo que generar DBF con distintos nombres. Muchas gracias por su ayuda Waldemar

... seem this function is not right with tdatabase as sad James and Nages FUNC CreaCodiceClienti(oDbf) LOCAL nLast := 0 local nArea := Select() oDbf:OrdSetFocus(0) oDbf:GoBottom() nLast := Val(oDbf:NumCli) + 1 Select (nArea) RETURN StrZero(nLast,4) I have always done it this way and besides I have ...

... in cSwapFields. Does not change fields no contained in cSwapFields. You decide what fields you want to swap Note: Keep the DBF in natural order ( OrdSetFocus( 0 ) )

... OrdName(<nOrder>,[<cOrderBagName>)->cOrderName OrdNumber(<cOrderName>,[<cOrderBagName>])->nOrderNo OrdSetFocus([<cOrderName>|<nOrder>],[<cOrderBagName>])->cPrevOrderNameInFocus OrdSkipRaw([<nRecords>])->Nil OrdWildSeek(<cWildCardString>,[<lCurrentRec>],[<lBackwards>])->lFound ...