U8供应链各业务单据CO功能

在U8供应链单据编码过程中封装的接口dll，无论是U8供应链内部编码或是二开外部编码都可以调用的接口，用来做单据的加载，新增，审核、弃审、删除等操作。
如：U8库存管理Co调用方法
1、Co对象初始化：

Set STCo = New USERPCO.VoucherCO
    Dim domPos As New DOMDocument
    Dim errMsg As String
    STCo.IniLogin ologin, errMsg
    If errMsg <> "" Then
        MsgBox errMsg    
    End If

2、调用CO生成单据

Dim errMsg As String
    Dim ss As New DOMDocument
    Dim bret As Boolean
    Dim ele As IXMLDOMElement  
    For Each ele In bodydom.selectNodes("//z:row")
        ele.setAttribute "editprop", "A"
    Next
    bret = STCo.Insert("01", headdom, bodydom, ss, errMsg)    
    If bret = True Then    
        MsgBox "入库单插入成功"
    Else
        MsgBox ss.xml
    End If

补：其他CO方法在VB里用“对象管理器（f2）”参阅悟

3、HeadDom、BodyDom 参数组织组织（获取）参照

Dim headdom As New DOMDocument

       Dimbodydom As New DOMDocument                            

    STCo.Load "01", " id='1000000012'", headdom, bodydom, domPos, errMsg

    MsgBox headdom.xml

    MsgBox bodydom.xml

全文版权所有（注：各业务单据的CO调用文体思路一致，但调用细节有区别）

业务合作或技术交流请加我微信