Use regular tcl vars instead of bind vars.  The driver doesn't look at the variable value until the insert is performed.