以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎么判断订单ID  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=118806)

--  作者:swagger
--  发布时间:2018/5/11 12:15:00
--  怎么判断订单ID
怎么判断订单已存在相同订单ID的订单明细,新开一行订单?
[此贴子已经被作者于2018/5/11 12:15:49编辑过]

--  作者:有点甜
--  发布时间:2018/5/11 12:18:00
--  

具体一点你的问题。

 

单表判断重复,参考 http://www.foxtable.com/webhelp/scr/2481.htm

 


--  作者:swagger
--  发布时间:2018/5/11 13:33:00
--  
就是订单表的订单ID和订单明细通过订单ID关联,如果订单表的订单ID和订单明细的订单id是一样:

1.订单表不为空,没有相关的订单明细,则不允许新建一行
2.订单表为空,有订单明细(包括空行),则新建一行

譬如

1. 订单表有一行 订单ID是005,没有关联的订单明细,订单表的客户名称为空,则不允许新建一行,addnew按钮 显示msgbox ("没有客户名称”)

2. 订单表有一行,订单ID是005的空行,并且有005的关联订单明细,那么点击addnew 则新建一行,订单id是006 (自动编号)



[此贴子已经被作者于2018/5/11 13:44:35编辑过]

--  作者:有点甜
--  发布时间:2018/5/11 14:48:00
--  

Dim cr As Row = Tables("订单").Current

If cr.IsNull("客户名称") Then
    msgbox("没有客户名称")   
ElseIf cr.DataRow.GetChildRows("订单明细").count = 0Then
    msgbox("没有明细")
Else
    cr.Table.AddNew
End If