Инструкция SELECT в Oracle11G с OTL 4.0,тип данных столбца(ЧИСЛО,ЦЕЛОЕ ЧИСЛО,С ПЛАВАЮЩЕЙ ТОЧКОЙ,ДВОИЧНЫЙ ДВОИЧНЫЙ) возвращает тот же тип данных otl_var_double

#c #oracle11g #otl

Вопрос:

Инструкция SELECT в Oracle11G с OTL 4.0,тип данных столбца(ЧИСЛО,ЦЕЛОЕ ЧИСЛО,С ПЛАВАЮЩЕЙ ТОЧКОЙ,ДВОИЧНЫЙ ДВОИЧНЫЙ) возвращает тот же тип данных otl_var_double

подключитесь к Oracle11GR2 с помощью OTLv4, выберите столбцы(тип данных:ЧИСЛО,ЦЕЛОЕ ЧИСЛО,С ПЛАВАЮЩЕЙ ТОЧКОЙ,BINARY_DOUBLE) по умолчанию применяется сопоставление типов данных, все эти столбцы типа dadatype возвращают двойной тип. в следующем примере используется тип данных столбца otl_column_desc get.

столбец F1-это тип данных ЧИСЛА. когда я делаю выбор с переменными привязки, такими как «ВЫБЕРИТЕ F1, F2, F3, F4, F5,F6 ИЗ таблицы TEST_TAB, ГДЕ F1=:F1», столбцу F1 нужен правильный тип данных. если указать неправильный тип «double», операторы select не смогут использовать индексы.

 #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

#pragma comment(lib, "oci.lib")

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>,:f4<int>,:f5<float>,:f6<double>)", 
                 // 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<<static_cast<int>(i)<<static_cast<float>(i)<<static_cast<double>(i);
 }
}

void select()
{ 
 otl_stream i(50, // buffer size
              "select f1 :#1<bigint>, f2, f3 :#3<ubigint>, f4 :#4<int>, f5 :#5<float>, f6 :#6<double> "
                // 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;
 int f4;
 float f5;
 double f6;

 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>>f4>>f5>>f6;
   printf("f1=%lld, f2=%s, f3=%llu, f4=%d, f5=%f, f6=%lfn",f1,f2,f3,f4,f5,f6);
 }
    printf("nExplicit bind variables in output column definitions in SELECT statementsn");
    // get_otl_column_desc      
    int desc_len = 0;
    otl_column_desc* p_desc = i.describe_select(desc_len);              
    for (int n = 0; n < desc_len; n  )
    {
        int datatype = p_desc[n].otl_var_dbtype;
        printf("columnName=%s, dataType=%lldn",p_desc[n].name,p_desc[n].otl_var_dbtype);
    }

}

void columnDataTypeTest()
{
    printf("nselect with the default datatype mapping appliesn");
    string sql = "SELECT F1, F2, F3, F4, F5, F6 FROM TEST_TAB WHERE F1 = 1";
    otl_stream otlstream;
    otlstream.open(50, sql.c_str(), db);
    int ret = otlstream.get_rpc();

    // get_otl_column_desc      
    int desc_len = 0;
    otl_column_desc* p_desc = otlstream.describe_select(desc_len);              
    for (int n = 0; n < desc_len; n  )
    {
        int datatype = p_desc[n].otl_var_dbtype;
        printf("columnName=%s, dataType=%lldn",p_desc[n].name,p_desc[n].otl_var_dbtype);
    }
}

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, f4 integer, f5 float, f6 binary_double)"
    );  // create table

  insert(); // insert records into table
  select(); // select records from table
  columnDataTypeTest(); // select without explicit bind variable

 }

 catch(otl_exceptionamp; 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;

}