U++ forum: Welcome to the forum

Re: Oracle RefCursor and Stored Procedure [message #42998 is a reply to message #42963]

Tue, 22 April 2014 14:53

aksdb
Messages: 6
Registered: April 2014

Promising Member

It's already a quite minimal example. I anonymized it to show you what I currently do:

#include <Core/Core.h>
#include <Sql/Sql.h>
#include <Oracle/Oracle8.h>

using namespace Upp;

void runQuery()
{
	StringBuffer sb;
	
	sb << "DECLARE \n";
	sb << "  res SOME_CUSTOM_TYPE; \n";
	sb << "BEGIN \n";
	sb << "  res := SCHEMA.PACKAGE.FUNCTION(OutCursor=>?); \n";
	sb << "END; \n";
	
	Sql ref;
	if (SQL.Execute(sb, RawToValue(&ref)))
	{
		Cout() << "Call succeeded" << EOL;
		
		for (int i = 0; i < ref.GetColumnCount(); ++i) {
			Cout() << Format("%d: %s", i, ref.GetColumnInfo(i).name) << EOL;
		}
		
		while (ref.Fetch()) {
			Cout() << ref[0] << EOL;
		}
	}
	else
	{
		Cout() << "Call failed" << EOL;
		Cout() << SQL.GetLastError() << EOL;
	}
}

CONSOLE_APP_MAIN
{
	Cout() << "Start" << EOL;
	
	String sUser("USER");
	String sPassword("PASS");
	String sDB("DB");
	
	String sConnStr;
	sConnStr.Cat() << sUser << "/" << sPassword << "@" << sDB;
	
	Oracle8 oraSession;
	if (!oraSession.Open(sConnStr, false)) {
		Cout() << "Cannot open DB connection." << EOL;
		Cout() << oraSession.GetLastError() << EOL;
		return;
	}
	
	SQL = oraSession;

	runQuery();
	
	Cout() << "Done" << EOL;
}

I also attach the backtrace (I'm already looking into it, but at least to me it's not obvious (yet) what goes wrong here.):

#0  0x000000000048f308 in Upp::Panic (
    msg=0x7fffffffe0d0 "Heap is corrupted --memory-breakpoint__ 1168 ")
    at /home/aksdb/upp/uppsrc/Core/Util.cpp:119
#1  0x000000000046b2e7 in Upp::HeapPanic (
    text=0x7fffffffe0d0 "Heap is corrupted --memory-breakpoint__ 1168 ", 
    pos=0x7ffff7ff6060, size=-1)
    at /home/aksdb/upp/uppsrc/Core/heaputil.cpp:202
#2  0x000000000046d87c in Upp::DbgHeapPanic (
    text=0x59290a "Heap is corrupted ", p=0x7ffff7ff6040)
    at /home/aksdb/upp/uppsrc/Core/heapdbg.cpp:53
#3  0x000000000046da96 in Upp::MemoryFree (ptr=0x7ffff7ff6060)
    at /home/aksdb/upp/uppsrc/Core/heapdbg.cpp:130
#4  0x0000000000445b5c in operator delete[] (ptr=0x7ffff7ff6060)
    at /home/aksdb/upp/uppsrc/Core/Core.h:255
#5  0x00000000004b2927 in Upp::OCI8Connection::Item::Clear (
    this=0x7ffff7fdd1c0) at /home/aksdb/upp/uppsrc/Oracle/Oci8.cpp:186
#6  0x00000000004b2a1f in Upp::OCI8Connection::Item::~Item (
    this=0x7ffff7fdd1c0, __in_chrg=<optimized out>)
    at /home/aksdb/upp/uppsrc/Oracle/Oci8.cpp:208
#7  0x00000000004bdebb in Upp::Array<Upp::OCI8Connection::Item>::Free (
    this=0x7ffff7fdf0e0) at /home/aksdb/upp/uppsrc/Core/Vcont.hpp:388
#8  0x00000000004bd6c9 in Upp::Array<Upp::OCI8Connection::Item>::~Array (
    this=0x7ffff7fdf0e0, __in_chrg=<optimized out>)
    at /home/aksdb/upp/uppsrc/Core/Vcont.h:263
#9  0x00000000004b8cdc in Upp::OCI8Connection::~OCI8Connection (
    this=0x7ffff7fdf060, __in_chrg=<optimized out>)
    at /home/aksdb/upp/uppsrc/Oracle/Oci8.cpp:1214
#10 0x00000000004b8dbe in Upp::OCI8Connection::~OCI8Connection (
    this=0x7ffff7fdf060, __in_chrg=<optimized out>)
    at /home/aksdb/upp/uppsrc/Oracle/Oci8.cpp:1217
#11 0x0000000000588827 in Upp::Sql::Detach (this=0x7ffff7ff8160)
    at /home/aksdb/upp/uppsrc/Sql/Sql.cpp:676
#12 0x0000000000588887 in Upp::Sql::~Sql (this=0x7ffff7ff8160, 
    __in_chrg=<optimized out>) at /home/aksdb/upp/uppsrc/Sql/Sql.cpp:688
#13 0x00000000004f4eb4 in Upp::One<Upp::Sql>::Free (this=0x7fffffffe598)
    at /home/aksdb/upp/uppsrc/Core/Other.h:26
#14 0x00000000004f44aa in Upp::One<Upp::Sql>::Clear (this=0x7fffffffe598)
    at /home/aksdb/upp/uppsrc/Core/Other.h:35
#15 0x00000000004ea432 in Upp::SqlSession::SessionClose (this=0x7fffffffe4d0)
    at /home/aksdb/upp/uppsrc/Sql/Session.cpp:90
#16 0x00000000004ba3d0 in Upp::Oracle8::Logoff (this=0x7fffffffe4d0)
    at /home/aksdb/upp/uppsrc/Oracle/Oci8.cpp:1343
#17 0x00000000004baf36 in Upp::Oracle8::~Oracle8 (this=0x7fffffffe4d0, 
    __in_chrg=<optimized out>)
    at /home/aksdb/upp/uppsrc/Oracle/Oci8.cpp:1455
#18 0x0000000000404680 in ConsoleMainFn_ ()
    at /home/aksdb/MyApps/SQLTest/SQLTest.cpp:59
#19 0x0000000000485957 in Upp::AppExecute__ (app=0x404353 <ConsoleMainFn_()>)
    at /home/aksdb/upp/uppsrc/Core/App.cpp:322
#20 0x0000000000404347 in main (argc=1, argv=0x7fffffffe7f8, 
    envptr=0x7fffffffe808) at /home/aksdb/MyApps/SQLTest/SQLTest.cpp:37

I'll debug this further in hopes to find out, what reference is corrupt exactly (I presume some of the special refcursor handling isn't up-to-date with other SQL backend changes ... but we'll see Smile

)

Report message to a moderator