#define __OCICPP_INTERNAL_USE_#include "OraString.h"/*!  \class OCICPP::OraString  \brief Client-side representation of string cells within the Oracle server */OCICPP::OraString::OraString(OCIEnv *envhp,OCIError *errhp,OCIParam *paramd,ub2 type,int rows) : 				OraType(envhp,errhp,paramd,type,rows),data(0){	ub2 colSize;	ReqType=SQLT_STR; /* Request a Null-terminating string for all types */	CHECKERR(errhp,OCIAttrGet((dvoid *) paramd,OCI_DTYPE_PARAM,(dvoid *) &colSize,(ub4 *) 0,(ub4) OCI_ATTR_DATA_SIZE,errhp));	size=(unsigned)(colSize?colSize:4000); /* For LONG */	data=(char *)calloc((size+1)*nRows,sizeof(char));	DEBUG(DLEV_DEBUG,"Size:%d nRows=%d\n",size,nRows);}OCICPP::OraString::~OraString() {	free(data);	OCIHandleFree(definehp,OCI_HTYPE_DEFINE);}void OCICPP::OraString::getStr(std::string &str,int row) {	if(data) str.assign(data+(size+1)*row);	else throw OraError("OCICPPLIB: Cannot getStr: Not fetched yet",OCICPPERROR);}void OCICPP::OraString::define(OCIStmt *stmt,int col) {	CHECKERR(err, OCIDefineByPos(stmt, &definehp, err, col+1, data, size+1,ReqType,	                                (dvoid *) null, 0, (ub2 *)0, OCI_DEFAULT));}