Here's an example where a table is opened and saved with the current date. The last line saves the table with today's date embedded in it.
Also, Its important to pick a date format that doesn't have a "/" or a ":" in it.
//Earth Quates, last 7 days
Names Default To Here( 1 );
cd=get default directory();
data=expr(quake = Open(
//"/0000000027230BB0/eqs7day-M1.txt",
"http://earthquake.usgs.gov/earthquakes/catalogs/eqs7day-M1.txt",
columns(
Src = Character,
Eqid = Character,
Version = Character,
Datetime = Character,
Lat = Numeric,
Lon = Numeric,
Magnitude = Numeric,
Depth = Numeric,
NST = Numeric,
Region = Character
),
Import Settings(
End Of Line( CRLF, CR, LF ),
End Of Field( Comma ),
Strip Quotes( 1 ),
Use Apostrophe as Quotation Mark( 0 ),
Scan Whole File( 1 ),
Treat empty columns as numeric( 0 ),
Labels( 1 ),
Column Names Start( 1 ),
Data Starts( 3 ),
Lines To Read( All ),
Year Rule( "20xx" )
)
);
quake<< set name("Earthquakes "||short date(today()));
quake<< new column("DateTime2", <<format("m/d/y h:m:s"),
formula(
l = Words( :Datetime, " ," );
d = l[3] || Substr( l[2], 1, 3 ) || l[4] || " " || l[5];
Informat( d, "ddMonyyyy h:m:s" );
)
););
data;
quake << Save as( cd||"Earthquakes "||Format Date( Today(), "ddmonyyyy" )||".jmp" );
JMP Systems Engineer, Health and Life Sciences (Pharma)