Index: tolbase/lib/byswidget/beditmaster/beditmaster.tcl
===================================================================
--- tolbase/lib/byswidget/beditmaster/beditmaster.tcl	(revision 7cdaf52ccfe78e60b315db27b6b966c3206c1806)
+++ tolbase/lib/byswidget/beditmaster/beditmaster.tcl	(revision 584ad6dd9d8f8c76cc196eee88f3610dca72e2d5)
@@ -2112,6 +2112,7 @@
       puts "Error al ejecutar: $cmdTIC"
       return {}   
-    }    
-    ::tol::tableset create $cmdIC $infoColumns
+    }
+    ::tol::tableset create $cmdIC [ list Set $infoColumns ]
+    Tolcon_Trace "::tol::tableset create $cmdIC [ list Set $infoColumns ]"
   
     # Obtenemos informacion de las foregn keys
@@ -2129,7 +2130,7 @@
     }    
     # comprobamos que tenemos valores
-    set nRegFk [lindex [TclGetFromSet Set $infoForeignKeys] 0]
+    set nRegFk [lindex [TclGetVar Set $infoForeignKeys] 0]
     if {[expr $nRegFk > 0]} {
-      ::tol::tableset create $cmdIF $infoForeignKeys
+      ::tol::tableset create $cmdIF [ list Set $infoForeignKeys ]
     }  
 #Tolcon_Trace "EditMasterUtils::InitTable. nRegFk: $nRegFk"