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

##############################################################################
###+-------------+############################################################
#+-| A_LUPDATE() |-----------------------------+##############################
#| +-------------+ Returns date of last update |##############################
#+---------------------------------------------+##############################
##############################################################################
##############################################################################
#+--| Summary |------------------+############################################
#|     #INCLUDE database.hdr     |############################################
#+-------------------------------+############################################
##############################################################################
##############################################################################
#+--| Syntax |-------------------------------+################################
#|     FUNCTION DATE a_lupdate PROTOTYPE     |################################
#|      PARAMETERS ALIAS aliasname           |################################
#+-------------------------------------------+################################
##############################################################################
##############################################################################
##########+---| Description |--------------------------------------+##########
##########| The a_lupdate() function returns the date on which the |##########
##########| specified aliasname was last updated.                  |##########
##########| ------------------------------------------------------ |##########
##########| The a_lupdate() function performs identically to the   |##########
##########| lupdate() function.  a_lupdate() differs syntactically |##########
##########| in that it accepts an alias as a parameter.            |##########
##########+--------------------------------------------------------+##########
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    Determine if a backup is needed.                    |#########
#########|                                                          |#########
#########| IF a_lupdate( transactions ) > sys->last_back            |#########
#########|     COPY FILE "transact.dbf" TO "transact.bak"           |#########
#########| ENDIF                                                    |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    A database and its "related" database must          |#########
#########| *    have the same "update" date.  Note: the             |#########
#########| *    example code will only be compiled if the           |#########
#########| *    symbol "DEBUGGING" has been declared by a           |#########
#########| *    #define DEBUGGING preprocessor command.             |#########
#########|                                                          |#########
#########| #ifdef DEBUGGING                                         |#########
#########|     IF a_lupdate( a ) <> a_lupdate( relate_a )           |#########
#########|         ? "Error: Relation not set"                      |#########
#########|         QUIT                                             |#########
#########|     ENDIF                                                |#########
#########| #endif                                                   |#########
#########+----------------------------------------------------------+#########
##############################################################################