@main[][n;d;d2]
$n[^date::now[]]
$d[^date::today[]]
^if($n.year == $d.year && $n.month == $d.month && $n.day == $d.day && $d.hour == 0 && $d.minute == 0 && $d.second == 0){OK}{Failed}

<hr />

$d2[^date::create(2000;02;29;01;23;45)]
^d2.sql-string[]<br />
^d2.sql-string[datetime]<br />
^d2.sql-string[date]<br />
^d2.sql-string[time]<br />

<hr />

^d2.double[]
^d2.int[]
^eval(^d2.bool[]*1)

^try-catch{ ^d2.sql-string[hren] }