diff --git a/column.go b/column.go
index 0f7cc2d..5e621b3 100644
--- a/column.go
+++ b/column.go
@@ -201,7 +201,7 @@ func (c *BaseColumn) Value(buf []byte) (driver.Value, error) {
                        return nil, nil
                }
                s := (*[1 << 20]uint8)(p)[:len(buf)]
-               return removeNulls(s), nil
+               return dbclobToUTF8(s), nil
        case api.SQL_C_TYPE_TIMESTAMP:
                t := (*api.SQL_TIMESTAMP_STRUCT)(p)
                r := time.Date(int(t.Year), time.Month(t.Month), int(t.Day),
diff --git a/sqlOut.go b/sqlOut.go
index 066f719..3af3b61 100644
--- a/sqlOut.go
+++ b/sqlOut.go
@@ -190,7 +190,7 @@ func (o *Out) Value() (driver.Value, error) {
                        return nil, nil
                }
                s := (*[1 << 20]uint8)(p)[:len(buf)]
-               return removeNulls(s), nil
+               return dbclobToUTF8(s), nil
        case api.SQL_C_TYPE_TIMESTAMP:
                t := (*api.SQL_TIMESTAMP_STRUCT)(p)
                r := time.Date(int(t.Year), time.Month(t.Month), int(t.Day),
diff --git a/utf16.go b/utf16.go
index 54444f3..2cea199 100644
--- a/utf16.go
+++ b/utf16.go
@@ -54,16 +54,21 @@ func utf16toutf8(s []uint16) []byte {
        return buf
 }

-//This func takes []uint8 array and then removes the null
-//and then returns []uint8
-func removeNulls(s []uint8) []uint8 {
-       buf := make([]uint8, len(s))
-       ind := 0
-       for _, v := range s {
-               if v != 0 {
-                       buf[ind] = v
-                       ind++
-               }
-       }
-       return buf
+// dbclobToUTF8 takes a slice of bytes representing the contents of a DBCLOB
+// column and converts them to UTF-8 by first interpreting them as UTF-16BE
+// data and then calling utf16toutf8().
+//
+// This could be done more efficiently by casting/swapping bytes in place.
+func dbclobToUTF8(bs []uint8) []byte {
+       if len(bs) % 2 != 0 {
+               // Since we should never have an odd number of bytes,
+               // truncating the odd byte is as good as anything else.
+               bs = bs[:len(bs)-1]
+       }
+
+       buf := make([]uint16, len(bs)/2)
+       for i := 0; i < len(buf); i++ {
+               buf[i] = uint16(bs[2*i])<<8 | uint16(bs[2*i+1])
+       }
+       return utf16toutf8(buf)
 }