@@ -5,7 +5,7 @@ IBM-DB2: Boolean data type test.
5
5
6
6
require_once ('skipif.inc ' );
7
7
8
- // This test requires IBM i 7.5 or a version of LUW that supports boolean
8
+ // This test requires IBM i 7.5 or DB2/ LUW 9.7 for the boolean type
9
9
require_once ('connection.inc ' );
10
10
$ conn = db2_connect ($ database , $ user , $ password );
11
11
if (!$ conn ) {
@@ -15,14 +15,19 @@ if (!$conn) {
15
15
$ info = db2_server_info ($ conn );
16
16
if ($ info ->DBMS_NAME == "AS " ) { // IBM i
17
17
// DBMS_VER is VVRRM string
18
- $ major = $ info [1 ];
19
- $ minor = $ info [3 ];
20
- $ mod = $ info [4 ];
18
+ $ major = $ info [" DBMS_VER " ][ 1 ];
19
+ $ minor = $ info [" DBMS_VER " ][ 3 ];
20
+ $ mod = $ info [" DBMS_VER " ][ 4 ];
21
21
if (!version_compare ("$ major. $ minor. $ mod " , "7.5.0 " , ">= " )) {
22
22
die ("skip IBM i version too old " );
23
23
}
24
+ } else { // Should cover i.e. DB2/LINUX
25
+ // DBMS_VER is VV.RR.MMMM, version_compore should work directly
26
+ if (!version_compare ($ info ["DBMS_VER " ], "9.7.0 " , ">= " )) {
27
+ die ("skip DB2 version too old " );
28
+ }
24
29
}
25
- // XXX: LUW, z
30
+ // XXX: z
26
31
27
32
?>
28
33
--FILE--
@@ -40,6 +45,7 @@ $s = db2_exec($conn, "values (true, false)");
40
45
$ r = db2_fetch_array ($ s );
41
46
var_dump ($ r );
42
47
48
+ // db2_result can't return true/false due to API limitations, so these will be ints
43
49
$ s = db2_exec ($ conn , "values (true, false) " );
44
50
db2_fetch_row ($ s );
45
51
var_dump (db2_result ($ s , 0 ));
0 commit comments