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

##############################################################################
###+------+###################################################################
#+-| GOTO |------------------------------------------------------+############
#| +------+ GOTO sets the record pointer to the specified record |############
#+---------------------------------------------------------------+############
##############################################################################
##############################################################################
#+--| Syntax |------------------------+#######################################
#|     [!<Alias>] GOTO <Long-exp>     |#######################################
#|     [!<Alias>] GO <Long-exp>       |#######################################
#+------------------------------------+#######################################
##############################################################################
##############################################################################
#######+---| Description |--------------------------------------------+#######
#######| GOTO sets the record number to any record, regardless of the |#######
#######| controlling index.  GOTO does not respect the status of the  |#######
#######| SET DELETE or SET FILTER TO flags.                           |#######
#######+--------------------------------------------------------------+#######
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    Position the record pointer at a specified record.  |#########
#########|                                                          |#########
#########| USE "totals.dbf" ALIAS totals                            |#########
#########| GOTO 3                                                   |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    GOTO records indicated by an array.                 |#########
#########|                                                          |#########
#########| VARDEF                                                   |#########
#########|     LONG  rec_value[ 10 ] = 1,2,3,4,5,6,7,8,9,10         |#########
#########|     INT   r                                              |#########
#########| ENDDEF                                                   |#########
#########|                                                          |#########
#########| PROCEDURE validate                                       |#########
#########|     FOR r = 0 TO 9                                       |#########
#########|         GOTO rec_value[ r ]                              |#########
#########|     NEXT                                                 |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 3 |-------------------------------------------+#########
#########| *    GOTO an account (account number is the              |#########
#########| *    record number.)                                     |#########
#########|                                                          |#########
#########| !accounts GOTO names->account                            |#########
#########+----------------------------------------------------------+#########
##############################################################################