Hi

iowa's method will work well, and you shouldn't need anything further, but here are a few macro assignments that can help:

%let dt = %SYSFUNC(DATETIME(),DATETIME.); /* Current date and time */
%let time = %SYSFUNC(TIME(),TIME.); /* Current time */
%let date = %SYSFUNC(TODAY(),DATE9.); /*Current date */

%let yymm = %SYSFUNC(TODAY(), yymmn6.);  /* Current month in format yyyymm*/
%let pyymm = %SYSFUNC(INTNX(MONTH, %SYSFUNC(TODAY(),-1,e), yymmn6.);  /* Previous month in format yyyymm */

%let monthend = %SYSFUNC(INTNX(MONTH, %SYSFUNC(TODAY()), -1,e), DATE9.);  /*  Last day of last month */

Thus for your solution, you could use this assignment:

Either :

DATA Test;
 set test;
   NewDate = TRIM(DATE)||&time;
RUN;

OR

DATA Test;
 set test;
   NewDate = TRIM(DATE)||%SYSFUNC(TIME(),TIME.);;
RUN;

OR

DATA Test;
 set test;
   NewDate = TRIM(DATE)||PUT(TIME(),TIME.);
RUN;


Depending on what you need the timestamp to be;

Hi,
I thought you might be looking for a more pure macro solution so here is something that might work for you.
----------------------------------------------
* This just simulates getting the date value out of your dataset;
data _null_;
  ExistingDate = '01JAN1999'd;
  call symput('ExistingDate',ExistingDate);
run;
*This will append the current time to the date date.  I think this is the heart of what you needed;
* Notice that the DHMS function will except a time value in the last postiion as it is just the total seconds;
%let ExisitingDateWithTime = %sysfunc(dhms(&ExistingDate,0,0,%sysfunc(time())));
* Here I am just converting it to a string so that we can output the results;
%let ExisitingDateWithTimeStr = %sysfunc(putn(&ExisitingDateWithTime,datetime40.));
%put &ExisitingDateWithTimeStr;

Hope that works.
Curtis