ocifreecursor

Example 860. Create and user a cursor

if (!$db = @ocinlogon("dev","dev", "ORCL")) {
    $error = ocierror();
    printf("There was an error connecting. Error was: %s", $error["message"]);
    die();
}

$count_cursor = "CURSOR(select count(empno) num_emps from emp " .
                "where emp.deptno = dept.deptno) as EMPCNT from dept";
$stmt = OCIParse($conn,"select deptno,dname,$count_cursor");

ociexecute($stmt);
print "<TABLE BORDER=1>";
print "<TR>";
print "<TR>DEPT NAME</TR>";
print "<TR>DEPT</TR>";
print "<TR>EMPLOYEES</TR>";
print "</TR>";

while (ocifetchinto($stmt,&$data,OCI_ASSOC)) {
    print "<TR>";
    $dname = $data["DNAME"];
    $deptno = $data["DEPTNO"];
    print "<TD>$dname</TD>";
    print "<TD>$deptno</TD>";
    ociexecute($data["EMPCNT"]);

    while (ocifetchinto($data["EMPCNT"],&$subdata,OCI_ASSOC)) {
        $num_emps = $subdata["NUM_EMPS"];
        print "<TD>$num_emps</TD>";
    }
    
    print "</TR>";
}
print "</TABLE>";

ocifreecursor($$count_cursor);
ocilogoff($db);