51Testing软件测试论坛

标题: 请使用tuxdeo8.1协议的指点 [打印本页]

作者: 柔柔 时间: 2007-1-29 11:03
标题: 请使用tuxdeo8.1协议的指点
在客户端安装ＬＲ８．０，ＴＵＸＤＥＯ８．１客户端，并设置好环境变量：
COBCPY=$TUXDIR\cobinclude
FIELDTBLS32=000000.fml,cpagd.fml
FLDTBLDIR32=C:\bea\tuxedo8.1\etc
LD_LIBRARY_PATH=C:\bea\tuxedo8.1\lib
LIB=C:\bea\tuxedo8.1\lib
Path=C:\bea\tuxedo8.1\bin
TUXDIR=C:\bea\tuxedo8.1
ULOGPFX=c:\log\ULOG
WSNADDR=//192.168.1.242:6689
在ＬＲ编写脚本实现从客户端向后台服务器发送请求，如下：
#include "lrt.h"

Action()
{
FBFR32 *data_0, *data_1;

long olen_2;
long in_leng;
int tpresult_int;


lrt_tuxputenv("WSNADDR=//10.245.10.102:6689");

data_0 = (FBFR32 *)lrt_tpalloc("FML32", NULL, 1024);
data_1 = (FBFR32 *)lrt_tpalloc("FML32", NULL, 1024);

lrt_Finitialize32((FBFR32 *)data_0);
lrt_Finitialize32((FBFR32 *)data_1);

lrt_Fadd32_fld((FBFR32 *)data_0,"name=S_INST_ID","value={user}",LRT_END_OF_PARMS);
lrt_Fadd32_fld((FBFR32 *)data_0,"name=S_TRAN_CD","value=842001",LRT_END_OF_PARMS);

tpresult_int = lrt_tpcall("simpserv", (char *)data_0, sizeof((char *)data_0), (char **)&data_1, &olen_2, 0);
lr_output_message("CALL:%d",tpresult_int);

//lrt_tpabort(0);
//lrt_tpcommit(0);
  lr_output_message("Call:%d", tpresult_int);


lrt_tpfree((char *)data_0);
lrt_tpterm();

lrt_abort_on_error();

return 0;
}
因为ＬＲ８．０只是支持ＴＵＸＤＥＯ６．０＼７．０，没有支持８．１的，所以运行时报错：
错误:Failed to load TUXEDO library
不知道大家对这种问题怎么解决，要不找个支持ＴＵＸＤＥＯ８．１的ＬＲ，要不把这个错误想什么办法解决？

作者: fishy 时间: 2007-3-7 09:44
顶上来

作者: Dracular 时间: 2007-3-12 10:10
再顶~~飘过

作者: nataliedu 时间: 2007-9-26 10:03
楼上的脚本是自己写的吗？
帮顶。。。

作者: renwofei423 时间: 2009-5-7 10:33
额~这种问题到现在还没有解决吗？楼主是怎么解决的？放弃了？

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)