Return to array_bind_014.phpt CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / php / ext / oci8 / tests

Annotation of embedaddon/php/ext/oci8/tests/array_bind_014.phpt, revision 1.1

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