Foxtable(狐表)用户栏目专家坐堂 → 判断后跨表引用


  共有4326人关注过本帖平板打印复制链接

主题:判断后跨表引用

帅哥哟,离线,有人找我吗?
有点灰2
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:104 积分:785 威望:0 精华:0 注册:2022/5/7 19:05:00
判断后跨表引用  发帖心情 Post By:2022/5/25 7:36:00 [只看该作者]

Select Case e.DataCol.Name
    Case "生产流程单_料废", "生产流程单_工废"
        Dim drf As DataRow = e.DataRow
        If drf("生产流程单_工废")IsNot Nothing  Or drf("生产流程单_料废")IsNot Nothing Then
            If e.DataCol.Name = "生产流程单_判定" AndAlso e.DataRow("生产流程单_判定") = True Then
                Dim nma() As String = {"生产流程单_成品入库","生产流程单_半成品入库","生产通知单_订单编号","生产流程单_工序","生产流程单_作业者","生产流程单_供应商","生产流程单_料废","生产流程单_工废","生产流程单_检验签名"  } 
                Dim nmb() As String = {"废品申报单_成品","废品申报单_半成品" ,"废品申报单_订单编号","废品申报单_工序号","废品申报单_作业者","废品申报单_供应商","废品申报单_料废","废品申报单_工废","废品申报单_品管部"} 
                Dim drh As DataRow = DataTables("不合格品管控系统").AddNew
                For i As Integer = 0 To nma.Length - 1
                    drh(nmb(i)) = e.DataRow(nma(i))
                Next
            End If
        End If
End Select

 


图片点击可在新窗口打开查看此主题相关图片如下:147.png
图片点击可在新窗口打开查看
我想先判断工废和料废有内容之后 在判断判定是否确认  确认后将相关信息传导下一个表   这样写问题在哪呢  怎么不运行

 回到顶部