#include <iostream>
using namespace std;
#include <stdio.h>
#define OTL_ORA11G_R2 // Compile OTL 4.0/OCI11.2
#if defined(__BORLANDC__)
#define OTL_BIGINT __int64 // Enabling G++ 64-bit integers
#define OTL_UBIGINT unsigned __int64 // Enabling G++ 64-bit integers
#elif !defined(_MSC_VER)
#define OTL_BIGINT long long // Enabling G++ 64-bit integers
#define OTL_UBIGINT unsigned long long // Enabling G++ 64-bit integers
#else
#define OTL_BIGINT __int64 // Enabling VC++ 64-bit integers
#define OTL_UBIGINT unsigned __int64 // Enabling VC++ 64-bit integers
#endif
#include <otlv4.h> // include the OTL 4.0 header file
const OTL_UBIGINT UBIG_VAL1=18446744073709551615ULL;
#include <otlv4.h> // include the OTL 4.0 header file
otl_connect db; // connect object
void insert()
// insert rows into table
{
otl_stream o(50, // buffer size
"insert into test_tab values(:f1<bigint>,:f2<char[31]>,:f3<ubigint>)",
// SQL statement
db // connect object
);
char tmp[32];
for(OTL_BIGINT i=1;i<=100;++i){
#if defined(_MSC_VER)
#if (_MSC_VER >= 1400) // VC++ 8.0 or higher
sprintf_s(tmp,sizeof(tmp),"Name%d",static_cast<int>(i));
#else
sprintf(tmp,"Name%d",static_cast<int>(i));
#endif
#else
sprintf(tmp,"Name%d",static_cast<int>(i));
#endif
o<<i<<tmp<<UBIG_VAL1;
}
}
void select()
{
otl_stream i(50, // buffer size
"select f1 :#1<bigint>, f2, f3 :#3<ubigint> "
// the default mapping of f1 and f3 needs to be overridden
// explicitly when (u)bigint's are used in a combination with
// OTL/OCIx, because the default mapping maps
// Oracle NUMBERs into double containers, which are not
// big enough to hold (unsigned) 64-bit integer values.
"from test_tab "
"where f1>=:f<bigint> and f1<=:ff<bigint>*2",
// SELECT statement
db // connect object
);
// create select stream
OTL_BIGINT f1;
char f2[31];
OTL_UBIGINT f3;
i<<static_cast<OTL_BIGINT>(8)
<<static_cast<OTL_BIGINT>(8); // assigning :f = 8; :ff = 8
// SELECT automatically executes when all input variables are
// assigned. First portion of output rows is fetched to the buffer
while(!i.eof()){ // while not end-of-data
i>>f1>>f2>>f3;
printf("f1=%lld, f2=%s, f3=%llu\n",f1,f2,f3);
}
}
int main()
{
otl_connect::otl_initialize(); // initialize OCI environment
try{
db.rlogon("scott/tiger"); // connect to Oracle
otl_cursor::direct_exec
(
db,
"drop table test_tab",
otl_exception::disabled // disable OTL exceptions
); // drop table
otl_cursor::direct_exec
(
db,
"create table test_tab(f1 number, f2 varchar2(30), f3 number)"
); // create table
insert(); // insert records into table
select(); // select records from table
}
catch(otl_exception& p){ // intercept OTL exceptions
cerr<<p.msg<<endl; // print out error message
cerr<<p.stm_text<<endl; // print out SQL that caused the error
cerr<<p.var_info<<endl; // print out the variable that caused the error
}
db.logoff(); // disconnect from Oracle
return 0;
}
f1=8, f2=Name8, f3=18446744073709551615
f1=9, f2=Name9, f3=18446744073709551615
f1=10, f2=Name10, f3=18446744073709551615
f1=11, f2=Name11, f3=18446744073709551615
f1=12, f2=Name12, f3=18446744073709551615
f1=13, f2=Name13, f3=18446744073709551615
f1=14, f2=Name14, f3=18446744073709551615
f1=15, f2=Name15, f3=18446744073709551615
f1=16, f2=Name16, f3=18446744073709551615
Copyright © 1996-2024, Sergei Kuchin, email: skuchin@gmail.com, skuchin@gmail.com/a>.