微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

VB函数给出错误-查询表达式'[!D]'= 123 AND [POID] =&MfrOrderID&3075中的语法错误缺少运算符–

如何解决VB函数给出错误-查询表达式'[!D]'= 123 AND [POID] =&MfrOrderID&3075中的语法错误缺少运算符–

我试图获取履行生产订单所需的原材料的值,使用此简单函数查询获取值,产品配方以所需的数量im存储在另一个表中

Function GetRMWt(ProductID) As Long
    GetRMWt = DLookupNumberWrapper("[RM Req]","RMCalc","[ID]=" & ProductID & " AND [POID] = & MfrOrderID &")
End Function   

调用函数获取

Private Sub Product_ID_AfterUpdate()
    If Not IsNull(Me![Product ID]) Then
        Me![Quantity] = GetRMWt(Me![Product ID])
        Me.Quantity.Locked = False
        Me![Unit Price] = GetListPrice(Me![Product ID])
        Me![discount] = 0
        Me![Status ID] = None_OrderItemStatus
    Else
        eh.TryToruncommand acCmdDeleteRecord
    End If
End Sub

这是获取所需数据的查询

SELECT Products.ID,ProductReceipe.PID,ProductReceipe.[Product ID],[Mfr Order Details].Quantity AS [Item Qty],ProductReceipe.Quantity AS [RM Qty],([Item Qty] * [RM Qty] / 1000) AS [RM Req],[Mfr Order Details].[Mfr Order ID] AS POID,IGROrders.[IGR Order ID]
FROM ProductReceipe,[Mfr Order Details],[Mfr Orders],IGROrders,Products
WHERE ProductReceipe.PID ) = [Mfr Order Details].[Product ID]
    AND [Mfr Orders].[Mfr Order ID] = [Mfr Order Details].[Mfr Order ID]
    AND [Mfr Orders].[Mfr Order ID] = [IGROrders].[Mfr Order ID]
    AND Products.ID = ProductReceipe.[Product ID]

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。