1--TEST-- 2oci_bind_array_by_name() and invalid values 4 3--EXTENSIONS-- 4oci8 5--SKIPIF-- 6<?php 7require_once 'skipifconnectfailure.inc'; 8$target_dbs = array('oracledb' => true, 'timesten' => false); // test runs on these DBs 9require __DIR__.'/skipif.inc'; 10?> 11--FILE-- 12<?php 13 14require __DIR__.'/connect.inc'; 15 16$drop = "DROP table bind_test"; 17$statement = oci_parse($c, $drop); 18@oci_execute($statement); 19 20$create = "CREATE table bind_test(name DATE)"; 21$statement = oci_parse($c, $create); 22oci_execute($statement); 23 24$create_pkg = " 25CREATE OR REPLACE PACKAGE ARRAY_BIND_004_PKG AS 26 TYPE ARRTYPE IS TABLE OF DATE INDEX BY BINARY_INTEGER; 27 PROCEDURE iobind(c1 IN OUT ARRTYPE); 28END ARRAY_BIND_004_PKG;"; 29$statement = oci_parse($c, $create_pkg); 30oci_execute($statement); 31 32$create_pkg_body = " 33CREATE OR REPLACE PACKAGE BODY ARRAY_BIND_004_PKG AS 34 CURSOR CUR IS SELECT name FROM bind_test; 35 PROCEDURE iobind(c1 IN OUT ARRTYPE) IS 36 BEGIN 37 FOR i IN 1..5 LOOP 38 INSERT INTO bind_test VALUES (c1(i)); 39 END LOOP; 40 IF NOT CUR%ISOPEN THEN 41 OPEN CUR; 42 END IF; 43 FOR i IN REVERSE 1..5 LOOP 44 FETCH CUR INTO c1(i); 45 IF CUR%NOTFOUND THEN 46 CLOSE CUR; 47 EXIT; 48 END IF; 49 END LOOP; 50 END iobind; 51END ARRAY_BIND_004_PKG;"; 52$statement = oci_parse($c, $create_pkg_body); 53oci_execute($statement); 54 55$statement = oci_parse($c, "BEGIN array_bind_004_pkg.iobind(:c1); END;"); 56 57$array = Array(); 58 59oci_bind_array_by_name($statement, ":c1", $array, 5, 5, SQLT_ODT); 60 61oci_execute($statement); 62 63var_dump($array); 64 65echo "Done\n"; 66?> 67--EXPECTF-- 68Warning: oci_execute(): ORA-01403: %s 69ORA-06512: at "%s.ARRAY_BIND_004_PKG", line %d 70ORA-06512: at line %d in %sarray_bind_004.php on line %d 71array(0) { 72} 73Done 74
