新一代应用服务框架介绍

单击此处编辑母版标题样式,*,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,第五届思特奇论坛,新一代应用服务框架介绍,CRM-PD2 李爱斌,神州数码思特奇信息技术股份有限公司,2008年04月07日,服务框架设计目标,1,2,服务框架编码演示,3,Q&A,4,服务框架设计思路,typedef int (*TFuncBusiness)(utype *inParam, utype *outParam,TErrInfo *errInfo);,服务框架设计目标,uType,灵活性，,支持简单数据类型,支持复合数据类型,支持树状数据类型,。,高效性,原始数据类型 VS 字符类型,原始数据类型无需转换，可直接在utype上运算。,位置解析 VS 名字解析,utype,int,string,utype,double,string,utype,string,string,string,自定义组件,组件 vs 函数,组件接口统一，可灵活互换。,基于组件实现通用模板、流程定制、开发自动化。,函数接口固定，通用性差。,自定义组件 vs 标准组件,自定义组件，不依赖第三方，可灵活定制，专业性强，轻量简洁。,服务框架设计目标,1,2,服务框架编码演示,3,Q&A,4,服务框架设计思路,iCRM系统技术架构,函数1,函数3,函数4,函数2,函数5,函数对业务逻辑封装不完整，无法作为完整的业务逻辑复用。,服务程序与平台相关。,服务程序嵌套调用效率低，难以复用。,传统的开发模式,业务组件2,业务组件1,业务组件3,业务组件1,业务组件m,业务组件n,服务程序框架，屏蔽平台相关处理，屏蔽平台差异，完全剥离业务逻辑和平台相关处理。,专注业务逻辑，填空式开发,业务组件完整地业务逻辑封装，提高组件复用度,业务组件可本地调试，通过后部署到远程中间件平台，方便测试提高开发效率。,新一代应用服务框架的开发模式,新一代应用服务框架的技术路线演进,业务组件,utype,utype,操作界面,uType,序列化,uType序列化,外部系统,XML,统一数据流,Utype,序列化，统一中间件,buffer,支持,C/JAVA,uType,接口,支持,XML,解析,新一代应用服务框架的业务组件分层,SERVER,SERVICE,BP（Business Process）,BC（Business Component）,所有业务集中在BC/BP，,Server/Service不能有逻辑,服务框架设计目标,1,2,服务框架编码演示,3,Q&A,4,服务框架设计思路,新一代应用服务框架的编码演示,BC（Business Component）,使用自动生成BC的命令：,hostname$,autoBC user/passwddb bcname sqltext in_mrows out_mrows,BC Body,int cGetSysDate(utype * inParam,utype *outParam,TCtrlInfo *errInfo),DBUG_ENTER(cGetSysDate);,uGetStr(inParam,0); UCHECKIN(-1, failure in get the 0th parameter!);,DBUG_PRINT(info,(inParam0=%s, uGetStr(inParam,0);,*outParam=uInit(0); UCHECKOUT(-2, Init pointer of *outParam failure!);,try,otl_nocommit_stream sm_cGetSysDate(10,select to_char(sysdate, :dateFormat) from dual,*db);,/ DBUG_PRINT(sqltext,(select to_char(sysdate, :dateFormat) from dual);,sm_cGetSysDate * 1.0,* 1.00,* 系统时间函数,* type=input,* ,* -1: failure in get parameter of ARRAYcolsrows!,*,* ,*,* int ret_code = 0;,*,* utype *pcGetSysDate_in = NULL;,* utype *pcGetSysDate_out = NULL;,*,* pcGetSysDate_in = uInit(0);,* pcGetSysDate_out = uInit(0);,*,* uSetStr(pcGetSysDate_in, 0, uGetStr(inParam, 0);UCHECKIN(-1, failure in get the 0th parameter!);,* ret_code = cGetSysDate(pcGetSysDate_in, ,* uSetStr(*outParam, 0, uGetStr(pcGetSysDate_out, 0);,*,* uFree(pLoginFav_in);,* uFree(pLoginFav_out);,*,* if (ret_code != 0),* ,* USETERROR(104, );,* return ;,* ,* ,*/,业务组件2,业务组件1,业务组件3,业务组件1,业务组件m,业务组件n,COPY,新一代应用服务框架的编码演示,BP（Business Process）,通过BP模板，将BC通过有机的组合，即可整合与业务有关的BP。,BC2,BC1,BC3,BC1,BC,BC,按预定的业务规则制定BP模板，填入BC。,新一代应用服务框架的编码演示,SERVICE,通过SERVICE模板，将BP/BC进行逻辑封装即可。,Service生成器，自动生成Service代码,Usage: autoSVC.sh svc_name,Service body,#include ,#include ,class Ts004:public TTUXSVC,public:,Ts004(const char * iSvcName):TTUXSVC(iSvcName)inParam=NULL;outParam=NULL;errInfo=NULL;,virtual void run();,;,void Ts004:run(),/编写业务逻辑,return;,;,void s004(TPSVCINFO *transb),Ts004 pubSVC(s004);,TTUXSVC * pSVC=,int obufLen=0;,char * obuf=NULL;,pSVC-init(transb);,try,pSVC-run();pSVC-close(,db-commit();,catch(otl_exception& p),tpreturn(TPSUCCESS,0,obuf,obufLen,0);,重载,Tsvc_name:run,(),方法。,直接填写,BC,或,BP,调用即可。,新一代应用服务框架的编码演示,SERVER,通过Server模板，填写需要发布的Service,然后发布即可。,Server body,#include ,#include ,/ otl_connect * db;,/ otl_connect _db;,tpsvrinit(int argc, char *argv),OCIEnv* envhp; / OCI environment handle,OCISvcCtx* svchp; / OCI Service context handle,int retcode; / return code,printf(RtestServer tpsvrinitn);,retcode = spublicDBLogin(NULL,NULL,RTestServer,LABELDBCHANGE);,db=,otl_connect:otl_initialize(); / initialize OCI environment,db-rlogon(envhp,svchp); / attach to the primary Pro*C/C+ connection,return 0;,void tpsvrdone(),db-logoff();,spublicDBClose(LABELDBCHANGE);,void s004(TPSVCINFO *transb);,填写需要发布的,Service,。,重新发布,Server,即可。,服务框架设计目标,2,服务框架编码演示,3,Q&A,服务框架设计思路,4,1,Thank You,Merci,Grazie,Gracias,Obrigado,Danke,Japanese,English,French,Russian,German,Italian,Spanish,Brazilian Portuguese,Arabic,Traditional Chinese,Simplified Chinese,Hindi,Tamil,Thai,Korean,Questions?,