0x10009 Error

[DocTauri]

I'm trying to import a local .tmf file into mfs (i.e. from a thumb drive). I've downloaded embeem's import.tcl, but can't get it to work. It seems that it's dying with a 0x10009 when trying to


set myobj [db $::db create $type]


It's doing this while extracting the xml, and actually seems to go ok when it's on a "Recording" object, but when it hits the "Program" object it dies.

Does anyone have any suggestions?


xml: showing.xml 3359
Type:Recording:
Type:Program:
can't create object (0x10009)

while executing
"db $::db create $type"
("Object" arm line 3)
invoked from within
"switch $obj {
Object {
puts "Type:$type:"
set myobj [db $::db create $type]
if {$type=="Recording"} {
..."
("default" arm line 5)
invoked from within
"switch [string index $tag 0] {
? {
}
/ { ;# end tag
set tag [string range $tag 1 end]
if { $tag == [lindex $stack en..."
(procedure "xml2tcl" line 7)
invoked from within
"xml2tcl $xml"
("uplevel" body line 2)
invoked from within
"uplevel $body"
invoked from within
"transaction {uplevel $body}"
(procedure "RetryTransaction" line 5)
invoked from within
"RetryTransaction {
set res [xml2tcl $xml]
set recording [lindex $res 0]
dbobj $recording set BitRate 0 ;# obsolete
dbo..."
("*.xml" arm line 5)
invoked from within
"switch -glob $name {
*.xml {
set len [tarobj length]
puts "xml: $name $len"
set xml [tarobj read $len]
RetryTransaction {
..."
(file "./import.tcl" line 157)


Thanks,
Doc

[DocTauri]

If I just grep "Object" from my showing.xml, I get

<Object type="Recording" id="_top">
<SubObject type="RecordingPart" id="Part">
</SubObject>
<SubObject type="RecordingPart" id="Part">
</SubObject>
<SubObject type="Showing" id="Showing">
<Object type="Program" id="Program">
<SubObject type="ApgProgram" id="ApgProgram">
</SubObject>
<Object type="Series" id="Series">
</Object>
</Object>
<Object type="Station" id="Station">
</Object>
</SubObject>
</Object>


The Recording object, and all 3 subobjects create ok, but for some reason, when it hits the Program object it chokes. In this, I have it output the object and subobject info when it gets it, just to ensure it's dying where I think it is:


Object:Recording:
SubObject: Type:RecordingPart: Parent:dbobj2:
SubObject: Type:RecordingPart: Parent:dbobj2:
SubObject: Type:Showing: Parent:dbobj2:
Object:Program:
can't create object (0x10009)