Open System Services ODBC/MX Client Driver (SQL/MX 3.x)

Sample ODBC Application
HP NonStop Open System Services ODBC/MX Client Driver—640328-001
A-11
Execution and Testing of Sample ODBC Application
st = SQLBindCol(hstmt1, 1, SQL_C_SLONG, &value, 0, &ValInd);
if(st != SQL_SUCCESS)
{
printf("Error in SQLBindCol\n");
odbc_Error(henv,hdbc1,hstmt1);
}
while(TRUE)
{
if ((st = SQLFetch(hstmt1)) == SQL_NO_DATA_FOUND)
break;
if ( (st != SQL_SUCCESS) && (st != SQL_SUCCESS_WITH_INFO) )
{
printf("Error in SQLFetch!!! Returned Status: %d\n", st);
break;
}
if (ValInd == SQL_NULL_DATA)
{
printf("No Data Fetched!\n");
break;
}
else
{
printf("c1 :: %d\n", value);
}
}
st = SQLExecDirect(hstmt1,(SQLCHAR*)"drop table
GGTest",SQL_NTS);
if (st != SQL_SUCCESS)
{
printf("Error in drop table : GGTest\n");
odbc_Error(henv,hdbc1,hstmt1);
}
else
printf("\nTable GGTEST dropped!\n");
st = SQLEndTran(SQL_HANDLE_DBC,(SQLHANDLE)hdbc,SQL_ROLLBACK);
if (hstmt)
SQLFreeStmt(hstmt,SQL_CLOSE);
if (hstmt1)
SQLFreeStmt(hstmt,SQL_CLOSE);
SQLDisconnect(hdbc);
SQLFreeHandle(SQL_HANDLE_DBC, hdbc);
SQLDisconnect(hdbc1);
Example A-3. Sample ODBC Application Code