Function Txn-Id

Part of:

package cl-berkeley-db.common-lisp.net
( txn-id < txn > )