--- a/tj.tcl	Thu Feb 11 16:23:45 2021 +0200
+++ b/tj.tcl	Mon Feb 15 13:42:10 2021 +0200
@@ -349,9 +349,10 @@
       return 1
     }
 
+    set ucreated [utl_sql_stamp_to_datetime [clock seconds]]
     if {$umode} {
       # Insert new entry
-      set usql "INSERT INTO tj (uid,uuser,ucreated,udesc,utype,utarget) VALUES ('[utl_escape $uid]', '[utl_escape $uhand]', [unixtime], '[utl_escape $rdesc]', 0, '$rdate')"
+      set usql "INSERT INTO tj (uid,uuser,ucreated,uupdated,udesc,utype,utarget) VALUES ('[utl_escape $uid]', '[utl_escape $uhand]', '$ucreated', '$ucreated', '[utl_escape $rdesc]', 0, '$rdate')"
       if {[catch {tj_dbh eval $usql} uerrmsg]} {
         tj_msg $upublic $unick $uchan "err_sql" [list $uerrmsg]
         tj_log "$uerrmsg on SQL:\n$usql"
@@ -364,6 +365,7 @@
     } else {
       # Update existing entry
       set usqlargs {}
+      lappend usqlargs "uupdated='$ucreated'"
       if {[string length $rdesc] > 0} {
         lappend usqlargs "udesc='[utl_escape $rdesc]'"
       }