mirror of
https://github.com/php/php-src.git
synced 2024-10-03 07:46:12 +00:00
87 lines
1.8 KiB
PHP
87 lines
1.8 KiB
PHP
--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
|