::TolInspector --> Gramática Real

[Javier Gallardo]

Al utilizar el método DBConnect::Create() da un error cuando el usuario intenta acceder a la gramática Real del Inspector de Objetos de TolBase.

"Con.TeleSP.OtiCob::dbc::Activate" isn't a function in grammar Real
"Con.TeleSP.OtiCob::dbc::Activate" isn't a function in grammar Real

while executing

"::tol::info functions $grammar $fun"

(procedure "SelectGrammar" line 50)
invoked from within

"SelectGrammar"

("grammar" arm line 2)
invoked from within

"switch -regexp $node_type {

root {

switch $node_name {

root -
grammars {

ClearHiertables
#$w_tabset tab..."

(procedure "::TolInspector::SelectObject" line 41)
invoked from within

"::TolInspector::SelectObject"

Al parecer, cuando se usa ese método, que está definido en

tolbase-v2.0.1\bin\stdlib\data\db\_db_connect.tol,

crea un NameBlock con el nombre 'dbc' que luego evalúa y lo cambia por el nombre del proyecto:
Eval("NameBlock "+alias+"=dbc") Línea 149 del código

Luego, ó bien el procedimiento de Tcl ::TolInspector::SelectObject ó el ::TolInspector::SelectGrammar hacen algo raro y no entienden en el árbol que 'dbc' ya no existe, que debería ser (en mi caso) 'Con.TeleSP.OtiCob' con lo cual debería llamar al método Con.TeleSP.OtiCob::Activate en lugar del que está intentando llamar, Con.TeleSP.OtiCob::dbc::Activate.

[Jorge]

(In [3448]) refs #1165, todavia sin resolver

[Jorge]

NameBlock zzzdbconn =

DBConnect::Create(

"alias","user","pass",
"conntype", "database", "server",
"connection description");

[Víctor de Buen Remiro]

(In [3449]) Fixes #1165