php-src/ext/oci8/tests/cursors_old.phpt

--TEST--
fetching cursor from a statement
--SKIPIF--
<?php if (!extension_loaded('oci8')) die("skip no oci8 extension"); ?>
--FILE--
<?php

require(dirname(__FILE__)."/connect.inc");

// Initialize

$stmtarray = array(
    "drop table cursors_old_tab",
    "create table cursors_old_tab (id number, value number)",
    "insert into cursors_old_tab (id, value) values (1,1)",
    "insert into cursors_old_tab (id, value) values (1,1)",
    "insert into cursors_old_tab (id, value) values (1,1)",
);

foreach ($stmtarray as $stmt) {
	$s = oci_parse($c, $stmt);
	$r = @oci_execute($s);
	if (!$r) {
		$m = oci_error($s);
		if (!in_array($m['code'], array(   // ignore expected errors
                        942 // table or view does not exist
                ))) {
			echo $stmt . PHP_EOL . $m['message'] . PHP_EOL;
		}
	}
}

foreach ($stmtarray as $stmt) {
	$s = oci_parse($c, $stmt);
	oci_execute($s);
}

// Run Test

$sql = "select cursor(select * from cursors_old_tab) as curs from dual";
$stmt = ociparse($c, $sql);

ociexecute($stmt);

while ($result = ocifetchinto($stmt, $data, OCI_ASSOC)) {
	ociexecute($data["CURS"]);
	ocifetchinto($data["CURS"], $subdata, OCI_ASSOC);
	var_dump($subdata);
	var_dump(ocicancel($data["CURS"]));
	ocifetchinto($data["CURS"], $subdata, OCI_ASSOC);
	var_dump($subdata);
	var_dump(ocicancel($data["CURS"]));
}

// Cleanup

$stmtarray = array(
    "drop table cursors_old_tab"
);

foreach ($stmtarray as $stmt) {
	$s = oci_parse($c, $stmt);
	oci_execute($s);
}

echo "Done\n";

?>
--EXPECTF--
array(2) {
  [%u|b%"ID"]=>
  %unicode|string%(1) "1"
  [%u|b%"VALUE"]=>
  %unicode|string%(1) "1"
}
bool(true)

Warning: ocifetchinto():%sORA-01002: %s in %scursors_old.php on line %d
array(2) {
  [%u|b%"ID"]=>
  %unicode|string%(1) "1"
  [%u|b%"VALUE"]=>
  %unicode|string%(1) "1"
}
bool(true)
Done