Fetch LONG RAW Type?

Question

Hello.
As, I said before, I am migrating OCI API from 7 to 8.
There are so many things that have been changed, so very hard to do it.
When I fetch the LONG RAW Type, How should I do?
in OCI7, I used oflng() API, but OCI8 OCILobRead() doens't work and there are no information in the OCI reference Guide.
I am getting worrying because of the schedule is delayed.
Thank you in advance.

Answer 1

Here is a LONG, LONG RAW would be almost identical.
This program inserts and then fetches a row from a table with a long column.
It is written in OCI8 using the standard piecewise operations, setting up the
pieces of data via OCIStmtSetPieceInfo and OCIStmtGetPieceInfo.
Program Notes
The program requires the following table to be created under the scott schema:
create table long_tab (c1 number, c2 long);
NOTE: To build the programs on unix use the demo makefile as follows:
make -f demo_rdbms.mk EXE=piece_ins_fetch OBJS=piece_ins_fetch.o build
make -f demo_rdbms.mk EXE=callback_ins_fetch OBJS=callback_ins_fetch.o build
References
Oracle Call Interface Programmer Guide, A76975-01
Caution
The sample program in this article is provided for educational purposes only
and is NOT supported by Oracle Support Services. It has been tested
internally, however, and works as documented. We do not guarantee that it
will work for you, so be sure to test it in your environment before relying
on it.
Programs
piece_ins_fetch.c:
- - - - - - - - - - - - - - - - Code begins here - - - - - - - - - - - - - - - -
* This example uses the following table:
* create table long_tab (c1 number, c2 long);
* It first inserts a row into the table using piecewise operations
* and then selects it out again the same way.
#include <stdio.h>
#include <string.h>
#include <oci.h>
* Prototypes.
static void checkerr(/*_ OCIError *errhp, sword status _*/);
#define CHUNK_SIZE 50
#define MAXLEN 200
* Error handling routine.
static void checkerr(errhp, status)
OCIError *errhp;
sword status;
text errbuf[512];
ub4 errcode;
switch (status)
case OCI_SUCCESS:
break;
case OCI_SUCCESS_WITH_INFO:
printf("Error - OCI_SUCCESS_WITH_INFO\n");
break;
case OCI_NEED_DATA:
printf("Error - OCI_NEED_DATA\n");
break;
case OCI_NO_DATA:
printf("Error - OCI_NO_DATA\n");
break;
case OCI_ERROR:
OCIErrorGet ((dvoid *)errhp,(ub4)1,(text *)NULL,(sb4 *)&errcode,
(text *)errbuf,(ub4)sizeof(errbuf),(ub4)OCI_HTYPE_ERROR);
printf("Error - %s\n", errbuf);
break;
case OCI_INVALID_HANDLE:
printf("Error - OCI_INVALID_HANDLE\n");
break;
case OCI_STILL_EXECUTING:
printf("Error - OCI_STILL_EXECUTING\n");
break;
case OCI_CONTINUE:
printf("Error - OCI_CONTINUE\n");
break;
default:
break;
* Main routine.
void main()
* Handles.
OCIEnv envhp;                    / Environment handle */
OCIError errhp;                    / Error handle */
OCIServer srvhp;                    / Server handle */
OCISvcCtx svchp;                    / Service context handle */
OCISession usrhp;                    / Session handle */
OCIStmt stmthp;                   / Statement handle */
* Other variables.
text selectStmt = (text)"select c2 from long_tab where c1 = 1";
text insertStmt = (text)"insert into long_tab values (1,:b1)";
OCIDefine *def1p = 0;
OCIBind *bnd1p = 0;
char buf[MAXLEN+1]; /* Buffer 1 */
char buf2[MAXLEN+1]; /* Buffer 2 */
char wherebuf;                      / Pointer to buf */
ub4 amount; /* Amount of data to read/write */
ub4 offset; /* Offset into buffer */
ub1 piece; /* Which piece */
ub4 total; /* Total size of buffer */
ub4 so_far; /* Amount inserted so far */
ub2 actual_len; /* Final length */
sword status;
ub4 type; /* For SetPieceInfo */
ub4 p_type; /* " " */
ub4 iteration; /* " " */
ub4 table; /* " " */
strcpy(buf,"This is some text to be inserted into a long column so we ");
strcat(buf,"can test using piecewise operations to read and write long data");
printf("Setting up environment and connecting...\n");
* Initialise the OCI environment.
OCIInitialize((ub4)OCI_OBJECT,(dvoid *)0,(dvoid * (*)())0,
(dvoid * (*)())0,(void (*)())0);
* Allocate and initialise the environment handle - no need to call
* call OCIHandleAlloc first.
OCIEnvInit((OCIEnv **)&envhp,(ub4)OCI_DEFAULT,(size_t)0,(dvoid **)0);
* Allocate the error handle for all error handling.
OCIHandleAlloc((dvoid *)envhp,(dvoid **)&errhp,(ub4)OCI_HTYPE_ERROR,
(size_t)0,(dvoid **)0);
* Allocate the server handle and create the access path by
* attaching. Note no connect string alias is being passed in the
* attach call as we are using a local connection.
OCIHandleAlloc((dvoid *)envhp,(dvoid **)&srvhp,(ub4)OCI_HTYPE_SERVER,
(size_t)0,(dvoid **)0);
checkerr(errhp,OCIServerAttach((OCIServer *)srvhp,(OCIError *)errhp,
(text *)0,(sb4)0,(ub4)OCI_DEFAULT));
* Allocate the service context handle and set the server attribute to
* the server handle allocated above.
OCIHandleAlloc((dvoid *)envhp,(dvoid **)&svchp,(ub4)OCI_HTYPE_SVCCTX,
(size_t)0,(dvoid **)0);
OCIAttrSet((dvoid *)svchp,(ub4)OCI_HTYPE_SVCCTX,
(dvoid *)srvhp,(ub4)0,
(ub4)OCI_ATTR_SERVER,(OCIError *)errhp);
* Allocate the session handle, set the username and password properties
* and connect. Add the session handle to the session attribute of the
* service context.
OCIHandleAlloc((dvoid *)envhp,(dvoid **)&usrhp,(ub4)OCI_HTYPE_SESSION,
(size_t)0,(dvoid **)0);
OCIAttrSet((dvoid *)usrhp,(ub4)OCI_HTYPE_SESSION,
(dvoid *)"scott",(ub4)strlen("scott"),
(ub4)OCI_ATTR_USERNAME,(OCIError *)errhp);
OCIAttrSet((dvoid *)usrhp,(ub4)OCI_HTYPE_SESSION,
(dvoid *)"tiger",(ub4)strlen("tiger"),
(ub4)OCI_ATTR_PASSWORD,(OCIError *)errhp);
checkerr(errhp,OCISessionBegin((OCISvcCtx *)svchp,(OCIError *)errhp,
(OCISession *)usrhp,
OCI_CRED_RDBMS,OCI_DEFAULT));
OCIAttrSet((dvoid *)svchp,(ub4)OCI_HTYPE_SVCCTX,
(dvoid *)usrhp,(ub4)0,
(ub4)OCI_ATTR_SESSION,(OCIError *)errhp);
printf("Set up done. Connected.\n");
* Logged on and ready to go.
* Set up the insert.
OCIHandleAlloc((dvoid *)envhp,(dvoid **)&stmthp,
(ub4)OCI_HTYPE_STMT,(size_t)0,(dvoid **)0);
checkerr(errhp,OCIStmtPrepare((OCIStmt *)stmthp,(OCIError *)errhp,
(CONST text*)insertStmt,
(ub4)strlen((char*)insertStmt),
(ub4)OCI_NTV_SYNTAX,(ub4)OCI_DEFAULT));
checkerr(errhp,OCIBindByName((OCIStmt *)stmthp,(OCIBind **)&bnd1p,
(OCIError *)errhp,(CONST text*)":b1",
(sb4)-1,(dvoid *)0,(sb4)MAXLEN,
(ub2)SQLT_LNG,(dvoid *)0,(ub2 *)0,
(ub2 *)0,(ub4)0,(ub4 *)0,(ub4)OCI_DATA_AT_EXEC));
printf("Inserting data...\n");
status = OCIStmtExecute((OCISvcCtx *)svchp,(OCIStmt *)stmthp,
(OCIError *)errhp,(ub4)1,
(ub4)0,(CONST OCISnapshot *)NULL,
(OCISnapshot *)NULL,(ub4)OCI_DEFAULT);
if (status != 0 && status != OCI_NEED_DATA)
checkerr(errhp,status);
offset = 1;
total = strlen(buf);
so_far = 0;
if (total <= CHUNK_SIZE)
amount = total;
piece = OCI_ONE_PIECE;
else
amount = CHUNK_SIZE;
piece = OCI_FIRST_PIECE;
while (so_far < total)
wherebuf = &buf[offset-1];
checkerr(errhp,OCIStmtSetPieceInfo((dvoid *)bnd1p,
(ub4)OCI_HTYPE_BIND,
(OCIError *)errhp,
(CONST dvoid *)wherebuf,
(ub4 *)&amount,
(ub1)piece,
(CONST dvoid *)0, /* no indicator */
(ub2 *)0));
status = OCIStmtExecute((OCISvcCtx *)svchp,(OCIStmt *)stmthp,
(OCIError *)errhp,(ub4)1,
(ub4)0,(CONST OCISnapshot *)NULL,
(OCISnapshot *)NULL,(ub4)OCI_DEFAULT);
if (status != 0 && status != OCI_NEED_DATA)
checkerr(errhp,status);
break;
if (amount < CHUNK_SIZE)
so_far += amount;
else if (amount == total)
so_far = total;
else
so_far += CHUNK_SIZE;
printf("Written %ld bytes\n",so_far);
if (total <= so_far+CHUNK_SIZE)
/* We'll be done next go */
piece = OCI_LAST_PIECE;
amount = total - so_far;
else
piece = OCI_NEXT_PIECE;
offset += CHUNK_SIZE;
printf("Wrote %d bytes of data\n",total);
printf("Commiting ...\n");
checkerr(errhp,OCITransCommit((OCISvcCtx *)svchp,
(OCIError *)errhp,(ub4)0));
* Set up the select.
checkerr(errhp,OCIStmtPrepare((OCIStmt *)stmthp,(OCIError *)errhp,
(CONST text*)selectStmt,
(ub4)strlen((char*)selectStmt),
(ub4)OCI_NTV_SYNTAX,(ub4)OCI_DEFAULT));
actual_len = 0;
checkerr(errhp,OCIDefineByPos((OCIStmt *)stmthp,(OCIDefine **)&def1p,
(OCIError *)errhp,(ub4)1,(dvoid *)0,
(sb4)MAXLEN,(ub2)SQLT_LNG,
(dvoid *)0,(ub2 *)&actual_len,
(ub2 *)0,(ub4)OCI_DYNAMIC_FETCH));
printf("\nSelecting data...\n");
checkerr(errhp,OCIStmtExecute((OCISvcCtx *)svchp,(OCIStmt *)stmthp,
(OCIError *)errhp,(ub4)0,
(ub4)0,(CONST OCISnapshot *)NULL,
(OCISnapshot *)NULL,(ub4)OCI_DEFAULT));
status = OCIStmtFetch((OCIStmt *)stmthp,(OCIError *)errhp,(ub4)1,
(ub2)OCI_FETCH_NEXT,(ub4)OCI_DEFAULT);
if (status != 0 && status != OCI_NEED_DATA)
checkerr(errhp,status);
amount = CHUNK_SIZE;
offset = 1;
while (status == OCI_NEED_DATA)
wherebuf = &buf2[offset-1];
checkerr(errhp,OCIStmtGetPieceInfo((OCIStmt *)stmthp,
(OCIError *)errhp,
(dvoid **)&def1p,
(ub4 *)&type,
(ub1 *)&p_type,
(ub4 *)&iteration,
(ub4 *)&table,
(ub1 *)&piece));
checkerr(errhp,OCIStmtSetPieceInfo((dvoid *)def1p,
(ub4)OCI_HTYPE_DEFINE,
(OCIError *)errhp,
(CONST dvoid *)wherebuf,
(ub4 *)&amount,
(ub1)piece,
(CONST dvoid *)0, /* no indicator */
(ub2 *)0));
status = OCIStmtFetch((OCIStmt *)stmthp,(OCIError *)errhp,(ub4)1,
(ub2)OCI_FETCH_NEXT,(ub4)OCI_DEFAULT);
if (status != 0 && status != OCI_NEED_DATA)
checkerr(errhp,status);
break;
printf("Fetched %d characters: %.*s\n",amount,amount,wherebuf);
offset += amount;
printf("\nTotal amount of data read is %d characters\n",actual_len);
buf2[actual_len] = '\0';
printf("Retrieved data is:\n%s\n",buf2);
* Time to clear up and exit:
* Free the statement handle - this will auto free any bind and
* define pointers
* End the session
* Detach the server
* Free the server, service context, session, error and environment
* handles
OCIHandleFree((dvoid *)stmthp,(ub4)OCI_HTYPE_STMT);
checkerr(errhp,OCISessionEnd((OCISvcCtx *)svchp,(OCIError *)errhp,
(OCISession *)usrhp,(ub4)OCI_DEFAULT));
checkerr(errhp,OCIServerDetach((OCIServer *)srvhp,(OCIError *)errhp,
(ub4)OCI_DEFAULT));
OCIHandleFree((dvoid *)srvhp,(ub4)OCI_HTYPE_SERVER);
OCIHandleFree((dvoid *)svchp,(ub4)OCI_HTYPE_SVCCTX);
OCIHandleFree((dvoid *)usrhp,(ub4)OCI_HTYPE_SESSION);
OCIHandleFree((dvoid *)errhp,(ub4)OCI_HTYPE_ERROR);
OCIHandleFree((dvoid *)envhp,(ub4)OCI_HTYPE_ENV);
- - - - - - - - - - - - - - - - Code ends here - - - - - - - - - - - - - - - -
Sample Output
Setting up environment and connecting...
Set up done. Connected.
Inserting data...
Written 50 bytes
Written 100 bytes
Written 121 bytes
Wrote 121 bytes
Commiting ...
Selecting data...
Fetched 50 characters: This is some text to be inserted into a long colum
Fetched 50 characters: n so we can test using piecewise operations to rea
Fetched 21 characters: d and write long data
Total amount of data read is 121 characters
Retrieved data is:
This is some text to be inserted into a long column so we can test using
piecewise operations to read and write long data