xref: /PHP-7.3/ext/oci8/tests/define6.phpt (revision a2c0f872)
1--TEST--
2oci_define_by_name tests with REF CURSORs
3--SKIPIF--
4<?php
5$target_dbs = array('oracledb' => true, 'timesten' => false);  // test runs on these DBs
6require(dirname(__FILE__).'/skipif.inc');
7?>
8--FILE--
9<?php
10
11require(dirname(__FILE__).'/connect.inc');
12
13// Initialization
14
15$stmtarray = array(
16    "drop table define6_tab",
17    "create table define6_tab (id number)",
18    "insert into define6_tab values (1)"
19);
20
21oci8_test_sql_execute($c, $stmtarray);
22
23// Run Test
24
25$sql =
26"DECLARE
27  TYPE curtype IS REF CURSOR;
28  cursor_var curtype;
29BEGIN
30  OPEN cursor_var FOR SELECT id FROM define6_tab;
31  :curs := cursor_var;
32END;";
33
34echo "Test 1 - define last\n";
35
36$s1 = oci_parse($c, $sql);
37$cursor1 = oci_new_cursor($c);
38oci_bind_by_name($s1, ":curs", $cursor1, -1, OCI_B_CURSOR);
39oci_execute($s1);
40oci_execute($cursor1);
41oci_define_by_name($cursor1, 'ID', $id1);
42while (oci_fetch_row($cursor1)) {
43    var_dump($id1);
44}
45
46
47echo "Test 2 - define last with preset var\n";
48
49$s2 = oci_parse($c, $sql);
50$cursor2 = oci_new_cursor($c);
51oci_bind_by_name($s2, ":curs", $cursor2, -1, OCI_B_CURSOR);
52oci_execute($s2);
53oci_execute($cursor2);
54$id2 = '';
55oci_define_by_name($cursor2, 'ID', $id2);
56while (oci_fetch_row($cursor2)) {
57    var_dump($id2);
58}
59
60
61echo "Test 3 - define before cursor execute\n";
62
63$s3 = oci_parse($c, $sql);
64$cursor3 = oci_new_cursor($c);
65oci_bind_by_name($s3, ":curs", $cursor3, -1, OCI_B_CURSOR);
66oci_execute($s3);
67oci_define_by_name($cursor3, 'ID', $id3);
68oci_execute($cursor3);
69while (oci_fetch_row($cursor3)) {
70    var_dump($id3);
71}
72
73
74echo "Test 4 - define before top level execute\n";
75
76$s4 = oci_parse($c, $sql);
77$cursor4 = oci_new_cursor($c);
78oci_bind_by_name($s4, ":curs", $cursor4, -1, OCI_B_CURSOR);
79oci_define_by_name($cursor4, 'ID', $id4);
80oci_execute($s4);
81oci_execute($cursor4);
82while (oci_fetch_row($cursor4)) {
83    var_dump($id4);
84}
85
86
87echo "Test 5 - define before bind\n";
88
89$s5 = oci_parse($c, $sql);
90$cursor5 = oci_new_cursor($c);
91oci_define_by_name($cursor5, 'ID', $id5);
92oci_bind_by_name($s5, ":curs", $cursor5, -1, OCI_B_CURSOR);
93oci_execute($s5);
94oci_execute($cursor5);
95while (oci_fetch_row($cursor5)) {
96    var_dump($id5);
97}
98
99
100echo "Test 6 - fetch on wrong handle\n";
101
102$s6 = oci_parse($c, $sql);
103$cursor6 = oci_new_cursor($c);
104oci_define_by_name($cursor6, 'ID', $id6);
105oci_bind_by_name($s6, ":curs", $cursor6, -1, OCI_B_CURSOR);
106oci_execute($s6);
107oci_execute($cursor6);
108while (oci_fetch_row($s6)) {
109    var_dump($id6);
110}
111
112
113// Clean up
114
115$stmtarray = array(
116    "drop table define6_tab"
117);
118
119oci8_test_sql_execute($c, $stmtarray);
120
121?>
122===DONE===
123<?php exit(0); ?>
124--EXPECTF--
125Test 1 - define last
126NULL
127Test 2 - define last with preset var
128string(0) ""
129Test 3 - define before cursor execute
130string(1) "1"
131Test 4 - define before top level execute
132string(1) "1"
133Test 5 - define before bind
134string(1) "1"
135Test 6 - fetch on wrong handle
136
137Warning: oci_fetch_row(): ORA-24374: %s in %sdefine6.php on line %d
138===DONE===
139