Click above to get retro games delivered to your door ever month!

Syntax

NEXT( cFld_name[, nKey_no[, cTable ]] )

Purpose

Obtain the next item in a sequential index.

Arguments

     cFld_name -- name of field to increment

     nKey_no -- number of the index to use; defaults to current index

     cTable -- table to look in; defaults to current table

Setup

ctable is open and indexed.

Examples

To increment the field Order_num without reference to which
index it is...

     IF !EMPTY( NEXT( "ORDER_NUM" ) )

The following example would appear in your udf_say for a table
managed by THE_USUAL. It allows for automatic generation of
unique user id's whenever a new person is added to the database.

     IF is_append
        mAccount_No := NEXT( "Account_No", ;
                             GET_ORDER( "Account_No" )" )
     ENDIF

Returns

If successful, it returns the last item according to the named index,
incremented by 1. Otherwise it returns a blank.

Side Effects

None.

Artful Calls

GET_ORDER, STRZERO, VERIFY, STRZERO

Source Files

AA_NEXT.PRG, AM_NEXT.PRG