RIfxDB

Informix native R driver

Project Status : On the drawing board

.

Hikers are welcome beyond this point

---

Experimental ....

Database setup

-- drop table t1;
create table t1 ( c1 int, c2 char(20), c3 int, c4 int ) ;
insert into t1 values( 1, 'Sunday', 101, 201 );
insert into t1 values( 2, 'Monday', 102, 202 );
insert into t1 values( 3, 'Tuesday', 103, 203 );
insert into t1 values( 4, 'Wednesday', 104, 204 );
insert into t1 values( 5, 'Thursday', 105, 2005 );
insert into t1 values( 6, 'Friday', 106, 206 );
insert into t1 values( 7, 'Saturday', 107, 207 );

Build the driver on windows, and then ....

> library(RIfxDB)
> ch <- IfxConnect( "SERVER=ids0;DATABASE=db1;HOST=127.0.0.1;SERVICE=9088;UID=informix;PWD=xxxx;" )
> tmp <- IfxQuery(ch, "select * from t1") 
> res <- IfxFetchRows(ch)
> print (res)
$data
$data[[1]]
[1] 1 2 3 4 5 6 7

$data[[2]]
[1] "Sunday              " "Monday              " "Tuesday             " "Wednesday           "
[5] "Thursday            " "Friday              " "Saturday            "

$data[[3]]
[1] 101 102 103 104 105 106 107

$data[[4]]
[1]  201  202  203  204 2005  206  207


$stat
[1] 1

> IfxClose(ch)
>