《Oracle 10g应用服务器管理和网格计算》.docVIP

第5章 Oracle Workflow for Java 5.2 创建Oracle工作流的定义和组件 5.2.4 创建、修改和删除Oracle工作流的组件 在修改API之前，编写并执行一个自定义的升级脚本，来为任何引用API的激活的工作项创建和移植新项属性。下面实例显示一种结构化一个升级脚本的方法。 for each active work item begin wf_engine.AddItemAttr(itemtype, itemkey, ’new_attribute_name’); wf_engine.SetItemAttrText(itemtype, itemkey, ’new_attribute_name’, ’New attribute value’); end; end loop; 下面的实例显示一种结构化如下的一个意外处理器的方法。 procedure procedure_name( itemtype in varchar2, itemkey in varchar2, actid in number, funcmode in varchar2, result in out varchar2) is begin –– –– RUN mode – normal process execution –– if (funcmode = ’RUN’) then –– your run code goes here null; wf_engine.SetItemAttrText(itemtype, itemkey, ’existing_attribute_name’, ’Existing attribute value’); begin wf_engine.SetItemAttrText(itemtype, itemkey, ’new_attribute_name’, ’New attribute value’); exception when others then if (wf_core.error_name = ’WFENG_ITEM_ATTR’) then wf_engine.AddItemAttr(itemtype, itemkey, ’new_attribute_name’); wf_engine.setitemattrtext(itemtype, itemkey, ’new_attribute_name’, ’New attribute value’); else raise; end if; end; –– example completion result := ’COMPLETE:’; return; end if; –– –– CANCEL mode – activity ’compensation’ –– –– This is in the event that the activity must be undone, –– for example when a process is reset to an earlier point –– due to a loop back. –– if (funcmode = ’CANCEL’) then –– your cancel code goes here null; –– no result needed result := ’COMPLETE’; return; end if; –– –– Other execution modes may be created in the future. Your –– activity will indicate that it does not implement a mode –– by returning null –– result := ’’; return; exception when others then –– The line below records this function call in the error –– system in the case of an exception. wf_core.context(’package_name’, ’procedure_name’, itemtype, itemkey, to_char(actid), funcmode); raise; end procedure_name; 5.3 创建Oracle工作流的图形化表示 5.3.3 Oracle工作流的角色与编码 3. Oracle工作流的编码 (8) 循环结构 下面给出API代码实例，解决如何应付各种可能的节点。 If (funcmode = ‘CANCEL’) then …