请教：PowerBuilder中函数定义如果转成vfp的定义
嵌入模块主文件为BargaingApplyV3_01020.DLL，其他为配套的支持文件。嵌入模块根据配置文件内容获取运行参数，接收用户交易并将处理结果返回给用户。
BargaingApplyV3_xxxx提供外部调用的函数主要包括交易申请函数f_UserBargaingApply、交易初始化函数f_UserBargaingInit和交易关闭函数f_UserBargaingClose
PowerBuilder中函数定义：FUNCTION integer f_UserBargaingInit(string lpData1, ref string lpMessage,string lpData2)  library "BargaingApplyV3_01020 "
PowerBuilder中函数定义：FUNCTION integer f_UserBargaingClose(string lpData1, ref string lpMessage,string lpData2)  library "BargaingApplyV3_01020"
PowerBuilder中函数定义：FUNCTION integer f_UserBargaingApply(integer nTradeTypeID,double TradeID,string lpData1, ref string lpMessage,string lpData2)  library " BargaingApplyV3_xxxxx"

我改成这样，它提示无法加载32位dll
*!*    set library to BargaingApplyV3_01020.dll
DECLARE Integer f_UserBargaingInit IN BargaingApplyV3_01020.dll string lpData1,string @lpMessage,string lpData2
LOCAL lma1
lma1=SPACE(1000)
f_UserBargaingInit('',@lma1,'b')


附资料：
函数原型：int f_UserBargaingInit(const char * Data1,char * retMsg,char* Data2)
功能：系统应用前初始化数据准备
参数说明：
传入参数：Data1-------不需要传递数据
                 Data2-------传递医疗机构编号
             retMsg ---- 返回的信息，数据包格式参考3.3
返回值：  =0-----------成功，没有任何警告，返回信息在retMsg
             >0-----------成功，但是有警告信息，警告信息在retMsg
             <0-----------失败，错误信息在retMsg中
PowerBuilder中函数定义：FUNCTION integer f_UserBargaingInit(string lpData1, ref string lpMessage,string lpData2)  library "BargaingApplyV3_xxxxx "
函数原形：int f_UserBargaingClose (const char * Data,char * retMsg,char* Data2)
功能：退出系统前释放资源
参数说明：同于f_UserBargaingInit交易。
PowerBuilder中函数定义：FUNCTION integer f_UserBargaingClose(string lpData1, ref string lpMessage,string lpData2)  library "BargaingApplyV3_01020"
调用实例(其中方框内为交易返回参数，用户传递进入时为”$$3000个空格$$”)
f_UserBargaingInit(”$$$$”,”$$0~~$$”,””)
f_UserBargaingClose(”$$$$”,”$$0~~$$”,””)

[此贴子已经被作者于2020-1-3 16:53编辑过]

谢谢版主回复，附DLL

谢谢 版主，正好有事没及时回复，我把所有DLL发过来

十分谢谢版主的帮助，没有报错了！十分感谢！