1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
--TEST--
oci_fetch_object() with CLOB and NULL
--SKIPIF--
<?php
$target_dbs = array('oracledb' => true, 'timesten' => false); // test runs on these DBs
require(__DIR__.'/skipif.inc');
?>
--FILE--
<?php
require(__DIR__.'/connect.inc');
// Initialization
$stmtarray = array(
"drop table fetch_object_2_tab",
"create table fetch_object_2_tab (col1 number, col2 CLOB, col3 varchar2(15))",
"insert into fetch_object_2_tab values (123, '1st row col2 string', '1 more text')",
"insert into fetch_object_2_tab values (456, '2nd row col2 string', NULL)",
"insert into fetch_object_2_tab values (789, '3rd row col2 string', '3 more text')",
);
oci8_test_sql_execute($c, $stmtarray);
// Run Test
echo "Test 1\n";
if (!($s = oci_parse($c, 'select * from fetch_object_2_tab order by 1'))) {
die("oci_parse(select) failed!\n");
}
if (!oci_execute($s)) {
die("oci_execute(select) failed!\n");
}
while ($row = oci_fetch_object($s)) {
var_dump($row);
}
echo "Test 2\n";
if (!($s = oci_parse($c, 'select * from fetch_object_2_tab order by 1'))) {
die("oci_parse(select) failed!\n");
}
if (!oci_execute($s)) {
die("oci_execute(select) failed!\n");
}
while ($row = oci_fetch_object($s)) {
echo $row->COL1 . "\n";
echo $row->COL2->load(100) . "\n";
echo $row->COL3 . "\n";
}
// Clean up
$stmtarray = array(
"drop table fetch_object_2_tab"
);
oci8_test_sql_execute($c, $stmtarray);
?>
===DONE===
<?php exit(0); ?>
--EXPECTF--
Test 1
object(stdClass)#%d (3) {
["COL1"]=>
string(3) "123"
["COL2"]=>
object(OCI-Lob)#%d (1) {
["descriptor"]=>
resource(%d) of type (oci8 descriptor)
}
["COL3"]=>
string(11) "1 more text"
}
object(stdClass)#%d (3) {
["COL1"]=>
string(3) "456"
["COL2"]=>
object(OCI-Lob)#%d (1) {
["descriptor"]=>
resource(%d) of type (oci8 descriptor)
}
["COL3"]=>
NULL
}
object(stdClass)#%d (3) {
["COL1"]=>
string(3) "789"
["COL2"]=>
object(OCI-Lob)#%d (1) {
["descriptor"]=>
resource(%d) of type (oci8 descriptor)
}
["COL3"]=>
string(11) "3 more text"
}
Test 2
123
1st row col2 string
1 more text
456
2nd row col2 string
789
3rd row col2 string
3 more text
===DONE===
|