在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調用文體思路一致,但調用細節有區別)
業務合作或技術交流請加我微信