Annotation of embedaddon/php/ext/oci8/tests/lob_null.phpt, revision 1.1.1.1
1.1 misho 1: --TEST--
2: Test null data for CLOBs
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: // Initialization
14:
15: $s = oci_parse($c, 'drop table lob_null_tab');
16: @oci_execute($s);
17:
18: $s = oci_parse($c, 'create table lob_null_tab (id number, data clob)');
19: oci_execute($s);
20:
21: $s = oci_parse($c,
22: 'create or replace procedure lob_null_proc_in (pid in number, pdata in CLOB)
23: as begin
24: insert into lob_null_tab (id, data) values (pid, pdata);
25: end;');
26: oci_execute($s);
27:
28: $s = oci_parse($c,
29: 'create or replace procedure lob_null_proc_out (pid in number, pdata out clob)
30: as begin
31: select data into pdata from lob_null_tab where id = pid;
32: end;');
33: oci_execute($s);
34:
35: // TEMPORARY CLOB
36:
37: echo "Temporary CLOB: NULL\n";
38: $s = oci_parse($c, "insert into lob_null_tab values (1, :b)");
39: $lob = oci_new_descriptor($c, OCI_D_LOB);
40: oci_bind_by_name($s, ':b', $lob, -1, OCI_B_CLOB);
41: $lob->writeTemporary(null);
42: $r = @oci_execute($s);
43: if (!$r) {
44: $m = oci_error($s);
45: echo $m['message'], "\n";
46: }
47: else {
48: $lob->close();
49: }
50:
51: echo "Temporary CLOB: ''\n";
52: $s = oci_parse($c, "insert into lob_null_tab values (2, :b)");
53: $lob = oci_new_descriptor($c, OCI_D_LOB);
54: oci_bind_by_name($s, ':b', $lob, -1, OCI_B_CLOB);
55: $lob->writeTemporary('');
56: $r = @oci_execute($s);
57: if (!$r) {
58: $m = oci_error($s);
59: echo $m['message'], "\n";
60: }
61: else {
62: $lob->close();
63: }
64:
65: echo "Temporary CLOB: text\n";
66: $s = oci_parse($c, "insert into lob_null_tab values (3, :b)");
67: $lob = oci_new_descriptor($c, OCI_D_LOB);
68: oci_bind_by_name($s, ':b', $lob, -1, OCI_B_CLOB);
69: $lob->writeTemporary('Inserted via SQL statement');
70: $r = @oci_execute($s);
71: if (!$r) {
72: $m = oci_error($s);
73: echo $m['message'], "\n";
74: }
75: else {
76: $lob->close();
77: }
78:
79: // PROCEDURE PARAMETER
80:
81: echo "Procedure parameter: NULL\n";
82: $s = oci_parse($c, "call lob_null_proc_in(4, :b)");
83: $lob = oci_new_descriptor($c, OCI_D_LOB);
84: oci_bind_by_name($s, ':b', $lob, -1, OCI_B_CLOB);
85: $lob->writeTemporary(null);
86: $r = @oci_execute($s);
87: if (!$r) {
88: $m = oci_error($s);
89: echo $m['message'], "\n";
90: }
91: else {
92: $lob->close();
93: }
94:
95: echo "Procedure parameter: ''\n";
96: $s = oci_parse($c, "call lob_null_proc_in(5, :b)");
97: $lob = oci_new_descriptor($c, OCI_D_LOB);
98: oci_bind_by_name($s, ':b', $lob, -1, OCI_B_CLOB);
99: $lob->writeTemporary('');
100: $r = @oci_execute($s);
101: if (!$r) {
102: $m = oci_error($s);
103: echo $m['message'], "\n";
104: }
105: else {
106: $lob->close();
107: }
108:
109: echo "Procedure parameter: text\n";
110: $s = oci_parse($c, "call lob_null_proc_in(6, :b)");
111: $lob = oci_new_descriptor($c, OCI_D_LOB);
112: oci_bind_by_name($s, ':b', $lob, -1, OCI_B_CLOB);
113: $lob->writeTemporary('Inserted via procedure parameter');
114: $r = @oci_execute($s);
115: if (!$r) {
116: $m = oci_error($s);
117: echo $m['message'], "\n";
118: }
119: else {
120: $lob->close();
121: }
122:
123: // RETURNING INTO
124:
125: echo "RETURNING INTO: null\n";
126: $s = oci_parse($c, "insert into lob_null_tab values (7, empty_clob()) returning data into :b");
127: $lob = oci_new_descriptor($c, OCI_D_LOB);
128: oci_bind_by_name($s, ':b', $lob, -1, OCI_B_CLOB);
129: oci_execute($s, OCI_DEFAULT); // Must have OCI_DEFAULT here so locator is still valid
130: $lob->save(null);
131:
132: echo "RETURNING INTO: ''\n";
133: $s = oci_parse($c, "insert into lob_null_tab values (8, empty_clob()) returning data into :b");
134: $lob = oci_new_descriptor($c, OCI_D_LOB);
135: oci_bind_by_name($s, ':b', $lob, -1, OCI_B_CLOB);
136: oci_execute($s, OCI_DEFAULT); // Must have OCI_DEFAULT here so locator is still valid
137: $lob->save('');
138:
139: echo "RETURNING INTO: text\n";
140: $s = oci_parse($c, "insert into lob_null_tab values (9, empty_clob()) returning data into :b");
141: $lob = oci_new_descriptor($c, OCI_D_LOB);
142: oci_bind_by_name($s, ':b', $lob, -1, OCI_B_CLOB);
143: oci_execute($s, OCI_DEFAULT); // Must have OCI_DEFAULT here so locator is still valid
144: $lob->save('Inserted with RETURNING INTO');
145:
146: echo "Fetch as string\n";
147: $s = oci_parse ($c, 'select id, data from lob_null_tab order by id');
148: oci_execute($s);
149: oci_fetch_all($s, $res);
150: var_dump($res);
151:
152: echo "\nFetch as a descriptor\n";
153: $s = oci_parse ($c, 'select id, data from lob_null_tab order by id');
154: oci_execute($s);
155: while ($arr = oci_fetch_assoc($s)) {
156: if (is_object($arr['DATA'])) {
157: echo $arr['ID'] . " is an object: ";
158: $r = $arr['DATA']->load();
159: var_dump($r);
160: }
161: else {
162: echo $arr['ID'] . " is not an object\n";
163: }
164: }
165:
166: echo "\nFetch via the procedure parameter\n";
167: for ($i = 1; $i <= 9; $i++)
168: {
169: $s = oci_parse ($c, "call lob_null_proc_out($i, :b)");
170: $lob = oci_new_descriptor($c, OCI_D_LOB);
171: oci_bind_by_name($s, ':b', $lob, -1, OCI_B_CLOB);
172: oci_execute($s);
173: if (is_object($lob)) {
174: echo $i . " is an object: ";
175: $r = $lob->load();
176: var_dump($r);
177: }
178: else {
179: echo $i . " is not an object\n";
180: }
181: }
182:
183: // Cleanup
184:
185: $s = oci_parse($c, 'drop table lob_null_tab');
186: @oci_execute($s);
187:
188: echo "Done\n";
189:
190: ?>
191: --EXPECTF--
192: Temporary CLOB: NULL
193: Temporary CLOB: ''
194: Temporary CLOB: text
195: Procedure parameter: NULL
196: Procedure parameter: ''
197: Procedure parameter: text
198: RETURNING INTO: null
199: RETURNING INTO: ''
200: RETURNING INTO: text
201: Fetch as string
202: array(2) {
203: ["ID"]=>
204: array(9) {
205: [0]=>
206: string(1) "1"
207: [1]=>
208: string(1) "2"
209: [2]=>
210: string(1) "3"
211: [3]=>
212: string(1) "4"
213: [4]=>
214: string(1) "5"
215: [5]=>
216: string(1) "6"
217: [6]=>
218: string(1) "7"
219: [7]=>
220: string(1) "8"
221: [8]=>
222: string(1) "9"
223: }
224: ["DATA"]=>
225: array(9) {
226: [0]=>
227: string(0) ""
228: [1]=>
229: string(0) ""
230: [2]=>
231: string(26) "Inserted via SQL statement"
232: [3]=>
233: string(0) ""
234: [4]=>
235: string(0) ""
236: [5]=>
237: string(32) "Inserted via procedure parameter"
238: [6]=>
239: string(0) ""
240: [7]=>
241: string(0) ""
242: [8]=>
243: string(28) "Inserted with RETURNING INTO"
244: }
245: }
246:
247: Fetch as a descriptor
248: 1 is an object: string(0) ""
249: 2 is an object: string(0) ""
250: 3 is an object: string(26) "Inserted via SQL statement"
251: 4 is an object: string(0) ""
252: 5 is an object: string(0) ""
253: 6 is an object: string(32) "Inserted via procedure parameter"
254: 7 is an object: string(0) ""
255: 8 is an object: string(0) ""
256: 9 is an object: string(28) "Inserted with RETURNING INTO"
257:
258: Fetch via the procedure parameter
259: 1 is an object: string(0) ""
260: 2 is an object: string(0) ""
261: 3 is an object: string(26) "Inserted via SQL statement"
262: 4 is an object: string(0) ""
263: 5 is an object: string(0) ""
264: 6 is an object: string(32) "Inserted via procedure parameter"
265: 7 is an object: string(0) ""
266: 8 is an object: string(0) ""
267: 9 is an object: string(28) "Inserted with RETURNING INTO"
268: Done
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to lob_null.phpt CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / php / ext / oci8 / tests