<?php
  include_once '../doc-typo3-funcs.php';
  $doxygen_vars = array(	"title" => "TYPO3 4.0.1: typo3_src-4.0.1/typo3/sysext/adodb/adodb/drivers/adodb-odbc_db2.inc.php Source File",
				"datetime" => "Sat Dec 2 19:22:26 2006",
				"date" => "2 Dec 2006",
				"doxygenversion" => "1.4.6",
				"projectname" => "TYPO3 4.0.1",
				"projectnumber" => "4.0.1"
			);
  get_header($doxygen_vars);
?>
<!-- Generated by Doxygen 1.4.6 -->
<div class="tabs">
  <ul>
    <li><a href="main.html"><span>Main&nbsp;Page</span></a></li>
    <li><a href="namespaces.html"><span>Namespaces</span></a></li>
    <li><a href="classes.html"><span>Classes</span></a></li>
    <li id="current"><a href="files.html"><span>Files</span></a></li>
    <li><a href="dirs.html"><span>Directories</span></a></li>
    <li><a href="pages.html"><span>Related&nbsp;Pages</span></a></li>
    <li><a href="examples.html"><span>Examples</span></a></li>
    <li>
      <form action="search.php" method="get">
        <table cellspacing="0" cellpadding="0" border="0">
          <tr>
            <td><label>&nbsp;<u>S</u>earch&nbsp;for&nbsp;</label></td>
            <td><input type="text" name="query" value="" size="20" accesskey="s"/></td>
          </tr>
        </table>
      </form>
    </li>
  </ul></div>
