125 lines
2.5 KiB
C++
125 lines
2.5 KiB
C++
|
/**
|
||
|
|
* @file: $RCSfile: oracle_process.cpp,v $
|
||
|
|
* @brief: $IEC 61850 Protocol
|
||
|
|
*
|
||
|
|
* @version: $Revision: 1.1 $
|
||
|
|
* @date: $Date: 2018/11/24 06:54:51 $
|
||
|
|
* @author: $Author: lizhongming $
|
||
|
|
* @state: $State: Exp $
|
||
|
|
*
|
||
|
|
* @latest: $Id: oracle_process.cpp,v 1.1 2018/11/24 06:54:51 lizhongming Exp $
|
||
|
|
*
|
||
|
|
*/
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
#include <iostream>
|
||
|
|
using namespace std;
|
||
|
|
#include <stdio.h>
|
||
|
|
|
||
|
|
#define OTL_ORA11G
|
||
|
|
#include "otlv4.h" // include the OTL 4 header file
|
||
|
|
|
||
|
|
otl_connect db; // connect object
|
||
|
|
|
||
|
|
int OTLConnect (const char* pszConnStr)
|
||
|
|
{
|
||
|
|
try
|
||
|
|
{
|
||
|
|
otl_connect::otl_initialize(); // initialize OCI environment
|
||
|
|
db.rlogon(pszConnStr);
|
||
|
|
//db.auto_commit_off ( );
|
||
|
|
printf ( "CONNECT: OK!\n" );
|
||
|
|
}
|
||
|
|
catch(otl_exception& p)
|
||
|
|
{ // intercept OTL exceptions
|
||
|
|
printf ( "Connect Error: (%s) (%s) (%s)\n",p.msg, p.stm_text, p.var_info );
|
||
|
|
return -1;
|
||
|
|
}
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
int OTLDisconnect()
|
||
|
|
{
|
||
|
|
//db.commit ( );
|
||
|
|
db.logoff();
|
||
|
|
printf ( "DISCONNECT: OK!\n" );
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
void insert()
|
||
|
|
// insert rows into table
|
||
|
|
{
|
||
|
|
otl_stream o(50, // buffer size
|
||
|
|
"insert into test_tab values(:f1<int>,:f2<char[31]>)",
|
||
|
|
// SQL statement
|
||
|
|
db // connect object
|
||
|
|
);
|
||
|
|
char tmp[32];
|
||
|
|
for(int i=1;i<=100;++i){
|
||
|
|
sprintf(tmp,"Name%d",i);
|
||
|
|
// the old way (operators >>() / <<()) is available as always:
|
||
|
|
o<<i<<tmp;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
void select()
|
||
|
|
{
|
||
|
|
otl_stream i(50, // buffer size
|
||
|
|
"select * from test_tab where f1>=:f<int> and f1<=:f*2",
|
||
|
|
// SELECT statement
|
||
|
|
db // connect object
|
||
|
|
);
|
||
|
|
// create select stream
|
||
|
|
|
||
|
|
float f1=0;
|
||
|
|
char f2[31];
|
||
|
|
// the old way (operators >>() / <<()) is available as always:
|
||
|
|
i<<8; // assigning :f = 8
|
||
|
|
// C++98/03 compiler
|
||
|
|
while(!i.eof()){ // while not end-of-data
|
||
|
|
i>>f1>>f2;
|
||
|
|
cout<<"f1="<<f1<<", f2="<<f2<<endl;
|
||
|
|
}
|
||
|
|
|
||
|
|
i<<4; // assigning :f = 4
|
||
|
|
while(!i.eof()){ // while not end-of-data
|
||
|
|
i>>f1>>f2;
|
||
|
|
cout<<"f1="<<f1<<", f2="<<f2<<endl;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
int main2()
|
||
|
|
{
|
||
|
|
OTLConnect("pqsadmin/pqsadmin@PQSBASE"); // connect to Oracle
|
||
|
|
try{
|
||
|
|
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))"
|
||
|
|
); // 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
|
||
|
|
}
|
||
|
|
|
||
|
|
//OTLDisconnect();
|
||
|
|
return 0;
|
||
|
|
}
|