|
If(text([%pc%]) = Empty(),MsgBox("批次不能为空!",2),RecalcCol(GridName,"计划批次",1) And CopyFor("采购目录","序号,编码,通用名,简码,包装规格,产地,价格,药品类别,采购数量,计划批次","序号,编码,通用名,简码,包装规格,产地,价格,药品类别,采购数量,计划批次","采购药品", "=" ,- 1,"采购数量", ">" ,0) And SortCol(GridName,"序号",1) And OpenGrid("采购目录",1,1) And EvalFor("采购目录","金额","[价格] * [采购数量]") And EvalFor("采购目录","采购时间","FindText(""验收单据列表"",""计划时间"",""计划批次"", ""="" ,[计划批次])") And DelFor("采购目录","编码", "=" ,""))这个公式为什么不起作用，[%pc%〕是空的
-=-=-=- 以下内容由 金银花 在 2011年08月29日 05:02pm 时添加 -=-=-=-
还有为什么MsgBox("请填写批次!",2) And SetFocus("%pc%")点击确定后光标不能回到变量录入框
|
加好友 
发短信
Post By：2011/8/29 16:42:00 [显示全部帖子]
Post By：2011/8/29 21:35:00 [显示全部帖子]
Post By：2011/8/30 11:03:00 [显示全部帖子]
Post By：2011/8/30 15:52:00 [显示全部帖子]
