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]
##############################################################################
###+-------------------+######################################################
#+-| DISPLAY STRUCTURE |---------------------------------------------+########
#| +-------------------+ The DISPLAY STRUCTURE command displays the  |########
#|                       structure of the database in the current    |########
#|                       alias through the same I/O as the ? command |########
#+-------------------------------------------------------------------+########
##############################################################################
##############################################################################
#+--| Syntax |-------------------------------------+##########################
#|     [!<Alias>] DISPLAY STRUCTURE [TO PRINT]     |##########################
#+-------------------------------------------------+##########################
##############################################################################
##############################################################################
##########+---| Description |--------------------------------------+##########
##########| The output of DISPLAY STRUCTURE is sent to the screen. |##########
##########| If the display requires more than 24 lines of screen   |##########
##########| output, then DISPLAY STRUCTURE will pause.             |##########
##########| ------------------------------------------------------ |##########
##########| TO PRINT                                               |##########
##########|                                                        |##########
##########| Duplicates screen output to the print device activated |##########
##########| by the SET PRINTER TO command.                         |##########
##########+--------------------------------------------------------+##########
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    DISPLAY STRUCTURE works well in debugging.          |#########
#########|                                                          |#########
#########| #DEFINE  DEBUG                                           |#########
#########|                                                          |#########
#########| DBFDEF  customer                                         |#########
#########|     CHAR(20)  name                                       |#########
#########|     CHAR(20)  product                                    |#########
#########| ENDDEF                                                   |#########
#########|                                                          |#########
#########| PROCEDURE force_main                                     |#########
#########|                                                          |#########
#########|     USE "customer.dbf" ALIAS customer                    |#########
#########|                                                          |#########
#########| #IFDEF DEBUG                                             |#########
#########|     DISPLAY STRUCTURE                                    |#########
#########|     WAIT                                                 |#########
#########| #ENDIF                                                   |#########
#########| .                                                        |#########
#########| .                                                        |#########
#########| .                                                        |#########
#########| ENDPRO                                                   |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    DISPLAY STRUCTURE if error procedure is entered.    |#########
#########|                                                          |#########
#########| PROCEDURE error_proc                                     |#########
#########|     DISPLAY STRUCTURE                                    |#########
#########|     QUIT                                                 |#########
#########| ENDPRO                                                   |#########
#########|                                                          |#########
#########| PROCEDURE force_main                                     |#########
#########|     ON ERROR DO error_proc                               |#########
#########| {...}                                                    |#########
#########| ENDPRO                                                   |#########
#########+----------------------------------------------------------+#########
##############################################################################

See Also: LIST STRUCTURE SET CONSOLE

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