新增文章
文章标题
分类
C#
云星空
K3 BOS
K3 功能
用友
Oracle
python
SQL
MySql
PHP
HTML
script
windows
Access
影视后期
财务
服务
生活
内容
Select Case BOSTool.ToolName Case "mnuPushBill_210001202", "mnuPushBill_210001211", "mnuPushBill_210001502", "mnuBackData" '下推 1202 送货单 1211 订单变更 1502 受托加工送货单 选单返回 aFDestClassTypeID = m_ListInterface.DataSrv.dctLink("FDestClassTypeID") If aFDestClassTypeID = 210001101 Then '采购订单 不限制 Exit Sub ElseIf Not IsOneOrder(aFClassTypeID, aFEntryId) Then '表头不一致,取消下推 Cancel = True End If Case Else End Select
返回
保存