在一次项目开发过程中需要从不同的数据库(eg: db1=ORACLE;db2=SYBASE)中取出数据方如同一个数据窗口中作为报表. 思路如下:
1. 创建两个tabular型的Datawindow, dw_oracle, dw_sybase.
2. 创建一个composite的Datawindow"dw_cmpst". 在这个数据窗口中置入dw_oracle和dw_syabse. 分别命名为"dw_orcl"和"dw_sbs".
3. 在脚本中写入如下的语句:
DataWindowChild ldwc_report Transaction NEW_SQLCA; CONNECT USING SQLCA; // 使用默认的事务对象
dw_cmpst.GetChild( "dw_orcl", ldwc_report) // get a reference tothe first report in the composite ldwc_report.SetTransObject( SQLCA) ldwc_report.Retrieve() DISCONNECT USING SQLCA; NEW_SQLCA = CREATE Transaction // 第二个事务对象 NEW_SQLCA.DBMS = "SYC Sybase System 10/11" NEW_SQLCA.Database = "database" NEW_SQLCA.LogPass = "password" NEW_SQLCA.ServerName = "sybase_server" NEW_SQLCA.LogId = "logid" NEW_SQLCA.DBParm = "Release='11',StaticBind=0,DateTimeAllowed='Yes'" CONNECT USING NEW_SQLCA; dw_cmpst.GetChild( "dw_sbs", ldwc_report) // reference ldwc_report.SetTransObject( NEW_SQLCA) ldwc_report.Retrieve() DISCONNECT USING NEW_SQLCA; SetNull( NEW_SQLCA);
dw_cmpst.retrieve()//取出数据并显示
最后一句出现错误,去掉这一语句又不能显示数据,百思不得其解. 后来在一国外论坛得到如下答案:
将dw_cmpst.retrieve()改为如下语句:
dw_cmpst.setredraw(false)
dw_cmpst.modify("datawindow.print.preview=yes")
dw_cmpst.modify("datawindow.print.preview=no")
dw_cmpst.setredraw(true)
