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

##############################################################################
###+--------------+###########################################################
#+-| A_RECCOUNT() |----------------------------------------------------+######
#| +--------------+ Returns number of records within the database file |######
#+---------------------------------------------------------------------+######
##############################################################################
##############################################################################
#+--| Summary |------------------+############################################
#|     #INCLUDE database.hdr     |############################################
#+-------------------------------+############################################
##############################################################################
##############################################################################
#+--| Syntax |--------------------------------+###############################
#|     FUNCTION LONG a_reccount PROTOTYPE     |###############################
#|      PARAMETERS ALIAS aliasname            |###############################
#+--------------------------------------------+###############################
##############################################################################
##############################################################################
#########+---| Description |----------------------------------------+#########
#########| The a_reccount() function returns the number of records  |#########
#########| within the database file of the specified aliasname.     |#########
#########| a_reccount() counts all records regardless of SET FILTER |#########
#########| TO and SET DELETE.                                       |#########
#########| -------------------------------------------------------- |#########
#########| The a_reccount() function performs identically to the    |#########
#########| reccount() function.  a_reccount() differs syntactically |#########
#########| in that it accepts an alias as a parameter.              |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    Show percentage of work done.  The variable         |#########
#########| *    "recs" contains the number of records               |#########
#########| *    already processed.                                  |#########
#########|                                                          |#########
#########| ? recs, "OF", a_reccount( myfile ), "PROCESSED"          |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    This example encodes a same_count() function.       |#########
#########| *    The function returns .T. if two databases           |#########
#########| *    have the same number of records.                    |#########
#########|                                                          |#########
#########| #include database.hdr                                    |#########
#########| FUNCTION LOGICAL same_count                              |#########
#########|  PARAMETERS ALIAS d1, ALIAS d2                           |#########
#########|     RETURN a_reccount( d1 ) = a_reccount( d2 )           |#########
#########|                                                          |#########
#########| ENDPRO                                                   |#########
#########+----------------------------------------------------------+#########
##############################################################################