柔柔 发表于 2007-1-29 11:03:16

请使用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:13

顶上来

Dracular 发表于 2007-3-12 10:10:19

再顶~~飘过

nataliedu 发表于 2007-9-26 10:03:57

楼上的脚本是自己写的吗？
帮顶。。。

renwofei423 发表于 2009-5-7 10:33:07

额~这种问题到现在还没有解决吗？楼主是怎么解决的？放弃了？
页: [1]
查看完整版本: 请使用tuxdeo8.1协议的指点