mirror of
https://github.com/php/php-src.git
synced 2024-11-28 04:14:26 +08:00
75 lines
1.6 KiB
PHP
75 lines
1.6 KiB
PHP
--TEST--
|
|
oci_bind_array_by_name() and SQLT_AVC
|
|
--SKIPIF--
|
|
<?php if (!extension_loaded('oci8')) die("skip no oci8 extension"); ?>
|
|
--FILE--
|
|
<?php
|
|
|
|
require dirname(__FILE__).'/connect.inc';
|
|
|
|
$drop = "DROP table bind_test";
|
|
$statement = oci_parse($c, $drop);
|
|
@oci_execute($statement);
|
|
|
|
$create = "CREATE table bind_test(name VARCHAR(20))";
|
|
$statement = oci_parse($c, $create);
|
|
oci_execute($statement);
|
|
|
|
$create_pkg = "
|
|
CREATE OR REPLACE PACKAGE ARRAYBINDPKG1 AS
|
|
TYPE ARRTYPE IS TABLE OF VARCHAR(20) INDEX BY BINARY_INTEGER;
|
|
PROCEDURE iobind(c1 IN OUT ARRTYPE);
|
|
END ARRAYBINDPKG1;";
|
|
$statement = oci_parse($c, $create_pkg);
|
|
oci_execute($statement);
|
|
|
|
$create_pkg_body = "
|
|
CREATE OR REPLACE PACKAGE BODY ARRAYBINDPKG1 AS
|
|
CURSOR CUR IS SELECT name FROM bind_test;
|
|
PROCEDURE iobind(c1 IN OUT ARRTYPE) IS
|
|
BEGIN
|
|
FOR i IN 1..5 LOOP
|
|
INSERT INTO bind_test VALUES (c1(i));
|
|
END LOOP;
|
|
IF NOT CUR%ISOPEN THEN
|
|
OPEN CUR;
|
|
END IF;
|
|
FOR i IN REVERSE 1..5 LOOP
|
|
FETCH CUR INTO c1(i);
|
|
IF CUR%NOTFOUND THEN
|
|
CLOSE CUR;
|
|
EXIT;
|
|
END IF;
|
|
END LOOP;
|
|
END iobind;
|
|
END ARRAYBINDPKG1;";
|
|
$statement = oci_parse($c, $create_pkg_body);
|
|
oci_execute($statement);
|
|
|
|
$statement = oci_parse($c, "BEGIN ARRAYBINDPKG1.iobind(:c1); END;");
|
|
|
|
$array = Array("one", "two", "three", "four", "five");
|
|
|
|
oci_bind_array_by_name($statement, ":c1", $array, 10, 20, SQLT_CHR);
|
|
|
|
oci_execute($statement);
|
|
|
|
var_dump($array);
|
|
|
|
echo "Done\n";
|
|
?>
|
|
--EXPECT--
|
|
array(5) {
|
|
[0]=>
|
|
string(4) "five"
|
|
[1]=>
|
|
string(4) "four"
|
|
[2]=>
|
|
string(5) "three"
|
|
[3]=>
|
|
string(3) "two"
|
|
[4]=>
|
|
string(3) "one"
|
|
}
|
|
Done
|