OCI
Date: 1998/01/14
Message-ID: <69hqft$lj6_at_daneel.sds.no>#1/1
Hallo
I am new for OCI.
Can anyone give me a hint on have to delete
a row that i have fetched, using oci-calls
Could the code under work?
Cda_Def m_ExecCursor,m_cursor;
text sql[] = "begin OPEN :cursor1 FOR select * from person For
UPDATE;end;";
oparse(&m_ExecCursor, (text *)sql, (sb4)-1, DEFER_PARSE, (ub4) VERSION_7)
obndra(&m_ExecCursor, (text *) ":cursor1", -1, (ub1 *) &m_cursor, ..)
BindFieldToColumn();
ofetch(&m_cursor)
text sql[] = "DELETE FROM PERSON WHERE CURRENT OF :cursor1";
Cda_Def cda;
oexec(&cda)
oparse(&cda, sql, (sb4) -1, DEFER_PARSE, (ub4) VERSION_7 )
obndrv(&cda, (text *) ":CURSOR1", -1, (ub1 *) &m_cursor,(sword) sizeof (m_cursor), SQLT_CUR, ....)
if (oexec(&cda)) Received on Wed Jan 14 1998 - 00:00:00 CET