新增文章
文章标题
分类
C#
云星空
K3 BOS
K3 功能
用友
Oracle
python
SQL
MySql
PHP
HTML
script
windows
Access
影视后期
财务
服务
生活
内容
Private Sub m_BillInterface_AfterNewBill() '新增单据 自动显示 选单界面 aFClassTypeID = m_BillInterface.FID Select Case aFClassTypeID Case Is = 210001602: m_BillInterface.BillCtl.DoSelBill 210001401 '出仓单 选 生产任务单 Case Is = 210001603: m_BillInterface.BillCtl.DoSelBill 210001602 '退仓单 选 出仓单 Case Is = 210001612: m_BillInterface.BillCtl.DoSelBill 210001602 '入库单 选 出仓单 Case Is = 210001613: m_BillInterface.BillCtl.DoSelBill 210001612 '退库单 选 入库单 End Select End Sub
返回
保存