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
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
|
--TEST--
Bind miscellaneous column types and generating errors
--SKIPIF--
<?php if (!extension_loaded('oci8')) die ("skip no oci8 extension"); ?>
--FILE--
<?php
require(dirname(__FILE__).'/connect.inc');
// Initialization
$stmtarray = array(
"drop table bind_misccoltypes_errs_tab",
"create table bind_misccoltypes_errs_tab (
id number,
char_t char(1),
char_t10 char(10),
varchar2_t10 varchar2(10),
number_t number,
number_t92 number(9,2),
number_t6 number(6),
date_t date,
timestamp_t timestamp,
float_t float,
binary_float_t binary_float,
binary_double_t binary_double,
decimal_t decimal,
integer_t integer,
nchar_t nchar(10),
nvarchar2_t10 nvarchar2(10),
varchar_t10 varchar(10) )",
);
oci8_test_sql_execute($c, $stmtarray);
function check_col($c, $colname, $id)
{
$s = oci_parse($c, "select $colname from bind_misccoltypes_errs_tab where id = :id");
oci_bind_by_name($s, ":id", $id);
oci_execute($s);
oci_fetch_all($s, $r);
var_dump($r);
}
// Tests
echo "\nTest 1 insert numbers\n";
$n1 = -23253245.3432467;
$s = oci_parse($c, "INSERT INTO bind_misccoltypes_errs_tab (id, number_t6) VALUES (1, :n1)");
oci_bind_by_name($s, ":n1", $n1);
oci_execute($s);
check_col($c, 'number_t6', 57);
echo "\nTest 2 insert numbers\n";
$n1 = "Hello";
$s = oci_parse($c, "INSERT INTO bind_misccoltypes_errs_tab (id, number_t6) VALUES (2, :n1)");
oci_bind_by_name($s, ":n1", $n1);
oci_execute($s);
check_col($c, 'number_t6', 57);
echo "\nTest 3 - too long CHAR\n";
$s = oci_parse($c, "INSERT INTO bind_misccoltypes_errs_tab (id, char_t) VALUES (3, :c2)");
$c2 = "AB";
oci_bind_by_name($s, ":c2", $c2, -1, SQLT_AFC);
oci_execute($s);
echo "\nTest 4 - too long VARCHAR2\n";
$s = oci_parse($c, "INSERT INTO bind_misccoltypes_errs_tab (id, varchar2_t10) VALUES (4, :c2)");
$c2 = "AAAAAAAAAAB";
oci_bind_by_name($s, ":c2", $c2, -1, SQLT_AFC);
oci_execute($s);
echo "\nTest 5 - invalid number\n";
$s = oci_parse($c, "INSERT INTO bind_misccoltypes_errs_tab (id, number_t) VALUES (5, :c2)");
$c2 = "ABC";
oci_bind_by_name($s, ":c2", $c2, -1, SQLT_AFC);
oci_execute($s);
echo "\nTest 6 - insert a VARCHAR2 with SQLT_BIN\n";
$s = oci_parse($c, "INSERT INTO bind_misccoltypes_errs_tab (id, varchar2_t10) VALUES (6, :c2)");
$c2 = "Hood 6";
oci_bind_by_name($s, ":c2", $c2, -1, SQLT_BIN);
oci_execute($s);
check_col($c, 'varchar2_t10', 6);
echo "\nTest 7 - insert a VARCHAR2 with SQLT_LBI\n";
$s = oci_parse($c, "INSERT INTO bind_misccoltypes_errs_tab (id, varchar2_t10) VALUES (7, :c2)");
$c2 = "Hood 7";
oci_bind_by_name($s, ":c2", $c2, -1, SQLT_LBI);
oci_execute($s);
check_col($c, 'varchar2_t10', 7);
// Clean up
$stmtarray = array(
"drop table bind_misccoltypes_errs_tab"
);
oci8_test_sql_execute($c, $stmtarray);
oci_close($c);
?>
===DONE===
<?php exit(0); ?>
--EXPECTF--
Test 1 insert numbers
Warning: oci_execute(): ORA-01438: %s in %sbind_misccoltypes_errs.php on line %d
array(1) {
["NUMBER_T6"]=>
array(0) {
}
}
Test 2 insert numbers
Warning: oci_execute(): ORA-01722: %s in %sbind_misccoltypes_errs.php on line %d
array(1) {
["NUMBER_T6"]=>
array(0) {
}
}
Test 3 - too long CHAR
Warning: oci_execute(): ORA-12899: %r(%s "%s"."BIND_MISCCOLTYPES_ERRS_TAB"."CHAR_T" \(%s: 2, %s: 1\)|String data right truncation)%r in %sbind_misccoltypes_errs.php on line %d
Test 4 - too long VARCHAR2
Warning: oci_execute(): ORA-12899: %r(%s "%s"."BIND_MISCCOLTYPES_ERRS_TAB"."VARCHAR2_T10" \(%s: 11, %s: 10\)|%s data right truncation)%r in %sbind_misccoltypes_errs.php on line %d
Test 5 - invalid number
Warning: oci_execute(): ORA-01722: %s in %sbind_misccoltypes_errs.php on line %d
Test 6 - insert a VARCHAR2 with SQLT_BIN
Warning: oci_execute(): ORA-12899: %r(%s "%s"."BIND_MISCCOLTYPES_ERRS_TAB"."VARCHAR2_T10" \(%s: 12, %s: 10\)|String data right truncation)%r in %sbind_misccoltypes_errs.php on line %d
array(1) {
["VARCHAR2_T10"]=>
array(0) {
}
}
Test 7 - insert a VARCHAR2 with SQLT_LBI
Warning: oci_execute(): ORA-12899: %r(%s "%s"."BIND_MISCCOLTYPES_ERRS_TAB"."VARCHAR2_T10" \(%s: 12, %s: 10\)|String data right truncation)%r in %sbind_misccoltypes_errs.php on line %d
array(1) {
["VARCHAR2_T10"]=>
array(0) {
}
}
===DONE===
|