<div class="nav">
<a class="el" href="dir_c8daf1ad746050abf985cc546c89e248.html">typo3_src-4.0.1</a>&nbsp;&raquo&nbsp;<a class="el" href="dir_18071ae4545d8b3e0364d30c0659c74a.html">typo3</a>&nbsp;&raquo&nbsp;<a class="el" href="dir_57bf1ed8249c1fd5b014486d01bcb27a.html">sysext</a>&nbsp;&raquo&nbsp;<a class="el" href="dir_e81b1679233d44b74aed493d6fe8e943.html">adodb</a>&nbsp;&raquo&nbsp;<a class="el" href="dir_1f526b87ad011e46f671ba6e798564e1.html">adodb</a>&nbsp;&raquo&nbsp;<a class="el" href="dir_1e0b3ded0d6f913dc09ca6aa6ebd4980.html">drivers</a></div>
<h1>adodb-odbc_db2.inc.php</h1><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 &lt;?php
<a name="l00002"></a>00002 <span class="comment">/* </span>
<a name="l00003"></a>00003 <span class="comment">V4.90 8 June 2006  (c) 2000-2006 John Lim (jlim#natsoft.com.my). All rights reserved.</span>
<a name="l00004"></a>00004 <span class="comment">  Released under both BSD license and Lesser GPL library license. </span>
<a name="l00005"></a>00005 <span class="comment">  Whenever there is any discrepancy between the two licenses, </span>
<a name="l00006"></a>00006 <span class="comment">  the BSD license will take precedence. </span>
<a name="l00007"></a>00007 <span class="comment">Set tabs to 4 for best viewing.</span>
<a name="l00008"></a>00008 <span class="comment">  </span>
<a name="l00009"></a>00009 <span class="comment">  Latest version is available at http://adodb.sourceforge.net</span>
<a name="l00010"></a>00010 <span class="comment">  </span>
<a name="l00011"></a>00011 <span class="comment">  DB2 data driver. Requires ODBC.</span>
<a name="l00012"></a>00012 <span class="comment"> </span>
<a name="l00013"></a>00013 <span class="comment">From phpdb list:</span>
<a name="l00014"></a>00014 <span class="comment"></span>
<a name="l00015"></a>00015 <span class="comment">Hi Andrew,</span>
<a name="l00016"></a>00016 <span class="comment"></span>
<a name="l00017"></a>00017 <span class="comment">thanks a lot for your help. Today we discovered what</span>
<a name="l00018"></a>00018 <span class="comment">our real problem was:</span>
<a name="l00019"></a>00019 <span class="comment"></span>
<a name="l00020"></a>00020 <span class="comment">After "playing" a little bit with the php-scripts that try</span>
<a name="l00021"></a>00021 <span class="comment">to connect to the IBM DB2, we set the optional parameter</span>
<a name="l00022"></a>00022 <span class="comment">Cursortype when calling odbc_pconnect(....).</span>
<a name="l00023"></a>00023 <span class="comment"></span>
<a name="l00024"></a>00024 <span class="comment">And the exciting thing: When we set the cursor type</span>
<a name="l00025"></a>00025 <span class="comment">to SQL_CUR_USE_ODBC Cursor Type, then</span>
<a name="l00026"></a>00026 <span class="comment">the whole query speed up from 1 till 10 seconds</span>
<a name="l00027"></a>00027 <span class="comment">to 0.2 till 0.3 seconds for 100 records. Amazing!!!</span>
<a name="l00028"></a>00028 <span class="comment"></span>
<a name="l00029"></a>00029 <span class="comment">Therfore, PHP is just almost fast as calling the DB2</span>
<a name="l00030"></a>00030 <span class="comment">from Servlets using JDBC (don't take too much care</span>
<a name="l00031"></a>00031 <span class="comment">about the speed at whole: the database was on a</span>
<a name="l00032"></a>00032 <span class="comment">completely other location, so the whole connection</span>
<a name="l00033"></a>00033 <span class="comment">was made over a slow network connection).</span>
<a name="l00034"></a>00034 <span class="comment"></span>
<a name="l00035"></a>00035 <span class="comment">I hope this helps when other encounter the same</span>
<a name="l00036"></a>00036 <span class="comment">problem when trying to connect to DB2 from</span>
<a name="l00037"></a>00037 <span class="comment">PHP.</span>
<a name="l00038"></a>00038 <span class="comment"></span>
<a name="l00039"></a>00039 <span class="comment">Kind regards,</span>
<a name="l00040"></a>00040 <span class="comment">Christian Szardenings</span>
<a name="l00041"></a>00041 <span class="comment"></span>
<a name="l00042"></a>00042 <span class="comment">2 Oct 2001</span>
<a name="l00043"></a>00043 <span class="comment">Mark Newnham has discovered that the SQL_CUR_USE_ODBC is not supported by </span>
<a name="l00044"></a>00044 <span class="comment">IBM's DB2 ODBC driver, so this must be a 3rd party ODBC driver.</span>
<a name="l00045"></a>00045 <span class="comment"></span>
<a name="l00046"></a>00046 <span class="comment">From the IBM CLI Reference:</span>
<a name="l00047"></a>00047 <span class="comment"></span>
<a name="l00048"></a>00048 <span class="comment">SQL_ATTR_ODBC_CURSORS (DB2 CLI v5) </span>
<a name="l00049"></a>00049 <span class="comment">This connection attribute is defined by ODBC, but is not supported by DB2</span>
<a name="l00050"></a>00050 <span class="comment">CLI. Any attempt to set or get this attribute will result in an SQLSTATE of</span>
<a name="l00051"></a>00051 <span class="comment">HYC00 (Driver not capable). </span>
<a name="l00052"></a>00052 <span class="comment"></span>
<a name="l00053"></a>00053 <span class="comment">A 32-bit option specifying how the Driver Manager uses the ODBC cursor</span>
<a name="l00054"></a>00054 <span class="comment">library. </span>
<a name="l00055"></a>00055 <span class="comment"></span>
<a name="l00056"></a>00056 <span class="comment">So I guess this means the message [above] was related to using a 3rd party</span>
<a name="l00057"></a>00057 <span class="comment">odbc driver.</span>
<a name="l00058"></a>00058 <span class="comment"></span>
<a name="l00059"></a>00059 <span class="comment">Setting SQL_CUR_USE_ODBC</span>
<a name="l00060"></a>00060 <span class="comment">========================</span>
<a name="l00061"></a>00061 <span class="comment">To set SQL_CUR_USE_ODBC for drivers that require it, do this:</span>
<a name="l00062"></a>00062 <span class="comment"></span>
<a name="l00063"></a>00063 <span class="comment">$db = NewADOConnection('odbc_db2');</span>
<a name="l00064"></a>00064 <span class="comment">$db-&gt;curMode = SQL_CUR_USE_ODBC;</span>
<a name="l00065"></a>00065 <span class="comment">$db-&gt;Connect($dsn, $userid, $pwd);</span>
<a name="l00066"></a>00066 <span class="comment"></span>
<a name="l00067"></a>00067 <span class="comment"></span>
<a name="l00068"></a>00068 <span class="comment"></span>
<a name="l00069"></a>00069 <span class="comment">USING CLI INTERFACE</span>
<a name="l00070"></a>00070 <span class="comment">===================</span>
<a name="l00071"></a>00071 <span class="comment"></span>
<a name="l00072"></a>00072 <span class="comment">I have had reports that the $host and $database params have to be reversed in </span>
<a name="l00073"></a>00073 <span class="comment">Connect() when using the CLI interface. From Halmai Csongor csongor.halmai#nexum.hu:</span>
<a name="l00074"></a>00074 <span class="comment"></span>
<a name="l00075"></a>00075 <span class="comment">&gt; The symptom is that if I change the database engine from postgres or any other to DB2 then the following</span>
<a name="l00076"></a>00076 <span class="comment">&gt; connection command becomes wrong despite being described this version to be correct in the docs. </span>
<a name="l00077"></a>00077 <span class="comment">&gt;</span>
<a name="l00078"></a>00078 <span class="comment">&gt; $connection_object-&gt;Connect( $DATABASE_HOST, $DATABASE_AUTH_USER_NAME, $DATABASE_AUTH_PASSWORD, $DATABASE_NAME )</span>
<a name="l00079"></a>00079 <span class="comment">&gt;</span>
<a name="l00080"></a>00080 <span class="comment">&gt; In case of DB2 I had to swap the first and last arguments in order to connect properly. </span>
<a name="l00081"></a>00081 <span class="comment"></span>
<a name="l00082"></a>00082 <span class="comment"></span>
<a name="l00083"></a>00083 <span class="comment">System Error 5</span>
<a name="l00084"></a>00084 <span class="comment">==============</span>
<a name="l00085"></a>00085 <span class="comment">IF you get a System Error 5 when trying to Connect/Load, it could be a permission problem. Give the user connecting</span>
<a name="l00086"></a>00086 <span class="comment">to DB2 full rights to the DB2 SQLLIB directory, and place the user in the DBUSERS group.</span>
<a name="l00087"></a>00087 <span class="comment">*/</span>
<a name="l00088"></a>00088 
<a name="l00089"></a>00089 <span class="comment">// security - hide paths</span>
<a name="l00090"></a>00090 <span class="keywordflow">if</span> (!defined('ADODB_DIR')) die();
<a name="l00091"></a>00091 
<a name="l00092"></a>00092 <span class="keywordflow">if</span> (!defined('_ADODB_ODBC_LAYER')) {
<a name="l00093"></a>00093         include(ADODB_DIR.<span class="stringliteral">"/drivers/adodb-odbc.inc.php"</span>);
<a name="l00094"></a>00094 }
<a name="l00095"></a>00095 <span class="keywordflow">if</span> (!defined('<a class="code" href="classADODB__ODBC__DB2.html">ADODB_ODBC_DB2</a>')){
<a name="l00096"></a>00096 define('<a class="code" href="classADODB__ODBC__DB2.html">ADODB_ODBC_DB2</a>',1);
<a name="l00097"></a>00097 
<a name="l00098"></a><a class="code" href="classADODB__ODBC__DB2.html">00098</a> <span class="keyword">class </span><a class="code" href="classADODB__ODBC__DB2.html">ADODB_ODBC_DB2</a> <span class="keyword">extends</span> <a class="code" href="classADODB__odbc.html">ADODB_odbc</a> {
<a name="l00099"></a><a class="code" href="classADODB__ODBC__DB2.html#9f25e4e3eacb6e70e4015d42f6262cd1">00099</a>         var <a class="code" href="classADODB__ODBC__DB2.html#9f25e4e3eacb6e70e4015d42f6262cd1">$databaseType</a> = <span class="stringliteral">"db2"</span>;      
<a name="l00100"></a><a class="code" href="classADODB__ODBC__DB2.html#41be0711779d6c04b803434648b7a2df">00100</a>         var <a class="code" href="classADODB__ODBC__DB2.html#41be0711779d6c04b803434648b7a2df">$concat_operator</a> = '||';
<a name="l00101"></a><a class="code" href="classADODB__ODBC__DB2.html#e94bceb3416f164abff192d77b96dc0b">00101</a>         var <a class="code" href="classADODB__ODBC__DB2.html#e94bceb3416f164abff192d77b96dc0b">$sysTime</a> = 'CURRENT TIME';
<a name="l00102"></a><a class="code" href="classADODB__ODBC__DB2.html#820c937c0945de2b08147d2318ba7d72">00102</a>         var <a class="code" href="classADODB__ODBC__DB2.html#820c937c0945de2b08147d2318ba7d72">$sysDate</a> = 'CURRENT DATE';
<a name="l00103"></a><a class="code" href="classADODB__ODBC__DB2.html#85d9cd822fa72afd5727c772596ef810">00103</a>         var <a class="code" href="classADODB__ODBC__DB2.html#85d9cd822fa72afd5727c772596ef810">$sysTimeStamp</a> = 'CURRENT TIMESTAMP';
<a name="l00104"></a>00104         <span class="comment">// The complete string representation of a timestamp has the form </span>
<a name="l00105"></a>00105         <span class="comment">// yyyy-mm-dd-hh.mm.ss.nnnnnn.</span>
<a name="l00106"></a><a class="code" href="classADODB__ODBC__DB2.html#16f5b62b7d4e029c014ba1c4ac861f67">00106</a>         var <a class="code" href="classADODB__ODBC__DB2.html#16f5b62b7d4e029c014ba1c4ac861f67">$fmtTimeStamp</a> = <span class="stringliteral">"'Y-m-d-H.i.s'"</span>;
<a name="l00107"></a><a class="code" href="classADODB__ODBC__DB2.html#003cbd1b89612fa5ba83162ad08225aa">00107</a>         var <a class="code" href="classADODB__ODBC__DB2.html#003cbd1b89612fa5ba83162ad08225aa">$ansiOuter</a> = <span class="keyword">true</span>;
<a name="l00108"></a><a class="code" href="classADODB__ODBC__DB2.html#2b942948d2d7f023fc5aa61db969b667">00108</a>         var <a class="code" href="classADODB__ODBC__DB2.html#2b942948d2d7f023fc5aa61db969b667">$identitySQL</a> = 'values IDENTITY_VAL_LOCAL()';
<a name="l00109"></a><a class="code" href="classADODB__ODBC__DB2.html#e404172d9b024019684336b36308dd20">00109</a>         var <a class="code" href="classADODB__ODBC__DB2.html#e404172d9b024019684336b36308dd20">$_bindInputArray</a> = <span class="keyword">true</span>;
<a name="l00110"></a><a class="code" href="classADODB__ODBC__DB2.html#59de8dee0bee5a2cf843d36fd204ed4a">00110</a>          var <a class="code" href="classADODB__ODBC__DB2.html#59de8dee0bee5a2cf843d36fd204ed4a">$hasInsertID</a> = <span class="keyword">true</span>;
<a name="l00111"></a><a class="code" href="classADODB__ODBC__DB2.html#b7fa84114614d87a4246121670ad6c4d">00111</a>         var <a class="code" href="classADODB__ODBC__DB2.html#b7fa84114614d87a4246121670ad6c4d">$rsPrefix</a> = 'ADORecordset_odbc_';
<a name="l00112"></a>00112         
<a name="l00113"></a><a class="code" href="classADODB__ODBC__DB2.html#8b1caa6c7de31be9921546817d24c969">00113</a>         function <a class="code" href="classADODB__ODBC__DB2.html#8b1caa6c7de31be9921546817d24c969">ADODB_DB2</a>()
<a name="l00114"></a>00114         {
<a name="l00115"></a>00115                 <span class="keywordflow">if</span> (strncmp(PHP_OS,'WIN',3) === 0) $this-&gt;curmode = SQL_CUR_USE_ODBC;
<a name="l00116"></a>00116                 $this-&gt;<a class="code" href="classADODB__odbc.html#20d0ce3eb3d0ea050a8da318aa2b7460">ADODB_odbc</a>();
<a name="l00117"></a>00117         }
<a name="l00118"></a>00118         
<a name="l00119"></a><a class="code" href="classADODB__ODBC__DB2.html#6bc45975d8792305ad3e8301b422cd50">00119</a>         function <a class="code" href="classADODB__ODBC__DB2.html#6bc45975d8792305ad3e8301b422cd50">IfNull</a>( $field, $ifNull ) 
<a name="l00120"></a>00120         {
<a name="l00121"></a>00121                 <span class="keywordflow">return</span> <span class="stringliteral">" COALESCE($field, $ifNull) "</span>; <span class="comment">// if DB2 UDB</span>
<a name="l00122"></a>00122         }
<a name="l00123"></a>00123         
<a name="l00124"></a><a class="code" href="classADODB__ODBC__DB2.html#5f6c45540c1e5fd90b25b22996c4ba70">00124</a>         function <a class="code" href="classADODB__ODBC__DB2.html#5f6c45540c1e5fd90b25b22996c4ba70">ServerInfo</a>()
<a name="l00125"></a>00125         {
<a name="l00126"></a>00126                 <span class="comment">//odbc_setoption($this-&gt;_connectionID,1,101 /*SQL_ATTR_ACCESS_MODE*/, 1 /*SQL_MODE_READ_ONLY*/);</span>
<a name="l00127"></a>00127                 $vers = $this-&gt;<a class="code" href="classADOConnection.html#cc46074c4b2354d07427f8887f92b994">GetOne</a>('select versionnumber from sysibm.sysversions');
<a name="l00128"></a>00128                 <span class="comment">//odbc_setoption($this-&gt;_connectionID,1,101, 0 /*SQL_MODE_READ_WRITE*/);</span>
<a name="l00129"></a>00129                 <span class="keywordflow">return</span> array('description'=&gt;'DB2 ODBC driver', 'version'=&gt;$vers);
<a name="l00130"></a>00130         }
<a name="l00131"></a>00131         
<a name="l00132"></a><a class="code" href="classADODB__ODBC__DB2.html#0118e1b5f3eb7df2abac7caece418b0b">00132</a>         function <a class="code" href="classADODB__ODBC__DB2.html#0118e1b5f3eb7df2abac7caece418b0b">_insertid</a>()
<a name="l00133"></a>00133         {
<a name="l00134"></a>00134                 <span class="keywordflow">return</span> $this-&gt;<a class="code" href="classADOConnection.html#cc46074c4b2354d07427f8887f92b994">GetOne</a>($this-&gt;identitySQL);
<a name="l00135"></a>00135         }
<a name="l00136"></a>00136         
<a name="l00137"></a><a class="code" href="classADODB__ODBC__DB2.html#060c923e7a6bdb43c6a47b7f58c3e86b">00137</a>         function <a class="code" href="classADODB__ODBC__DB2.html#060c923e7a6bdb43c6a47b7f58c3e86b">RowLock</a>($tables,$where,$flds='1 as ignore')
<a name="l00138"></a>00138         {
<a name="l00139"></a>00139                 <span class="keywordflow">if</span> ($this-&gt;_autocommit) $this-&gt;<a class="code" href="classADODB__odbc.html#a4e7217890ef34c1965f7c3c325f7b96">BeginTrans</a>();
<a name="l00140"></a>00140                 <span class="keywordflow">return</span> $this-&gt;<a class="code" href="classADOConnection.html#cc46074c4b2354d07427f8887f92b994">GetOne</a>(<span class="stringliteral">"select $flds from $tables where $where for update"</span>);
<a name="l00141"></a>00141         }
<a name="l00142"></a>00142         
<a name="l00143"></a><a class="code" href="classADODB__ODBC__DB2.html#edbee26b5c442d6e65abbe1f2389e4b4">00143</a>         function &amp;<a class="code" href="classADODB__ODBC__DB2.html#edbee26b5c442d6e65abbe1f2389e4b4">MetaTables</a>($ttype=<span class="keyword">false</span>,$showSchema=<span class="keyword">false</span>, $qtable=<span class="stringliteral">"%"</span>, $qschema=<span class="stringliteral">"%"</span>)
<a name="l00144"></a>00144         {
<a name="l00145"></a>00145         global $ADODB_FETCH_MODE;
<a name="l00146"></a>00146         
<a name="l00147"></a>00147                 $savem = $ADODB_FETCH_MODE;
<a name="l00148"></a>00148                 $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
<a name="l00149"></a>00149                 $qid = odbc_tables($this-&gt;_connectionID, <span class="stringliteral">""</span>, $qschema, $qtable, <span class="stringliteral">""</span>);
<a name="l00150"></a>00150                 
<a name="l00151"></a>00151                 $rs = <span class="keyword">new</span> <a class="code" href="classADORecordSet__odbc.html">ADORecordSet_odbc</a>($qid);
<a name="l00152"></a>00152                 
<a name="l00153"></a>00153                 $ADODB_FETCH_MODE = $savem;
<a name="l00154"></a>00154                 <span class="keywordflow">if</span> (!$rs) {
<a name="l00155"></a>00155                         <a class="code" href="classADOConnection.html#0cc456e19cf1ac7d38514582ff4a3d8a">$false</a> = <span class="keyword">false</span>;
<a name="l00156"></a>00156                         <span class="keywordflow">return</span> <a class="code" href="classADOConnection.html#0cc456e19cf1ac7d38514582ff4a3d8a">$false</a>;
<a name="l00157"></a>00157                 }
<a name="l00158"></a>00158                 $rs-&gt;_has_stupid_odbc_fetch_api_change = $this-&gt;_has_stupid_odbc_fetch_api_change;
<a name="l00159"></a>00159                 
<a name="l00160"></a>00160                 $arr =&amp; $rs-&gt;GetArray();
<a name="l00161"></a>00161                 <span class="comment">//print_r($arr);</span>
<a name="l00162"></a>00162                 
<a name="l00163"></a>00163                 $rs-&gt;Close();
<a name="l00164"></a>00164                 $arr2 = array();
<a name="l00165"></a>00165                 
<a name="l00166"></a>00166                 <span class="keywordflow">if</span> ($ttype) {
<a name="l00167"></a>00167                         $isview = strncmp($ttype,<span class="charliteral">'V'</span>,1) === 0;
<a name="l00168"></a>00168                 }
<a name="l00169"></a>00169                 <span class="keywordflow">for</span> ($i=0; $i &lt; <span class="keyword">sizeof</span>($arr); $i++) {
<a name="l00170"></a>00170                 
<a name="l00171"></a>00171                         <span class="keywordflow">if</span> (!$arr[$i][2]) <span class="keywordflow">continue</span>;
<a name="l00172"></a>00172                         <span class="keywordflow">if</span> (strncmp($arr[$i][1],'SYS',3) === 0) <span class="keywordflow">continue</span>;
<a name="l00173"></a>00173                         
<a name="l00174"></a>00174                         $type = $arr[$i][3];
<a name="l00175"></a>00175                         
<a name="l00176"></a>00176                         <span class="keywordflow">if</span> ($showSchema) $arr[$i][2] = $arr[$i][1].<span class="charliteral">'.'</span>.$arr[$i][2];
<a name="l00177"></a>00177                         
<a name="l00178"></a>00178                         <span class="keywordflow">if</span> ($ttype) { 
<a name="l00179"></a>00179                                 <span class="keywordflow">if</span> ($isview) {
<a name="l00180"></a>00180                                         <span class="keywordflow">if</span> (strncmp($type,<span class="charliteral">'V'</span>,1) === 0) $arr2[] = $arr[$i][2];
<a name="l00181"></a>00181                                 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp($type,<span class="charliteral">'T'</span>,1) === 0) $arr2[] = $arr[$i][2];
<a name="l00182"></a>00182                         } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strncmp($type,<span class="charliteral">'S'</span>,1) !== 0) $arr2[] = $arr[$i][2];
<a name="l00183"></a>00183                 }
<a name="l00184"></a>00184                 <span class="keywordflow">return</span> $arr2;
<a name="l00185"></a>00185         }
<a name="l00186"></a>00186 
<a name="l00187"></a><a class="code" href="classADODB__ODBC__DB2.html#62b05fbf8dcd26939566cafa488b4f05">00187</a>         function &amp;MetaIndexes ($table, $primary = FALSE, $owner=<span class="keyword">false</span>)
<a name="l00188"></a>00188         {
<a name="l00189"></a>00189         <span class="comment">// save old fetch mode</span>
<a name="l00190"></a>00190         global $ADODB_FETCH_MODE;
<a name="l00191"></a>00191         $save = $ADODB_FETCH_MODE;
<a name="l00192"></a>00192         $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
<a name="l00193"></a>00193         <span class="keywordflow">if</span> ($this-&gt;fetchMode !== FALSE) {
<a name="l00194"></a>00194                $savem = $this-&gt;SetFetchMode(FALSE);
<a name="l00195"></a>00195         }
<a name="l00196"></a>00196                 $false = <span class="keyword">false</span>;
<a name="l00197"></a>00197                 <span class="comment">// get index details</span>
<a name="l00198"></a>00198                 $table = strtoupper($table);
<a name="l00199"></a>00199                 $SQL=<span class="stringliteral">"SELECT NAME, UNIQUERULE, COLNAMES FROM SYSIBM.SYSINDEXES WHERE TBNAME='$table'"</span>;
<a name="l00200"></a>00200         <span class="keywordflow">if</span> ($primary) 
<a name="l00201"></a>00201                         $SQL.= <span class="stringliteral">" AND UNIQUERULE='P'"</span>;
<a name="l00202"></a>00202                 $rs = $this-&gt;Execute($SQL);
<a name="l00203"></a>00203         <span class="keywordflow">if</span> (!is_object($rs)) {
<a name="l00204"></a>00204                         <span class="keywordflow">if</span> (isset($savem)) 
<a name="l00205"></a>00205                                 $this-&gt;SetFetchMode($savem);
<a name="l00206"></a>00206                         $ADODB_FETCH_MODE = $save;
<a name="l00207"></a>00207             <span class="keywordflow">return</span> $false;
<a name="l00208"></a>00208         }
<a name="l00209"></a>00209                 $indexes = array ();
<a name="l00210"></a>00210         <span class="comment">// parse index data into array</span>
<a name="l00211"></a>00211         <span class="keywordflow">while</span> ($row = $rs-&gt;FetchRow()) {
<a name="l00212"></a>00212                         $indexes[$row[0]] = array(
<a name="l00213"></a>00213                            'unique' =&gt; ($row[1] == <span class="charliteral">'U'</span> || $row[1] == <span class="charliteral">'P'</span>),
<a name="l00214"></a>00214                            'columns' =&gt; array()
<a name="l00215"></a>00215                         );
<a name="l00216"></a>00216                         $cols = ltrim($row[2],<span class="charliteral">'+'</span>);
<a name="l00217"></a>00217                         $indexes[$row[0]]['columns'] = explode(<span class="charliteral">'+'</span>, $cols);
<a name="l00218"></a>00218         }
<a name="l00219"></a>00219                 <span class="keywordflow">if</span> (isset($savem)) { 
<a name="l00220"></a>00220             $this-&gt;SetFetchMode($savem);
<a name="l00221"></a>00221                         $ADODB_FETCH_MODE = $save;
<a name="l00222"></a>00222                 }
<a name="l00223"></a>00223         <span class="keywordflow">return</span> $indexes;
<a name="l00224"></a>00224         }
<a name="l00225"></a>00225         
<a name="l00226"></a>00226         <span class="comment">// Format date column in sql string given an input format that understands Y M D</span>
<a name="l00227"></a><a class="code" href="classADODB__ODBC__DB2.html#e0c3928b634db486372f12a33debd636">00227</a>         function SQLDate($fmt, $col=<span class="keyword">false</span>)
<a name="l00228"></a>00228         {       
<a name="l00229"></a>00229         <span class="comment">// use right() and replace() ?</span>
<a name="l00230"></a>00230                 <span class="keywordflow">if</span> (!$col) $col = $this-&gt;sysDate;
<a name="l00231"></a>00231                 $s = '';
<a name="l00232"></a>00232                 
<a name="l00233"></a>00233                 $len = strlen($fmt);
<a name="l00234"></a>00234                 <span class="keywordflow">for</span> ($i=0; $i &lt; $len; $i++) {
<a name="l00235"></a>00235                         <span class="keywordflow">if</span> ($s) $s .= '||';
<a name="l00236"></a>00236                         $ch = $fmt[$i];
<a name="l00237"></a>00237                         <span class="keywordflow">switch</span>($ch) {
<a name="l00238"></a>00238                         <span class="keywordflow">case</span> <span class="charliteral">'Y'</span>:
<a name="l00239"></a>00239                         <span class="keywordflow">case</span> <span class="charliteral">'y'</span>:
<a name="l00240"></a>00240                                 $s .= <span class="stringliteral">"char(year($col))"</span>;
<a name="l00241"></a>00241                                 <span class="keywordflow">break</span>;
<a name="l00242"></a>00242                         <span class="keywordflow">case</span> <span class="charliteral">'M'</span>:
<a name="l00243"></a>00243                                 $s .= <span class="stringliteral">"substr(monthname($col),1,3)"</span>;
<a name="l00244"></a>00244                                 <span class="keywordflow">break</span>;
<a name="l00245"></a>00245                         <span class="keywordflow">case</span> <span class="charliteral">'m'</span>:
<a name="l00246"></a>00246                                 $s .= <span class="stringliteral">"right(digits(month($col)),2)"</span>;
<a name="l00247"></a>00247                                 <span class="keywordflow">break</span>;
<a name="l00248"></a>00248                         <span class="keywordflow">case</span> <span class="charliteral">'D'</span>:
<a name="l00249"></a>00249                         <span class="keywordflow">case</span> <span class="charliteral">'d'</span>:
<a name="l00250"></a>00250                                 $s .= <span class="stringliteral">"right(digits(day($col)),2)"</span>;
<a name="l00251"></a>00251                                 <span class="keywordflow">break</span>;
<a name="l00252"></a>00252                         <span class="keywordflow">case</span> <span class="charliteral">'H'</span>:
<a name="l00253"></a>00253                         <span class="keywordflow">case</span> <span class="charliteral">'h'</span>:
<a name="l00254"></a>00254                                 <span class="keywordflow">if</span> ($col != $this-&gt;sysDate) $s .= <span class="stringliteral">"right(digits(hour($col)),2)"</span>;        
<a name="l00255"></a>00255                                 <span class="keywordflow">else</span> $s .= <span class="stringliteral">"''"</span>;
<a name="l00256"></a>00256                                 <span class="keywordflow">break</span>;
<a name="l00257"></a>00257                         <span class="keywordflow">case</span> <span class="charliteral">'i'</span>:
<a name="l00258"></a>00258                         <span class="keywordflow">case</span> <span class="charliteral">'I'</span>:
<a name="l00259"></a>00259                                 <span class="keywordflow">if</span> ($col != $this-&gt;sysDate)
<a name="l00260"></a>00260                                         $s .= <span class="stringliteral">"right(digits(minute($col)),2)"</span>;
<a name="l00261"></a>00261                                         <span class="keywordflow">else</span> $s .= <span class="stringliteral">"''"</span>;
<a name="l00262"></a>00262                                 <span class="keywordflow">break</span>;
<a name="l00263"></a>00263                         <span class="keywordflow">case</span> <span class="charliteral">'S'</span>:
<a name="l00264"></a>00264                         <span class="keywordflow">case</span> <span class="charliteral">'s'</span>:
<a name="l00265"></a>00265                                 <span class="keywordflow">if</span> ($col != $this-&gt;sysDate)
<a name="l00266"></a>00266                                         $s .= <span class="stringliteral">"right(digits(second($col)),2)"</span>;
<a name="l00267"></a>00267                                 <span class="keywordflow">else</span> $s .= <span class="stringliteral">"''"</span>;
<a name="l00268"></a>00268                                 <span class="keywordflow">break</span>;
<a name="l00269"></a>00269                         <span class="keywordflow">default</span>:
<a name="l00270"></a>00270                                 <span class="keywordflow">if</span> ($ch == <span class="charliteral">'\\'</span>) {
<a name="l00271"></a>00271                                         $i++;
<a name="l00272"></a>00272                                         $ch = substr($fmt,$i,1);
<a name="l00273"></a>00273                                 }
<a name="l00274"></a>00274                                 $s .= $this-&gt;qstr($ch);
<a name="l00275"></a>00275                         }
<a name="l00276"></a>00276                 }
<a name="l00277"></a>00277                 <span class="keywordflow">return</span> $s;
<a name="l00278"></a>00278         } 
<a name="l00279"></a>00279  
<a name="l00280"></a>00280         
<a name="l00281"></a><a class="code" href="classADODB__ODBC__DB2.html#21922603aa072743c4b5a8943c013856">00281</a>         function &amp;SelectLimit($sql,$nrows=-1,$offset=-1,$inputArr=<span class="keyword">false</span>)
<a name="l00282"></a>00282         {
<a name="l00283"></a>00283                 $nrows = (integer) $nrows;
<a name="l00284"></a>00284                 <span class="keywordflow">if</span> ($offset &lt;= 0) {
<a name="l00285"></a>00285                 <span class="comment">// could also use " OPTIMIZE FOR $nrows ROWS "</span>
<a name="l00286"></a>00286                         <span class="keywordflow">if</span> ($nrows &gt;= 0) $sql .=  <span class="stringliteral">" FETCH FIRST $nrows ROWS ONLY "</span>;
<a name="l00287"></a>00287                         $rs =&amp; $this-&gt;Execute($sql,$inputArr);
<a name="l00288"></a>00288                 } <span class="keywordflow">else</span> {
<a name="l00289"></a>00289                         <span class="keywordflow">if</span> ($offset &gt; 0 &amp;&amp; $nrows &lt; 0);
<a name="l00290"></a>00290                         <span class="keywordflow">else</span> {
<a name="l00291"></a>00291                                 $nrows += $offset;
<a name="l00292"></a>00292                                 $sql .=  <span class="stringliteral">" FETCH FIRST $nrows ROWS ONLY "</span>;
<a name="l00293"></a>00293                         }
<a name="l00294"></a>00294                         $rs =&amp; <a class="code" href="classADOConnection.html#74acaf0a2c272abbad1e20b2efa0c7a4">ADOConnection::SelectLimit</a>($sql,-1,$offset,$inputArr);
<a name="l00295"></a>00295                 }
<a name="l00296"></a>00296                 
<a name="l00297"></a>00297                 <span class="keywordflow">return</span> $rs;
<a name="l00298"></a>00298         }
<a name="l00299"></a>00299         
<a name="l00300"></a>00300 };
<a name="l00301"></a>00301  
<a name="l00302"></a>00302 
<a name="l00303"></a><a class="code" href="classADORecordSet__odbc__db2.html">00303</a> <span class="keyword">class  </span><a class="code" href="classADORecordSet__odbc__db2.html">ADORecordSet_odbc_db2</a> <span class="keyword">extends</span> <a class="code" href="classADORecordSet__odbc.html">ADORecordSet_odbc</a> {        
<a name="l00304"></a>00304         
<a name="l00305"></a><a class="code" href="classADORecordSet__odbc__db2.html#f39ff15ecf895e01c53445814416e430">00305</a>         var <a class="code" href="classADORecordSet__odbc__db2.html#f39ff15ecf895e01c53445814416e430">$databaseType</a> = <span class="stringliteral">"db2"</span>;              
<a name="l00306"></a>00306         
<a name="l00307"></a><a class="code" href="classADORecordSet__odbc__db2.html#6b33f7360cb851f0574578cb04e45d3f">00307</a>         function <a class="code" href="classADORecordSet__odbc__db2.html#6b33f7360cb851f0574578cb04e45d3f">ADORecordSet_db2</a>($id,$mode=<span class="keyword">false</span>)
<a name="l00308"></a>00308         {
<a name="l00309"></a>00309                 $this-&gt;<a class="code" href="classADORecordSet__odbc.html#1a3b48ac4fadfb73d1f0a876d76211ca">ADORecordSet_odbc</a>($id,$mode);
<a name="l00310"></a>00310         }
<a name="l00311"></a>00311 
<a name="l00312"></a><a class="code" href="classADORecordSet__odbc__db2.html#7b22e66d559c4162b3e4615209b70bc5">00312</a>         function <a class="code" href="classADORecordSet__odbc__db2.html#7b22e66d559c4162b3e4615209b70bc5">MetaType</a>($t,$len=-1,$fieldobj=<span class="keyword">false</span>)
<a name="l00313"></a>00313         {
<a name="l00314"></a>00314                 <span class="keywordflow">if</span> (is_object($t)) {
<a name="l00315"></a>00315                         $fieldobj = $t;
<a name="l00316"></a>00316                         $t = $fieldobj-&gt;type;
<a name="l00317"></a>00317                         $len = $fieldobj-&gt;max_length;
<a name="l00318"></a>00318                 }
<a name="l00319"></a>00319                 
<a name="l00320"></a>00320                 <span class="keywordflow">switch</span> (strtoupper($t)) {
<a name="l00321"></a>00321                 <span class="keywordflow">case</span> 'VARCHAR':
<a name="l00322"></a>00322                 <span class="keywordflow">case</span> 'CHAR':
<a name="l00323"></a>00323                 <span class="keywordflow">case</span> 'CHARACTER':
<a name="l00324"></a>00324                 <span class="keywordflow">case</span> <span class="charliteral">'C'</span>:
<a name="l00325"></a>00325                         <span class="keywordflow">if</span> ($len &lt;= $this-&gt;blobSize) <span class="keywordflow">return</span> <span class="charliteral">'C'</span>;
<a name="l00326"></a>00326                 
<a name="l00327"></a>00327                 <span class="keywordflow">case</span> 'LONGCHAR':
<a name="l00328"></a>00328                 <span class="keywordflow">case</span> 'TEXT':
<a name="l00329"></a>00329                 <span class="keywordflow">case</span> 'CLOB':
<a name="l00330"></a>00330                 <span class="keywordflow">case</span> 'DBCLOB': <span class="comment">// double-byte</span>
<a name="l00331"></a>00331                 <span class="keywordflow">case</span> <span class="charliteral">'X'</span>:
<a name="l00332"></a>00332                         <span class="keywordflow">return</span> <span class="charliteral">'X'</span>;
<a name="l00333"></a>00333                 
<a name="l00334"></a>00334                 <span class="keywordflow">case</span> 'BLOB':
<a name="l00335"></a>00335                 <span class="keywordflow">case</span> 'GRAPHIC':
<a name="l00336"></a>00336                 <span class="keywordflow">case</span> 'VARGRAPHIC':
<a name="l00337"></a>00337                         <span class="keywordflow">return</span> <span class="charliteral">'B'</span>;
<a name="l00338"></a>00338                         
<a name="l00339"></a>00339                 <span class="keywordflow">case</span> 'DATE':
<a name="l00340"></a>00340                 <span class="keywordflow">case</span> <span class="charliteral">'D'</span>:
<a name="l00341"></a>00341                         <span class="keywordflow">return</span> <span class="charliteral">'D'</span>;
<a name="l00342"></a>00342                 
<a name="l00343"></a>00343                 <span class="keywordflow">case</span> 'TIME':
<a name="l00344"></a>00344                 <span class="keywordflow">case</span> 'TIMESTAMP':
<a name="l00345"></a>00345                 <span class="keywordflow">case</span> <span class="charliteral">'T'</span>:
<a name="l00346"></a>00346                         <span class="keywordflow">return</span> <span class="charliteral">'T'</span>;
<a name="l00347"></a>00347                 
<a name="l00348"></a>00348                 <span class="comment">//case 'BOOLEAN': </span>
<a name="l00349"></a>00349                 <span class="comment">//case 'BIT':</span>
<a name="l00350"></a>00350                 <span class="comment">//      return 'L';</span>
<a name="l00351"></a>00351                         
<a name="l00352"></a>00352                 <span class="comment">//case 'COUNTER':</span>
<a name="l00353"></a>00353                 <span class="comment">//      return 'R';</span>
<a name="l00354"></a>00354                         
<a name="l00355"></a>00355                 <span class="keywordflow">case</span> 'INT':
<a name="l00356"></a>00356                 <span class="keywordflow">case</span> 'INTEGER':
<a name="l00357"></a>00357                 <span class="keywordflow">case</span> 'BIGINT':
<a name="l00358"></a>00358                 <span class="keywordflow">case</span> 'SMALLINT':
<a name="l00359"></a>00359                 <span class="keywordflow">case</span> <span class="charliteral">'I'</span>:
<a name="l00360"></a>00360                         <span class="keywordflow">return</span> <span class="charliteral">'I'</span>;
<a name="l00361"></a>00361                         
<a name="l00362"></a>00362                 <span class="keywordflow">default</span>: <span class="keywordflow">return</span> <span class="charliteral">'N'</span>;
<a name="l00363"></a>00363                 }
<a name="l00364"></a>00364         }
<a name="l00365"></a>00365 }
<a name="l00366"></a>00366 
<a name="l00367"></a>00367 } <span class="comment">//define</span>
<a name="l00368"></a>00368 ?&gt;
</pre></div><?php
  include_once '../doc-typo3-funcs.php';
  get_footer();
?>