Advanced Queuing - Oracle

struct message
{
OCINumber id;
OCIString *data;
};
typedef struct message message;
struct null_message
{
OCIInd null_adt;
OCIInd null_id;
OCIInd null_data;
};
typedef struct null_message null_message;
/* Global data reused on calls to enqueue: */
LNOCIEnv *envhp;
LNOCIError *errhp;
LNOCISvcCtx *svchp;
message msg;
null_message nmsg;
LNOCIAQMsgProperties *msgprop;
AQ and Memory Usage
static void enqmesg(msgno, buf)
ub4 msgno;
text *buf;
{
OCIType *mesgtdo = (OCIType *)0; /* type descr of SCOTT.MESSAGE */
message *mesg = &msg; /* instance of SCOTT.MESSAGE */
null_message *mesgind = &nmsg; /* null indicator */
text corrid[128]; /* correlation identifier */
/* Get the type descriptor object for the type SCOTT.MESSAGE: */
checkerr(errhp, OCITypeByName(envhp, errhp, svchp,
(CONST text *)"SCOTT", strlen("SCOTT"),
(CONST text *)"MESSAGE", strlen("MESSAGE"),
(text *)0, 0, OCI_DURATION_SESSION,
OCI_TYPEGET_ALL, &mesgtdo));
/* Fill in the attributes of SCOTT.MESSAGE: */
checkerr(errhp, OCINumberFromInt(errhp, &msgno, sizeof(ub4), 0, &mesg->id));
checkerr(errhp, OCIStringAssignText(envhp, errhp, buf, strlen(buf),
&mesg->data));
mesgind->null_adt = mesgind->null_id = mesgind->null_data = 0;
Oracle Advanced Queuing by Example A-77