anchor.diff:      ct:pal(info, "Starting ~p processes", [length(Tables)]),
       [{tables, Tables}, {binds, Binds}, {config, {Tns,User,Pswd}}  | InitConfigData].
   
  -end_per_suite(_ConfigData) ->
  +end_per_suite(ConfigData) ->
  +    Tables = lists:merge([Tabs || {_,Tabs} <- ?value(tables, ConfigData)]),
  +    {Tns,User,Pswd} = ?value(config, ConfigData),
  +    OciPort = oci_port:start_link([{logging, true}]),
  +    OciSession = OciPort:get_session(Tns, User, Pswd),
  +    [tab_drop(OciSession, Table) || Table <- Tables],
       ct:pal(info, "Finishing...", []).
   
   load(ConfigData) ->
  
positive.code: -define(TAB, "erloci_load").
  
  %10 10 100
  -define(CONNECTIONS, 10).
  -define(STATEMENTS, 10).
  -define(ROWS_PER_TABLE, 1000).
  
  -define(CONNIDLIST, lists:seq(1, ?CONNECTIONS)).
  -define(STMTIDLIST, lists:seq(1, ?STATEMENTS)).
  
negative.code:     case DropStmt:exec_stmt() of
          {error, _} -> ok; 
          _ ->
              %ct:pal(info, "[~s] Droped!", [Table]),
              ok = DropStmt:close()
      end.
  
  