浏览代码

fcl-db: base: xmldatapacketreader: fix XML data types

git-svn-id: trunk@47247 -
lacak 4 年之前
父节点
当前提交
5f04bb4a8e
共有 1 个文件被更改,包括 4 次插入4 次删除
  1. 4 4
      packages/fcl-db/src/base/xmldatapacketreader.pp

+ 4 - 4
packages/fcl-db/src/base/xmldatapacketreader.pp

@@ -107,11 +107,11 @@ const
       'fixedFMT',           // ftFmtBCD
       'string.uni',         // ftFixedWideChar
       'bin.hex:WideText',   // ftWideMemo
-      '',                   // ftOraTimeStamp
+      'SQLdateTime',        // ftOraTimeStamp
       '',                   // ftOraInterval
-      'i4',                 // ftLongWord
-      '',                   // ftShortint
-      '',                   // ftByte
+      'ui4',                // ftLongWord
+      'i1',                 // ftShortint
+      'ui1',                // ftByte
       ''                    // ftExtended
     );