Retro video games delivered to your door every month!
Click above to get retro games delivered to your door ever month!
X-Hacker.org- FORCE Data Base Compiler - ############################################################################## http://www.X-Hacker.org [<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]
##############################################################################
###+------+###################################################################
#+-| EDIT |--------------------------------------------------------------+####
#| +------+ The EDIT command allows changes to field data in the current |####
#|          or selected alias through either the format block set by     |####
#|          SET FORMAT TO <Format-ident> or by a default format block.   |####
#+-----------------------------------------------------------------------+####
##############################################################################
##############################################################################
#+--| Syntax |-------------------------------------------------+##############
#|     [!<Alias>] EDIT [Scope][WHILE <L-exp>][FOR <L-exp>]     |##############
#|     [FIELDS <Field-list>]                                   |##############
#+-------------------------------------------------------------+##############
##############################################################################
##############################################################################
########+---| Description |-------------------------------------------+#######
########| EDIT is a "full screen" command.  Use of the EDIT command   |#######
########| eliminates program control of the record pointer and data   |#######
########| validity in specified fields.  The record pointer is        |#######
########| changed by using the PgUp and PgDn keys.                    |#######
########| ----------------------------------------------------------- |#######
########| Refer to the EDIT KEYS TABLE table for a list of keystrokes |#######
########| and their meanings.                                         |#######
########+-------------------------------------------------------------+#######
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    Edit a record in a part database.                   |#########
#########|                                                          |#########
#########| USE "parts.dbf" ALIAS parts INDEX partno                 |#########
#########| INPUT "Part number: " TO part_num                        |#########
#########| SEEK part_num                                            |#########
#########| IF found()                                               |#########
#########|     EDIT                                                 |#########
#########| ENDIF                                                    |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    Use [Scope] to limit the EDIT command               |#########
#########| *    to one record.                                      |#########
#########|                                                          |#########
#########| IF found()                                               |#########
#########|     EDIT RECORD a_recno( parts ) FIELDS parts->number    |#########
#########| ENDIF                                                    |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 3 |-------------------------------------------+#########
#########| *    EDIT fields that match the criteria.                |#########
#########|                                                          |#########
#########| EDIT REST FOR parts->desc = 'bolt' ;                     |#########
#########|     FIELDS parts->number, parts->cost                    |#########
#########+----------------------------------------------------------+#########
##############################################################################

See Also: EDIT KEYS TABLE CHANGE READ SET FORMAT TO

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