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

##############################################################################
###+--------+#################################################################
#+-| DTOC() |----------------------------------------------------+############
#| +--------+ Returns a character string representing date_value |############
#+---------------------------------------------------------------+############
##############################################################################
##############################################################################
#+--| Summary |--------------+################################################
#|     #INCLUDE date.hdr     |################################################
#+---------------------------+################################################
##############################################################################
##############################################################################
#+--| Syntax |-------------------------------+################################
#|     FUNCTION CHAR dtoc PROTOTYPE          |################################
#|      PARAMETERS VALUE DATE date_value     |################################
#+-------------------------------------------+################################
##############################################################################
##############################################################################
########+---| Description |-------------------------------------------+#######
########| The dtoc() function returns a character string representing |#######
########| date_value.  dtoc() uses the current status of the SET DATE |#######
########| TO flag to format the date character string.                |#######
########| see DATE TYPE TABLE in COMMANDS under SET DATE.             |#######
########+-------------------------------------------------------------+#######
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    Insert the date into a memo prior to editing        |#########
#########| *    the memo.                                           |#########
#########|                                                          |#########
#########| m_open( database->memofield, &A_APPEND )                 |#########
#########| m_putln( database->memofield, dtoc( today() )            |#########
#########| m_close( database->memofield )                           |#########
#########| m_edit( database->memofield ...                          |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    Print the date on each page of a report.            |#########
#########|                                                          |#########
#########| SET ALTERNATE TO "report.fil"                            |#########
#########| SET ALTERNATE ON                                         |#########
#########| !accounting GOTO TOP                                     |#########
#########| DO WHILE .NOT. a_eof( accounting )                       |#########
#########|     ? chr( 12 )             && print form feed           |#########
#########|     ? "Account Report"+space(55)+dtoc(today())           |#########
#########|     {...}                                                |#########
#########+----------------------------------------------------------+#########
##############################################################################