关于一个采购订单表体到货状态码实现的问题.

表:采购订单表头 字段:日期,采购单号,供应商,采购部门,采购人,是否审核

表:采购订单表体 字段:订单号,产品编号,采购数量,采购价格,预交日期,是否结束

表:进货单表头 字段:日期,进货单号,供应商,送货人,是否审核

表:进货单表体 字段:进货单号,采购单号,产品编号,送货数量,验收数量,仓库

提问:

1.

UPDATE 采购订单表体, 进货单表头 INNER JOIN 进货单表体 ON [进货单表头].进货单号 = [进货单表体].进货单号 SET [采购订单表体].是否结束 = "1"
WHERE ((([进货单表头].是否审核)<>0) AND (([采购订单表体].采购订单号)=[进货单表体].[采购单号]) AND (([采购订单表体].产品编号)=[进货单表体].[产品编号]) AND (([数量]-[验收数量])<=0));
这里面的(([数量]-[验收数量])<=0))怎么样才能实现(([数量]-NZ(SUM([验收数量]),0)),<=0))

2.如果不用更新查询改用VBA或宏怎么样做?