Return a Date|Time Stamp

 This code snippet shows an example of how to create a date{}time stamp string that can be used for marking events. The optional sep string will go between the values. The returned string is formatted as YYMMDD{sep}HHMM.


 Function/S DateTimeStamp([sep])
	string sep
	
	string a, b, c, dstr, tstr
	string gExp
	
	if (ParamIsDefault(sep))
		sep = ""
	endif
	
	gExp = "([0-9]+):([0-9]+)"	
	SplitString/E=(gExp) secs2time(datetime,2), a, b
	tstr = a + b
	
	gExp = "([0-9]+)/([0-9]+)/([0-9]+)"	
	SplitString/E=(gExp) secs2date(datetime,-1), a, b, c
	dstr = c[2,3] + b + a
	
	return (dstr + sep +  tstr)

end
On my computer the date doesn't get reported.


•print DateTimeStamp()
  ..|20:33:50


For computer logging (not the best visually the best way of doing it) is:

091207203350 OR yearmonthdayhourminutesecond

This is because the time/date stamp can be sorted numerically. Also, since the string is a fixed length the individual parts can be obtained with a substring, i.e.

string year = mydatestring[0,1]

December 7, 2009 at 01:39 am - Permalink
Yes .... caveat emptor (in this case "user beware") ... the date() and time() functions return values that are likely platform specific and formatted by what you pre-define in your system preferences. The above works on a Mac with the standard format settings. Certainly, using the datetime() function and converting to the format you recommend would be more appropriate - this task is left as an exercise for the reader :-).

A feature request for Igor Pro is to have functions such as year(), month(), day([inyear/inmonth]), hours([24/12]), minutes(), and seconds() that return respective string or numerical values independent of platform and operating system.

--
J. J. Weimer
Chemistry / Chemical & Materials Engineering, UAH

December 7, 2009 at 07:19 am - Permalink
You could also use the following function instead:


Function/S DateTimeStamp()
	String dstr, tstr
	
	Variable timestamp = DateTime
	String sep_char = "."
	
	tstr = Secs2Time(timestamp, 3)
	dstr = Secs2Date(timestamp, -2, sep_char)
	
	// Replace numeric month with text abbreviation.
	String months = "Jan;Feb;Mar;Apr;May;Jun;Jul;Aug;Sep;Oct;Nov;Dec;"
	String month_abbreviation = StringFromList(str2num(StringFromList(1, dstr, sep_char)) - 1, months, ";")
	dstr = RemoveListItem(1, dstr, sep_char)
	dstr = AddListItem(month_abbreviation, dstr, sep_char, 1)
	dstr = RemoveEnding(dstr, sep_char)
	return (dstr + "|" + tstr)
End


It has the advantage of working using any time/date system settings, though the disadvantage is that the month strings are in English.

For the various year(), month(), etc. functions, you could use these:


Function year()
	return str2num(StringFromList(0, Secs2Date(DateTime, -2), "-"))
End

Function month()
	return str2num(StringFromList(1, Secs2Date(DateTime, -2), "-"))
End

Function day()
	return str2num(StringFromList(2, Secs2Date(DateTime, -2), "-"))
End

Function hour()
	return str2num(StringFromList(0, Secs2Time(DateTime, 3), ":"))
End

Function minute()
	return str2num(StringFromList(1, Secs2Time(DateTime, 3), ":"))
End

Function second()
	return str2num(StringFromList(2, Secs2Time(DateTime, 3), ":"))
End

Function/S GetDateTimeString()
	String dateTimeString = ""
	sprintf dateTimeString, "%.4d-%.2d-%.2d %.2d:%.2d:%.2d\r", year(), month(), day(), hour(), minute(), second()
	return dateTimeString
End


I think if we were to improve the ability to format date and time strings, instead of creating new year(), month(), etc. built in functions, it would be better to create a function like PHP's date() function, which, while complicates, allows you to format a date/time in pretty much any way imaginable.

December 7, 2009 at 09:30 am - Permalink
Super! The secs2date function does just the job. Amazing that I missed it. As for the months being in English, substituting with month numbers would take care of that problem.

Thanks.

--
J. J. Weimer
Chemistry / Chemical & Materials Engineering, UAH

December 7, 2009 at 10:06 am - Permalink
I've made changes corresponding to the suggestions. The version shown now should work across platforms and will return a date+time stamp in a YYMMDDHHMM format. To add SS (seconds) to the list, change the lines as shown below.


	gExp = "([0-9]+):([0-9]+):([0-9]+)"	
	SplitString/E=(gExp) secs2time(datetime,2), a, b, c
	tstr = a + b + c


--
J. J. Weimer
Chemistry / Chemical & Materials Engineering, UAH

December 8, 2009 at 08:42 am - Permalink

Forum

Support

Gallery

Igor Pro 10

Learn More

Igor XOP Toolkit

Learn More

Igor NIDAQ Tools MX

Learn More