金蝶WISE弹出框显示单据并返回被选单据
'当单机头触发点击事件时,显示 ClassTypeID=200000005 的单据,并返回选中的单据信息Private Sub m_BillInterface_HeadCtlClick(ByVal ctl As Object, ByVal dctHead As KFO.IDictionary) Dim oDataSrv As Object Dim objLookup As Ob...