1- 
jhtz =  Functions.Execute("exec_sql2","FHSJ","select top 1 货品数量 from 货品计划调整明细报表 where  单据类型 = '计划调整' and 货品编号 = '" & r3("货品编号") & "'  order by 货品计划子表ID DESC ",2)

---------------------------
2- 
update 计划需求运算 set 计划调整 = 50  where 货品编号 = '五金件00006'
update a set a.安全数量 = b.安全数量,a.计划调整数 = b.计划调整数 from 计划需求运算 a,货品管理 b where a.货品编号 = b.货品编号 and a.货品编号 In ('五金件00006') 

---------------------------


3- 
update 计划需求运算 set 计划调整 = 50  where 货品编号 = '五金件00006' 
update a set a.安全数量 = b.安全数量,a.计划调整数 = b.计划调整数 from 计划需求运算 a,货品管理 b where a.货品编号 = b.货品编号 and a.货品编号 In ('五金件00006')  
update 计划需求运算 set 可用库存 = (isnull(库存数量,0) + isnull(计划在途,0) + isnull(采购在途,0)+ isnull([加工/排产在途],0)  - isnull(订单占用,0) - isnull(计划占用,0) - isnull([加工/排产占用],0)  - isnull(安全数量,0) + isnull(计划调整数,0))  


---------------------------

4- 
update 计划需求运算 set 计划调整 = 50  where 货品编号 = '五金件00006' 
update a set a.安全数量 = b.安全数量,a.计划调整数 = b.计划调整数 from 计划需求运算 a,货品管理 b where a.货品编号 = b.货品编号 and a.货品编号 In ('五金件00006')  
update 计划需求运算 set 可用库存 = (isnull(库存数量,0) + isnull(计划在途,0) + isnull(采购在途,0)+ isnull([加工/排产在途],0)  - isnull(订单占用,0) - isnull(计划占用,0) - isnull([加工/排产占用],0)  - isnull(安全数量,0) + isnull(计划调整数,0))  
update a set a.可用库存 = b.可用库存 from 货品管理 a , 计划需求运算 b where a.货品编号 = b.货品编号 and a.货品编号 in ('五金件00006')