lrd_ora8_handle_alloc(OraEnv1, STMT,
&OraStm1, 0);
lrd_ora8_stmt(OraStm1, "SELECT USER FROM DUAL", 1,
32, 0);
lrd_ora8_exec(OraSvc1, OraStm1, 0, 0,
&uliRowsProcessed, 0, 0, 0, 0,
0);
lrd_ora8_bind_col(OraStm1,
&OraDef1, 1, &USER_D1, 0, 0);
lrd_ora8_fetch(OraStm1, -1, 1,
&uliFetchedRows, PrintRow2, 2, 0, 0);
GRID8(2);
lrd_handle_free(&OraStm1, 0);
lrd_ora8_handle_alloc(OraEnv1, STMT,
&OraStm2, 0);
lrd_ora8_stmt(OraStm2, "BEGIN DBMS_OUTPUT.DISABLE;
END;", 1, 32, 0);
lrd_ora8_exec(OraSvc1, OraStm2, 1, 0,
&uliRowsProcessed, 0, 0, 0, 0,
0);
lrd_handle_free(&OraStm2, 0);
lrd_ora8_handle_alloc(OraEnv1, STMT,
&OraStm3, 0);
lrd_ora8_stmt(OraStm3, "SELECT
ATTRIBUTE,SCOPE,NUMERIC_VALUE,CHAR_VALUE,DATE_VALUE
FROM "
"SYSTEM.PRODUCT_PRIVS WHERE (UPPER('SQL*Plus') LIKE
UPPER"
"(PRODUCT)) AND (UPPER(USER) LIKE USERID)", 1, 32,
0);
lrd_ora8_exec(OraSvc1, OraStm3, 0, 0,
&uliRowsProcessed, 0, 0, 0, 0,
0);
lrd_ora8_bind_col(OraStm3,
&OraDef2, 1, &ATTRIBUTE_D2, 0,
0);
lrd_ora8_bind_col(OraStm3,
&OraDef3, 2, &SCOPE_D3, 0, 0);
lrd_ora8_bind_col(OraStm3,
&OraDef4, 3, &NUMERIC_VALUE_D4, 0,
0);
lrd_ora8_bind_col(OraStm3,
&OraDef5, 4, &CHAR_VALUE_D5, 0,
0);
lrd_ora8_bind_col(OraStm3,
&OraDef6, 5, &DATE_VALUE_D6, 0,
0);
lrd_ora8_fetch(OraStm3, -0, 1,
&uliFetchedRows, 0, 2, 0, 0);
lrd_handle_free(&OraStm3, 0);
lrd_ora8_handle_alloc(OraEnv1, STMT,
&OraStm4, 0);
lrd_ora8_stmt(OraStm4, "SELECT CHAR_VALUE FROM
SYSTEM.PRODUCT_PRIVS