[HE] June 7 2009: I have a problem with bindvariables and [oratcl] 4.4.
The original task is to analyse a huge textfile, search the data in an oracle xe database 
and add the data if the data is missing in the database. The problem is that the tcl script grows and grows.

I analysed the problem and the following reproduces the problem:

I use an oracle XE database with its standardschema hr. The machine on which it runs is a dual core 2 with windows xp sp2. Database and script are running on the same machine.
I add the following table and add one row to the table: 


======
 CREATE TABLE  TAG (
        id NUMBER, 
        k VARCHAR2(1000), 
        v VARCHAR2(1000), 
        typ VARCHAR2(20)
 );
 INSERT INTO tag (id, k, v, typ) VALUES (0, 'created_by', 'HE', 'node');
======


The following is the script which reproduce the huge memory use:

======
 package require Oratcl 4.4
 set db(db)   xe
 set db(user) hr
 set db(pass) hr
 set db(logon) [oralogon $db(user)/$db(pass)@$db(db)]

 set db(tag_select)          [oraopen $db(logon)]
 oraparse $db(tag_select) {SELECT id FROM tag WHERE k = :k AND v = :v AND typ = :typ}

 set tmp(k)   created_by
 set tmp(v)   JOSM
 set tmp(typ) node

 for {set n 0} {$n < 1000000} {incr n} {
        orabindexec $db(tag_select) :k $tmp(k) :v $tmp(v) :typ $tmp(typ)
 }
======


It looks like binding new values to the bindvariables of the same statementhandle consumes the memory.
Is this known? A bug? Or have I missed something?
----
!!!!!!
%| [Category Discussion] | [Category Development] |%
!!!!!!