cics中服务调服务的问题 - 中间件技术 - LoveUnix -- 最强AIX小机技术论坛,UNIX,Linux,存储,数据库,中间件,开发,管理 -- 蓝色的IBM技术天堂 --bbs.LoveUnix.net

caifly

LU新生

UID 14121
精华 0
积分 2
帖子 4
活跃指数 2
LU金币 2012 个
LU金条 0 个
阅读权限 10
注册 2004-3-7

#1

大中小

使用道具

发表于 2006-3-14 17:58 资料个人空间短消息加为好友

cics中服务调服务的问题

我在A服务程序中用CallProgram调B这个服务程序

为什么经常调B出错(返回值是-1),然后再调一次就可以了

jxufe

版主

赌运长久

UID 29711
精华 4
积分 1430
帖子 2471
活跃指数 193
LU金币 1763 个
LU金条 0 个
阅读权限 210
注册 2005-2-24

#2

大中小

使用道具

发表于 2006-3-24 17:01 资料个人空间短消息加为好友

把代码贴出来,帮你分析一下

梁馨,我爱你

caifly

LU新生

UID 14121
精华 0
积分 2
帖子 4
活跃指数 2
LU金币 2012 个
LU金条 0 个
阅读权限 10
注册 2004-3-7

#3

大中小

使用道具

发表于 2006-3-30 19:15 资料个人空间短消息加为好友

BeginWrite();
SetValue("inparamnum","3");
SetValue("inparam1","04");
SetValue("inparam2","");
SetValue("inparam3",c_prod_no);
iRetcode=CallProgram("CALLBILL");
if(iRetcode==1)
{
printf("调用欠费服务CALLBILL失败:%d.\n",iRetcode);
WriteFileLog("","","调用欠费服务CALLBILL失败");
sprintf(sresult,"0008");
strcpy(sretreason,"执行判断号码是否欠费失败");
sprintf(cMessageInes,"%sERROR CODE:-1,执行判断号码是否欠费失败",sresult);
iret_from_ivr=-5;
break;
}

caifly

LU新生

UID 14121
精华 0
积分 2
帖子 4
活跃指数 2
LU金币 2012 个
LU金条 0 个
阅读权限 10
注册 2004-3-7

#4

大中小

使用道具

发表于 2006-3-30 20:13 资料个人空间短消息加为好友

iRetcode 的返回值是-8 有时可以有时不行晕啊