Date:         Wed, 13 May 1998 14:43:02 EDT
Reply-To:     Robert Greene <MHPERTG@IRIS.RFMH.ORG>
Sender:       "SPSSX(r) Discussion" <SPSSX-L@UGA.CC.UGA.EDU>
From:         Robert Greene <MHPERTG@IRIS.RFMH.ORG>
Subject:      Date Format problem ...

I was able to work out a solution:
 
I used the current time system variable like this:
 
COMPUTE TODAY = $TIME
PRINT FORMAT TODAY (ADATE10)
LIST TODAY
 
Result:
     TODAY
 
05/13/1998
====================================================================
=============================    ---:
  <MHPERTG@iris.rfmh.org>       /   :
 (v) 914 374-3171x3172         /    :
'Excelcior.'            /~~~~~      :
'Pax sapiens.'         :            :  Robert Greene, MS, MBA, CBHE
'Suum cuique.'          ~~~~~~~\    :  Program Evaluation
'E pluribus, pluribum.'         \*  :  Mid-Hudson Psychiatric Center
'Pro scientia atque sapientia'   \==== New Hampton, NY  10958-0158
====================================================================
=========================    >>>    'Pergamentum init, ibidem exit.'
The best thing about information is that we learn more when we share
it with others, and less when we keep it to ourselves. -- RTG, 1996.
====================================================================