www.sosof.com

//sp名称+业务名称+之+子流程/函数名称+子流程/子函数 --例如:新浪缘分天空之寻找聊友子流程
//函数名称:fun_findfriend()

/*参数
输入:
_field1:参数说明
...
输出:
_field1:参数说明
...
返回值:
0:正常返回
1:异常返回
...
*/

/*寄存器
sr20:主叫用户id
sr21:被叫用户id
sr22/ir22:用户性别
sr23/ir23:用户年龄
sr24/ir24:用户性格
sr25/ir25:交友目的
sr26:个人介绍文件名
sr27/ir27:结果集总数
sr28/ir28:结果集序号
sr30:系统提示音播放绝对路径(不含文件名称)
...
*/

//宏定义
#define dataaccess_timeout 20000
#define success 0
#define exception 1
...
#define find_friend "00201" //查找朋友总数和信息
...

//调用通用子函数
//无

//调用私用子函数
#include fun_calluser //加载呼叫对方子流程
...

trace on

function fun_findfriend
{
begin:
evtstart[0]
... //一般是sassign操作,把传入参数存放寄存器sr?中
-> stwelcome

stwelcome:
readstrfromini(_inifilename,"path.voxpath",sr30)
sassign(sr0,sr30)
sadd(sr0,"welcome.vox")
playfile(sr0,"?")
evtreturn[0] -> stinputsex
evtreturn[3] -> stinputsex
evtreturn[-1]-> stfindfriendexcept

stinputsex:
sassign(sr0,sr30)
sadd(sr0,"sex.vox") //请输入性别
playfile(sr0,"?")
evtreturn[0] -> stgetsex
evtreturn[3] -> stgetsex
evtreturn[-1] -> stfindfriendexcept

stgetsex:
getdigits(1,5,"")
evtreturn[0] -> stchecksex
evtreturn[4] -> stinputsex
evtreturn[-1]-> stfindfriendexcept

stchecksex:
sassign(sr22,_eventdata) //保存性别信息
checkpushedbutton()
evtreturn[1] -> stfindfriendbegin
evtreturn[2] -> stfindfriendbegin
evtreturn[-1]-> stinputsex

stfindfriendbegin: //访问sp数据库时,推荐使用下列格式
sassign(_operateid,find_friend)
iassign(_fieldnum,2)
sassign(_field1,_userid)
sassign(_field2,sr22)
dataaccess(0,0,dataaccess_timeout)
evtreturn[0] //访问sp数据库成功
sassign(sr21,_field1)
-> stcallfriend
... //可以有其他返回值(在接口文档中定义)
evtreturn[-1]-> stfindfriendexcept
evttimerexpired[-1]-> stfindfriendexcept

stcallfriend:
...
fun_calluser()
evtreturn[0] //呼叫聊友成功
...
iassign(_result,success)
-> end
evtreturn[-1] //呼叫聊友失败
...
iassign(_result,exception)
-> end

stfindfriendexcept:
sassign(sr0,sr30)
sadd(sr0,"sysbusy.vox")
playfile(sr0,"?") //"很抱歉,系统正忙,请稍后"
evtreturn[-1]
...
iassign(_result,exception)
-> end //结束此流程,返回到调用函数

...
}

• 关于丰搜
• 用户帮助
• 友情连接
• 意见留言
• 不良信息举报
• 免责声明

• Copyright © 2001- 2010 丰搜网 All Rights Reserved
• ICP备案编号:粤ICP备06052964号