Retro video games delivered to your door every month!
Click above to get retro games delivered to your door ever month!
X-Hacker.org- Artful Two for Clipper 5.0 - Norton Guide http://www.X-Hacker.org [<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]

Syntax

SEEK_REL( pTarget [, cAlias [, nOrder [, lCheck ;

               [, nMode [, lFirst [, lSoft ;

@SYNTAX3 =           [, xcResult ]]]]]]] )

Purpose

SEEK a record with or without a relation to a parent file.

Arguments

     cTarget -- the key value to seek

     cAlias -- if passed, table in which to seek

     nOrder -- if passed, index order to set

     lCheck -- if passed, whether to report any breaks in the relational
               chain on the status line, default .T.

     nMode -- if passed,

            0 = return to current record on no-find,

            1 = always return to current record, ]

            2 = always stay where the SEEK leaves the record pointer.

            Default is 0.

     lFirst -- if passed and .T., SEEK even if the current record matches
               the key. Default is .F.

     lSoft -- if passed, SOFTSEEK setting, default .F.

     xcResult -- if passed, string to be macro-evaluated for result, else
                 .T. if found, .F. if not.

Setup

This function hides the implementation of a SEEK command from THE_USUAL().
It is not intended for use outside THE_USUAL(). All conventions of the
application dictionary are in force here.

Example

     record = SEEK_REL( "Smith", "CUST" )

Returns

Macro expansion of xcResult if passed, else .T. or .F.

Side Effects

The file pointer moves to the record found, or remains on the current
record if the search fails.

Artful Calls

CHECK_REL, MAKE_STR, POP_MSG, FILTR_TYPE, GET_ORDER

Source File

AA_MOVE.PRG

See Also: THE_USUAL()

Online resources provided by: http://www.X-Hacker.org --- NG 2 HTML conversion by Dave Pearson