【正文】 Set dom = Nothing Exit Function End If Set Conn = Nothing writeLog (UndoSubmitAuditServiceProxySetComplete) Else Set Conn = Nothing writeLog (UndoSubmitAuditServiceProxySetAbort) UndoSubmit = False Exit Function End If Set dom = Nothing Set obj = Nothing Exit FunctionErrHandler: strErr = writeLog (UndoSubmit ErrHandler:) amp。 set iverifystate=0,ireturncount=0 where amp。 strErr amp。 VoucherType amp。 eventID amp。zhCN：該單據(jù)已經(jīng)不存在或已被其他人修改 UndoSubmit = False Set Conn = Nothing Set dom = Nothing Set rst = Nothing Exit Function Else If (1).Value = 1 And (2).Value = 2 Then strErr = GetString() 39。 and amp。 where Convert(char,Convert(money,Ufts),2)=39。) as iswfcontrolled,isnull(iverifystate,N39。 Set obj = Nothing Set Conn = Nothing Set dom = Nothing DoSubmit = FalseEnd Function 審批流程——撤銷撤銷的工作原理：調(diào)用工作流的自動(dòng)服務(wù)（撤銷），恢復(fù)iverifystate、ireturncount的值，將兩個(gè)值均置為0參考代碼：39。 strMainKeyName amp。 amp。 VoucherId, effeLines End If If effeLines = 0 Then strErr = GetString() 39。 strTblName amp。 strMainKeyName amp。 amp。871 edited Dim sqlUpdate As String If m_ireturncount = 0 Then 39。 = amp。 m_ufts amp。業(yè)務(wù)單據(jù)提交審批調(diào)用Public Function DoSubmit(bizObjectID As String, eventID As String, VoucherId As String, _ context As String, callerCtx As calledContext, m_ufts As String, _ isWfcontrolled As Boolean, ByRef strErr As String, login As Object, Optional cbilltype As String) As Boolean On Error GoTo ErrHandler Dim strVoucherInfo As String Dim dom As New DOMDocument Dim strTblName As String Dim strMainKeyName As String Dim effeLines As Long Dim isWfCtl As Boolean Dim ccode As String Dim m_ireturncount As Integer Dim m_ccode As String Dim AuditServiceProxy As Object Dim rst As New Dim Conn As Dim strSQL As String Set AuditServiceProxy = CreateObject() Dim obj As Object Set obj = CreateObject() Set Conn = strVoucherInfo = GetVoucherInfo(bizObjectID) strVoucherInfo strTblName = (maintbl).nodeValue strMainKeyName = (mainkey).nodeValue ccode = (ccode).nodeValue writeLog DoSubmit judge ufts strSQL = select ireturncount, + ccode + from amp。 審批流程圖配置工具：用友工作流設(shè)計(jì)器： 審核節(jié)點(diǎn)設(shè)置在配置工作流程圖的過程中，在每個(gè)審核處先設(shè)定審核人：每個(gè)審核處設(shè)定好基本屬性（審批人以及基本信息等），就要設(shè)置高級(jí)屬性：高級(jí)屬性的設(shè)置需要設(shè)置以下幾點(diǎn)： 業(yè)務(wù)對(duì)象； 業(yè)務(wù)功能； 業(yè)務(wù)插件（只有在最后一級(jí)審核時(shí)才將其設(shè)置為自己寫的自定義插件）； 關(guān)鍵業(yè)務(wù)數(shù)據(jù)； 輸入?yún)?shù)（點(diǎn)擊確認(rèn)業(yè)務(wù)實(shí)體獲得）如下圖所示： 流程發(fā)起事件設(shè)置將流程圖中的各個(gè)審批節(jié)點(diǎn)設(shè)置好后，繼續(xù)設(shè)置流程發(fā)起事件，一般的流程發(fā)起事件都是用戶提交審批：先設(shè)置一些基本屬性：再甚至高級(jí)屬性（關(guān)鍵）：在高級(jí)屬性中的設(shè)置應(yīng)多注意以下幾點(diǎn)： 業(yè)務(wù)對(duì)象與業(yè)務(wù)功能的設(shè)置與審批節(jié)點(diǎn)相似，不同的是，此處流程發(fā)起事件的業(yè)務(wù)功能使用的是提交，而不是審批； 此處不需要使用到我們自定義的業(yè)務(wù)插件； 多級(jí)審批條件設(shè)置一般多級(jí)審批都涉及一個(gè)條件的設(shè)置，條件指明審核與審核之間關(guān)系的因素，例如我們?cè)O(shè)置二級(jí)審批，當(dāng)然，二級(jí)審批只有在一級(jí)審批審核后，并且通過了，二級(jí)審批才能進(jìn)行，下面我們就以這個(gè)為例子，講述一下，多級(jí)審批條件的設(shè)置： 一般一級(jí)審批的條件多為1==1(此處是使用恒等符號(hào)) 二級(jí)審批條件的設(shè)置：二級(jí)審批條件設(shè)置頁面：上圖語句的意思就是：當(dāng)?shù)谝粚徟说膶徟Y(jié)果為同意時(shí)，第二級(jí)審批才有效 備注 業(yè)務(wù)模型流程的設(shè)置是多變的，以上的介紹只是為大家闡述在流程設(shè)置中各種節(jié)點(diǎn)與量的設(shè)置，再復(fù)雜的流程圖設(shè)置都是用條件、發(fā)起事件、審核事件構(gòu)成，只要搞清楚這三點(diǎn)的設(shè)置方式，相信再復(fù)雜的流程圖都可以設(shè)置得出來3 開發(fā)幫助 閱讀對(duì)象本章節(jié)適合所有從事U871行業(yè)二次開發(fā)的工程師 開發(fā)環(huán)境 實(shí)施環(huán)境詳述：數(shù)據(jù)庫工具：SQL SERVER2000操作系統(tǒng)：windows2000。 param Name=SubSysID Value=QM/ /Command4. 指定業(yè)務(wù)事件對(duì)應(yīng)的業(yè)務(wù)實(shí)體 5. 指定業(yè)務(wù)事件所需要的關(guān)鍵業(yè)務(wù)參數(shù) 關(guān)鍵業(yè)務(wù)參數(shù)將會(huì)在設(shè)計(jì)器中指定從業(yè)務(wù)實(shí)體中取數(shù)據(jù)的規(guī)則（XPath）,流程實(shí)例運(yùn)行時(shí)從符合業(yè)務(wù)實(shí)體格式描述的業(yè)務(wù)單據(jù)取得數(shù)據(jù)，并在調(diào)用業(yè)務(wù)模塊處理該業(yè)務(wù)事件時(shí)傳遞給業(yè)務(wù)模塊。 param Name=cmdLine Value=/如來料報(bào)檢單：?xml version= encoding=utf8?Command param Name=docType Value=/ param Name=id Value=/ 業(yè)務(wù)對(duì)象配置（UAP數(shù)據(jù)引擎配置） 使用審批流，要定義好審批流的業(yè)務(wù)對(duì)象，供系統(tǒng)自動(dòng)調(diào)用審批流時(shí)使用，如下圖：進(jìn)入數(shù)據(jù)引擎定義后，按菜單順序，需定義好物理表、實(shí)體、業(yè)務(wù)對(duì)象： 第一步：定義物理表，關(guān)聯(lián)單據(jù)頭的物理表或視圖：第二步：定義實(shí)體，與物理表相關(guān)聯(lián)： 第三步：添加業(yè)務(wù)對(duì)象：自此，業(yè)務(wù)對(duì)象就添加完畢。2 實(shí)施幫助 閱讀對(duì)象本章節(jié)適合U8ERP各位實(shí)施人員與售前人員在配置審批流時(shí)閱讀。流程設(shè)計(jì)器設(shè)計(jì)出來的流程模型還不能直接投入使用，需要通過重定位模塊對(duì)其消息和服務(wù)地址信息從設(shè)計(jì)時(shí)環(huán)境的地址轉(zhuǎn)化為運(yùn)行時(shí)地址后，才能正式使用。U8系統(tǒng)按照完畢后，首先需要進(jìn)入工作流環(huán)境配置模塊設(shè)置MOM服務(wù)器和工作流引擎信息；配置的信息會(huì)通知到對(duì)應(yīng)的MOM服務(wù)器，使得MOM服務(wù)器感知與其協(xié)同工作的工作流引擎信息。默認(rèn)情況下，應(yīng)用服務(wù)器、MOM服務(wù)器均安裝在U8應(yīng)用服務(wù)器上。U871 審批流幫助文檔文檔控制修改記錄日期作者版本修改參考號(hào)20080308王冬冬審閱人姓名職位審閱簽字張華柄李勛華存檔拷貝號(hào)地點(diǎn)備注目 錄1 工作流系統(tǒng)框架與運(yùn)行原理 3 工作流基本概念 3 U8工作流系統(tǒng)結(jié)構(gòu) 3 U8工作流系統(tǒng)部署 3 工作流系統(tǒng)中各模塊交互 42 實(shí)施幫助 5 閱讀對(duì)象 5 實(shí)施環(huán)境 5 實(shí)施流程 5 單據(jù)準(zhǔn)備與數(shù)據(jù)表準(zhǔn)備 5 業(yè)務(wù)對(duì)象配置（UAP數(shù)據(jù)引擎配置） 5 審批業(yè)務(wù)對(duì)象設(shè)定 11 審批流程圖配置 18 審核節(jié)點(diǎn)設(shè)置 18 流程發(fā)起事件設(shè)置 21 多級(jí)審批條件設(shè)置 23 備注 253 開發(fā)幫助 25 閱讀對(duì)象 25 開發(fā)環(huán)境 25 開發(fā)準(zhǔn)備 25 開發(fā)流程 26 審批流程——提交 26 審批流程——撤銷 31 審批流程——審批 341 工作流系統(tǒng)框架與運(yùn)行原理 工作流基本概念工作流系統(tǒng)是以規(guī)格化的流程描述作為輸入的軟件組件,它維護(hù)流程的運(yùn)行狀態(tài),并在人和應(yīng)用之間分派活動(dòng)。 U8工作流系統(tǒng)結(jié)構(gòu) U8工作流系統(tǒng)部署一個(gè)U8工作流系統(tǒng)服務(wù)于一個(gè)U8應(yīng)用服務(wù)器上關(guān)聯(lián)的多個(gè)年度帳套；U8工作流系統(tǒng)包含一個(gè)MOM服務(wù)器和一個(gè)或者多個(gè)工作流引擎。 工作流系統(tǒng)中各模塊交互工作流系統(tǒng)的使用過程分為三個(gè)階段：設(shè)計(jì)時(shí)