@main[]
<table border=1>
^datecreatestring2show[2000 ]
^datecreatestring2show[ 2000-02]
^datecreatestring2show[2000-2-03]
^datecreatestring2show[ 2000 - 02-03    15]
^datecreatestring2show[2000-02-03 15:  30] 
^datecreatestring2show[2000-02-03 15:30 :04] 
^try-catch{^datecreatestring2show[2000-02-03 15: 30:04. hren]}
#^datecreatestring2show[15:30] 
#^datecreatestring2show[15:30:05] 
#^datecreatestring2show[15:30:05 hren] 
^datecreatestring2show[2002:12:02]
</table>

@datecreatestring2show[s]
$date[^date::create[$s]]
<tr>
<td>$s</td><td align=right>^date.sql-string[]</td>
</tr>