【正文】 r tuxRtn = null。 }函數(shù)Tpacallpublic CallDescriptor Tpacall(String service_name, TypedFML32 in_params) throws TPException, TPReplyException catch (Exception ee) (tpcall threw TPException + te)。 catch (TPException te) (tpcall threw TPReplyExcption + tre)。 catch (TPReplyException tre) throw e。 if (tuxConn == null) tuxConn = ()。 try { { TuxedoConnectionFactory tcf = null。 ctx = null。 public TuxedoConnection setUpConnection() throws TPExceptionprivate TuxedoConnection tuxConn = null。import 。import 。 Tpgetrply: 等待異步調(diào)用service的返回結(jié)果. throws TPException, TPReplyException, RemoteException。 2)public TypedFML32 Tpgetrply(CallDescriptor cd) 2)其中fml和fml32類型的java類在這里要分別指定,不能通用,view(32)也是一樣.以上信息填寫完成后點(diǎn)擊create保存,至此wtc service全部配置完成,單擊wtc_service的Target and deploy標(biāo)簽,選擇server,apply以上應(yīng)用.編寫通過wls訪問tuxedo service的程序?yàn)榱藴p少篇幅例子代碼沒有全部羅列,只選擇粘貼了代碼中的關(guān)鍵部分.編寫訪問tuxedo service的ejb Remote Name是可供weblogic調(diào)用的遠(yuǎn)程tuxedo發(fā)布的service名字,即在Tuxedo dm文件的*DM_LOCAL_SERVICES節(jié)點(diǎn)中發(fā)布的service名字.配置wtc resourcemydomainserviceswtc WTC_Serviceresources Remote Access Point List是上面配置的remote tuxedo access point的名字.3) Local Access Point是上面配置的local tuxedo access point的名字.2) 注意:1) Resource Name: fml32_test mydomainserviceswtc WTC_ServiceImported services 依次填寫Access Point: Remote_Tuxedo_Domain Access Point ID: weblogic 該類文件的存放路徑一定可以被weblogic識別,即保存在weblogic啟動(dòng)后CLASSPATH的路徑中,否則在后面配置wtc resource時(shí)會失敗.配置weblogic wtc service 運(yùn)行: javac ?d . 4) 運(yùn)行: java .3) ,使weblogic環(huán)境變量生效.2) 本文例子用到tuxedo fml32數(shù)據(jù)緩沖區(qū),所以首先要?jiǎng)?chuàng)建該fml32數(shù)據(jù)緩沖區(qū)定義文件對應(yīng)的java描述文件的類文件,將前面定義的文件student_fld.1) 以上信息說明域間通信進(jìn)程啟動(dòng)成功! process id=28863 ... Started.exec GWADM A : 發(fā)布fml32_test service,使該service可以被其他域中的服務(wù)調(diào)用.2)編譯修改之后的dm文件: fml32_test wtc_jolt buildserver f o wtc_jolt s fml32_test r Oracle_XA v.:}編寫makefile文件.SUFFIXES:.pc .cCC=ccTUXINCLUDE=$(TUXDIR)/includeORAINCLUDE=$(ORACLE_HOME)/prep/publicWORKPATH=$(HOME)/../../...APPPATH=$(HOME)/binTARGET=wtc_joltall: { EXEC SQL Select age, name Into :lAge, :sNamelStudentId, amp。 recebuflen=0。 tpterm()。 if ((sendbuf = (FBFR32 *)tpalloc(FML32, NULL, 1024)) == NULL) recebuf = (FBFR32 *)rqstdata。 DECLARE SECTION。 fml32_test(rqst) }} ifdef __cplusplus {endif{ tpsvrinit(int argc, char *argv[])else(該程序通過pro*c文件訪問數(shù)據(jù)庫oracle數(shù)據(jù)庫):include include include include include EXEC ORACLE OPTION (RELEASE_CURSOR = YES)。 long type Tuxedo支持string,carry,view,view32,fml,fml32等數(shù)據(jù)緩沖區(qū),其中fml32類型相對復(fù)雜且比較常用,本例子采用fml32數(shù)據(jù)緩沖區(qū)開發(fā),首先需要編寫fml32數(shù)據(jù)緩沖區(qū)的定義文件,包括fml32數(shù)據(jù)緩沖區(qū)各個(gè)字段的名稱已經(jīng)長度等等,在應(yīng)用程序中需要包含該頭文件,這樣應(yīng)用程序中即可以使用fml32數(shù)據(jù)緩沖區(qū), NWDEVICE=../../binweblogic_domain NWADDR=//weblogicserver_domain_ip:port*DM_REMOTE_SERVICES*DM_LOCAL_SERVICESfml32_test tuxedo_domain DOMAINID=billing 之后tmbooty啟動(dòng)tuxedo server,如果啟動(dòng)以上3個(gè)server時(shí)報(bào)類似Application initialization failure的啟動(dòng)失敗的提示信息,那么注意查看tuxedo的ULOG日志文件,通過日志的提示排除錯(cuò)誤,這里常見的一個(gè)錯(cuò)誤是沒有在系統(tǒng)環(huán)境變量中定義BDMCONFIG或者指定該文件路徑錯(cuò)誤.(關(guān)于環(huán)境變量的修改見下文).增加并編譯dm文件dm文件是tuxedo進(jìn)行域間通信時(shí)的配置文件,tuxedo與weblogic通過wtc通信是通過域間通信實(shí)現(xiàn)的,所以dm文件需要?jiǎng)?chuàng)建,dm文件通?？梢源娣旁趗bb文件所在的路徑下.Dm需要做的配置如下:*DM_LOCAL_DOMAINS SRVID=22230GWADM　　SRVGRP=GWGroup LMID=simple LMID=simple *DMADM(DOMAIN ADMINISTRATOR SERVER)管理域的server,在運(yùn)行時(shí)管理BDMCONFIG,對已登記的gateway group提供支持,在tuxedo系統(tǒng)中,只能有一個(gè)DMADM進(jìn)程,且不能對它采用MSSQ,不能有REPLYQ.另外為了減少篇幅文中涉及的例子代碼沒有全部羅列,只選擇粘貼了關(guān)鍵部分的代碼.(二)通過wtc進(jìn)行tuxedo與weblogic通信的配置與開發(fā)1)域間通信以及wtc介紹(一)摘要bea tuxedo與weblogic作為業(yè)界優(yōu)秀的交易與應(yīng)用服務(wù)器中間件產(chǎn)品,在電信,銀行,金融等領(lǐng)域廣泛應(yīng)用,通常由tuxedo處理系統(tǒng)的核心業(yè)務(wù),weblogic將業(yè)務(wù)應(yīng)用擴(kuò)展到internet平臺,實(shí)現(xiàn)電子商務(wù),由weblogic調(diào)用tuxedo的服務(wù)或者由tuxedo的服務(wù)調(diào)用通過weblogic部署的ejb,所以tuxedo與weblogic之間的互連通信會經(jīng)常遇到,本文通過2個(gè)例子介紹tuxedo與weblogic通信的配置與開發(fā),兩個(gè)例子分別通過wtc(weblogic tuxedo connector)、 Solaris,如在windows等其他平臺開發(fā)配置方法大同小異。 *GWADM(GATEWAY ADMINISTRATOR SERVER)管理域的域網(wǎng)關(guān)進(jìn)程,在運(yùn)行時(shí)可以對某一組域網(wǎng)關(guān)進(jìn)行管理,主要從DMADM那里取得域的配置信息,并對域網(wǎng)管進(jìn)程及跨越域的全局事務(wù)的LOG文件進(jìn)行管理.*GWTDOMIN(GATEWAY PROCESS)處理域之前的互操作,使本地域和調(diào)用遠(yuǎn)程域可以互相調(diào)用彼此的service,其中GMADM和GWTDOMAIN必須在一個(gè)組中,一個(gè)tuxedo應(yīng)用可以有多個(gè)GWADM,GWTDOMAIN對,一個(gè)組只能有一個(gè)GMADM,GWTDOMAIN對,但一個(gè)tuxedo應(yīng)用只能有一個(gè)DMADM,DMADM可以在如何一個(gè)組中,一個(gè)本地域可以和多個(gè)遠(yuǎn)程域?qū)崿F(xiàn)互操作. DMGroup GRPNO=3 OPENINFO=NONEWSGroup GRPNO=4 OPENINFO=NONE2)在ubb文件*SERVERS節(jié)點(diǎn)中增加如下3個(gè)tuxedo server:DMADM　　SRVGRP=DMGroup tuxedo_domain name number flags 學(xué)生學(xué)號student_name student_fld編譯該文件,在應(yīng)用程序中將引用該文件.編寫源程序以及定義表定義t_student表,其中id表示學(xué)號,name表示學(xué)生姓名,age定義表示姓名.進(jìn)入oracle sqlplus,鍵入:create table t_student (id number(10), name varchar2(20), age number(3))。 tpsvrinit(argc, argv) **argv。 EXEC SQL BEGI