##############################################################################
###+---------+################################################################
#+-| MONTH() |------------------------------------------------------------+###
#| +---------+ Returns the number of the month as derived from date_value |###
#+------------------------------------------------------------------------+###
##############################################################################
##############################################################################
#+--| Summary |--------------+################################################
#|     #INCLUDE date.hdr     |################################################
#+---------------------------+################################################
##############################################################################
##############################################################################
#+--| Syntax |--------------------------------+###############################
#|     FUNCTION INT month PROTOTYPE           |###############################
#|      PARAMETERS VALUE DATE date_value      |###############################
#+--------------------------------------------+###############################
##############################################################################
##############################################################################
###########+---| Description |------------------------------------+###########
###########| The month() function returns the number of the month |###########
###########| as derived from date_value.  January is month 1 and  |###########
###########| December is month 12.                                |###########
###########+------------------------------------------------------+###########
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    Use mailing lists based upon seasons.               |#########
#########|                                                          |#########
#########| month_val = month( today() )                             |#########
#########|                                                          |#########
#########| DO CASE                                                  |#########
#########|     CASE month_val = 11                                  |#########
#########|         DO xmas_list                                     |#########
#########|     CASE month_val =  9                                  |#########
#########|         DO halloween_list                                |#########
#########|     CASE month_val =  5                                  |#########
#########|         DO summer_list                                   |#########
#########| ENDCASE                                                  |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    Who has a birthday this month?  List names          |#########
#########| *    for company newsletter.                             |#########
#########|                                                          |#########
#########| LIST emp->name FOR month( emp->bdate ) = month( today() )|#########
#########+----------------------------------------------------------+#########
##############################################################################