Silvio:

Here is a bit of code I use to store the date/time of the executable allowing the user to press a function key and display the program version / date / time, etc. Useful information for customer support. Works for my purposes.

**************************************************************
* Format program date mm/dd/yy, get rid of any leading zeroes
**************************************************************
lcProgDateMDY  = DTOC( FDATE( "level3.exe" ) )
ln_LenProgDate = LEN( lcProgDateMDY )
gc_ProgDateMDY = IIF( LEFT( lcProgDateMDY, 1 ) = "0", ;
                      RIGHT( lcProgDateMDY, ln_LenProgDate - 1 ),;
                      lcProgDateMDY )
**************************************************************
* Format program time hh:mm, get rid of any leading zeroes,
* add AM/PM to end of date
**************************************************************
lc_ProgTimeHHMM  = FTIME( "level3.exe" )
ln_LenProgTime   = LEN( lc_ProgTimeHHMM )
lc_ProgTimeHHMM  = IIF( LEFT( lc_ProgTimeHHMM, 1 ) = "0", ;
                   RIGHT( lc_ProgTimeHHMM, ln_LenProgTime - 1 ), ;
                   lc_ProgTimeHHMM )
gc_ProgTimeHHMM  = LEFT( lc_ProgTimeHHMM, 5 );
                 + RIGHT( lc_ProgTimeHHMM, 3 )