#include <iostream.h> #include <stdio.h>
#define OTL_ORA8I // Compile OTL 4.0/OCI8
#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<int>,:f2<char[31]>)",
// SQL statement
db // connect object
);
int i,j;
char tmp[32];
otl_var_desc* vdesc;
int vdesc_len;
vdesc=o.describe_in_vars(vdesc_len);
for(j=0;j<vdesc_len;++j){
cout<<"IN VAR =========================>"<<j<<endl;
cout<<"param_type="<<vdesc[j].param_type<<endl;
cout<<"ftype="<<vdesc[j].ftype<<endl;
cout<<"elem_size="<<vdesc[j].elem_size<<endl;
cout<<"array_size="<<vdesc[j].array_size<<endl;
cout<<"pos="<<vdesc[j].pos<<endl;
cout<<"name_pos="<<vdesc[j].name_pos<<endl;
cout<<"name="<<vdesc[j].name<<endl;
cout<<"pl_tab_flag="<<vdesc[j].pl_tab_flag<<endl;
}
cout<<endl<<"Inserting rows into table..."<<endl;
for(i=1;i<=5;++i){
sprintf(tmp,"Name%d",i);
cout<<"============= Inserting ========>"<<i<<endl;
vdesc=o.describe_next_in_var();
cout<<"ftype="<<vdesc->ftype<<", name="<<vdesc->name<<", f1="<<i<<endl;
o<<i;
vdesc=o.describe_next_in_var();
cout<<"ftype="<<vdesc->ftype<<", name="<<vdesc->name<<", f2="<<tmp<<endl;
o<<tmp;
}
}
void select()
{
otl_stream i(50, // buffer size
"select * from test_tab where f1>=:f<int> and f1<=:ff<int>*2",
// SELECT statement
db // connect object
);
// create select stream
int j;
int f1;
char f2[31];
otl_var_desc* vdesc;
int vdesc_len;
vdesc=i.describe_in_vars(vdesc_len);
for(j=0;j<vdesc_len;++j){
cout<<"IN VAR =========================>"<<j<<endl;
cout<<"param_type="<<vdesc[j].param_type<<endl;
cout<<"ftype="<<vdesc[j].ftype<<endl;
cout<<"elem_size="<<vdesc[j].elem_size<<endl;
cout<<"array_size="<<vdesc[j].array_size<<endl;
cout<<"pos="<<vdesc[j].pos<<endl;
cout<<"name_pos="<<vdesc[j].name_pos<<endl;
cout<<"name="<<vdesc[j].name<<endl;
cout<<"pl_tab_flag="<<vdesc[j].pl_tab_flag<<endl;
}
vdesc=i.describe_out_vars(vdesc_len);
for(j=0;j<vdesc_len;++j){
cout<<"OUT VAR =========================>"<<j<<endl;
cout<<"param_type="<<vdesc[j].param_type<<endl;
cout<<"ftype="<<vdesc[j].ftype<<endl;
cout<<"elem_size="<<vdesc[j].elem_size<<endl;
cout<<"array_size="<<vdesc[j].array_size<<endl;
cout<<"pos="<<vdesc[j].pos<<endl;
cout<<"name_pos="<<vdesc[j].name_pos<<endl;
cout<<"name="<<vdesc[j].name<<endl;
cout<<"pl_tab_flag="<<vdesc[j].pl_tab_flag<<endl;
}
cout<<endl<<"Selecting rows from table..."<<endl;
i<<2<<2; // assigning :f = 4, :ff = 4
// 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
cout<<"======== Selecting a row ========>"<<endl;
vdesc=i.describe_next_out_var();
cout<<"ftype="<<vdesc->ftype<<", pos="<<vdesc->pos;
i>>f1;
cout<<", f1="<<f1<<endl;
vdesc=i.describe_next_out_var();
cout<<"ftype="<<vdesc->ftype<<", pos="<<vdesc->pos;
i>>f2;
cout<<", f2="<<f2<<endl;
}
}
int main()
{
otl_connect::otl_initialize(); // initialize the database API environment
try{
db.rlogon("scott/tiger"); // connect to the database
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 int, f2 varchar(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.sqlstate<<endl; // print out SQLSTATE message
cerr<<p.var_info<<endl; // print out the variable that caused the error
}
db.logoff(); // disconnect from teh database
return 0;
}
IN VAR =========================>0 param_type=0 ftype=4 elem_size=4 array_size=50 pos=0 name_pos=1 name=:f1 pl_tab_flag=0 IN VAR =========================>1 param_type=0 ftype=1 elem_size=31 array_size=50 pos=0 name_pos=2 name=:f2 pl_tab_flag=0 Inserting rows into table... ============= Inserting ========>1 ftype=4, name=:f1, f1=1 ftype=1, name=:f2, f2=Name1 ============= Inserting ========>2 ftype=4, name=:f1, f1=2 ftype=1, name=:f2, f2=Name2 ============= Inserting ========>3 ftype=4, name=:f1, f1=3 ftype=1, name=:f2, f2=Name3 ============= Inserting ========>4 ftype=4, name=:f1, f1=4 ftype=1, name=:f2, f2=Name4 ============= Inserting ========>5 ftype=4, name=:f1, f1=5 ftype=1, name=:f2, f2=Name5 IN VAR =========================>0 param_type=0 ftype=4 elem_size=4 array_size=1 pos=0 name_pos=1 name=:f pl_tab_flag=0 IN VAR =========================>1 param_type=0 ftype=4 elem_size=4 array_size=1 pos=0 name_pos=2 name=:ff pl_tab_flag=0 OUT VAR =========================>0 param_type=0 ftype=2 elem_size=8 array_size=50 pos=1 name_pos=0 name=F1 pl_tab_flag=0 OUT VAR =========================>1 param_type=0 ftype=1 elem_size=31 array_size=50 pos=2 name_pos=0 name=F2 pl_tab_flag=0 Selecting rows from table... ======== Selecting a row ========> ftype=2, pos=1, f1=2 ftype=1, pos=2, f2=Name2 ======== Selecting a row ========> ftype=2, pos=1, f1=3 ftype=1, pos=2, f2=Name3 ======== Selecting a row ========> ftype=2, pos=1, f1=4 ftype=1, pos=2, f2=Name4
Copyright © 1996, 2001, Sergei Kuchin, email: [email protected], [email protected] .
Permission to use, copy, modify and redistribute this document for any purpose is hereby granted without fee, provided that the above copyright notice appear in all copies.