易表在线答疑技术与交流用户社区 → 帮忙改一下这个公式。


  共有13801人关注过本帖树形打印复制链接

主题:帮忙改一下这个公式。

帅哥哟,离线,有人找我吗?
流光
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:233 积分:0 威望:0 精华:0 注册:2006/10/30 14:51:00
帮忙改一下这个公式。  发帖心情 Post By:2006/12/3 15:56:00 [只看该作者]

“未缴费记录”和“用户信息”表已“电话号码”相关联。

检查“未缴费记录”中所有记录的“话费合计”值有没有小于等于“用户信息”表中相对应记录的“预缴费余额”的记录,如果没有则提示“没有需要处理的数据!”如果有就执行下面的公式。

AddCol("未缴费记录","X",3,False) And EvalFor("未缴费记录","X","[用户信息!预缴费余额]>[话费合计]") And AppendRows("未缴费记录","X","=",-1) And EvalFor(Grid,"上次余额","if(text([处理日期])="""",FindText(""用户信息"",""预缴费余额"",""电话号码"",""="",[电话号码]),[上次余额])") And EvalFor(Grid,"处理日期","if(text([处理日期])="""",today(),[处理日期])") And EvalFor(Grid,"操作员","if([操作员]="""",username,[操作员])") And DelFor(Grid,"电话号码","=","") And RecalcCol("本次余额") And EvalFor("用户信息","处理日期","if(text([处理日期])="""",[预缴费批处理!处理日期],if(Number([处理日期])<Number(FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1)),FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1),[处理日期]))")And EvalFor("用户信息","预缴费余额","if(text([处理日期])="""",[预缴费余额],if(Number([处理日期])<=Number(FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1)),FindText(""预缴费批处理"",""本次余额"",""电话号码"",""="",[电话号码],-1),[预缴费余额]))") And DelFor("未缴费记录","X","=",-1) And DeleteCol("未缴费记录","X") And CopyRows("预缴费历史数据") And RecalcGrid("预缴费历史数据") and cleargrid("预缴费批处理") And MsgBox("操作完毕!",0)


 回到顶部
帅哥哟,离线,有人找我吗?
czy
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2006/12/3 16:07:00 [只看该作者]

AddCol("未缴费记录","X",3,False) And EvalFor("未缴费记录","X","[用户信息!预缴费余额]<=[话费合计]") And if(FindRow("未缴费记录","X","=",-1)=0,MsgBox(没有需要处理的数据!",0)And DeleteCol("未缴费记录","X"),EvalFor("未缴费记录","X","[用户信息!预缴费余额]>[话费合计]") And AppendRows("未缴费记录","X","=",-1) And EvalFor(Grid,"上次余额","if(text([处理日期])="""",FindText(""用户信息"",""预缴费余额"",""电话号码"",""="",[电话号码]),[上次余额])") And EvalFor(Grid,"处理日期","if(text([处理日期])="""",today(),[处理日期])") And EvalFor(Grid,"操作员","if([操作员]="""",username,[操作员])") And DelFor(Grid,"电话号码","=","") And RecalcCol("本次余额") And EvalFor("用户信息","处理日期","if(text([处理日期])="""",[预缴费批处理!处理日期],if(Number([处理日期])<Number(FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1)),FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1),[处理日期]))")And EvalFor("用户信息","预缴费余额","if(text([处理日期])="""",[预缴费余额],if(Number([处理日期])<=Number(FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1)),FindText(""预缴费批处理"",""本次余额"",""电话号码"",""="",[电话号码],-1),[预缴费余额]))") And DelFor("未缴费记录","X","=",-1) And DeleteCol("未缴费记录","X") And CopyRows("预缴费历史数据") And RecalcGrid("预缴费历史数据") and cleargrid("预缴费批处理") And MsgBox("操作完毕!",0)
)

 回到顶部
帅哥哟,离线,有人找我吗?
流光
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:233 积分:0 威望:0 精华:0 注册:2006/10/30 14:51:00
  发帖心情 Post By:2006/12/3 19:17:00 [只看该作者]

系统提示:“表达式中存在语法错误!”

原来的公式没问题。


 回到顶部
帅哥哟,离线,有人找我吗?
ylm
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2006/12/3 19:23:00 [只看该作者]

试试这个:

AddCol("未缴费记录","X",3,False) And EvalFor("未缴费记录","X","[用户信息!预缴费余额]<=[话费合计]") And if(FindRow("未缴费记录","X","=",-1)=0,MsgBox("没有需要处理的数据!",0)And DeleteCol("未缴费记录","X"),EvalFor("未缴费记录","X","[用户信息!预缴费余额]>[话费合计]") And AppendRows("未缴费记录","X","=",-1) And EvalFor(Grid,"上次余额","if(text([处理日期])="""",FindText(""用户信息"",""预缴费余额"",""电话号码"",""="",[电话号码]),[上次余额])") And EvalFor(Grid,"处理日期","if(text([处理日期])="""",today(),[处理日期])") And EvalFor(Grid,"操作员","if([操作员]="""",username,[操作员])") And DelFor(Grid,"电话号码","=","") And RecalcCol("本次余额") And EvalFor("用户信息","处理日期","if(text([处理日期])="""",[预缴费批处理!处理日期],if(Number([处理日期])<Number(FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1)),FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1),[处理日期]))")And EvalFor("用户信息","预缴费余额","if(text([处理日期])="""",[预缴费余额],if(Number([处理日期])<=Number(FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1)),FindText(""预缴费批处理"",""本次余额"",""电话号码"",""="",[电话号码],-1),[预缴费余额]))") And DelFor("未缴费记录","X","=",-1) And DeleteCol("未缴费记录","X") And CopyRows("预缴费历史数据") And RecalcGrid("预缴费历史数据") and cleargrid("预缴费批处理") And MsgBox("操作完毕!",0)
)


-=-=-=- 以下内容由 ylm2006年12月03日 07:24pm 时添加 -=-=-=-
这种公式,要配合文件一起才好测试的.


 回到顶部
帅哥哟,离线,有人找我吗?
czy
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2006/12/3 19:25:00 [只看该作者]

AddCol("未缴费记录","X",3,False) And EvalFor("未缴费记录","X","[用户信息!预缴费余额]<=[话费合计]") And if(FindRow("未缴费记录","X","=",-1)=0,MsgBox("没有需要处理的数据!",0)And DeleteCol("未缴费记录","X"),EvalFor("未缴费记录","X","[用户信息!预缴费余额]>[话费合计]") And AppendRows("未缴费记录","X","=",-1) And EvalFor(Grid,"上次余额","if(text([处理日期])="""",FindText(""用户信息"",""预缴费余额"",""电话号码"",""="",[电话号码]),[上次余额])") And EvalFor(Grid,"处理日期","if(text([处理日期])="""",today(),[处理日期])") And EvalFor(Grid,"操作员","if([操作员]="""",username,[操作员])") And DelFor(Grid,"电话号码","=","") And RecalcCol("本次余额") And EvalFor("用户信息","处理日期","if(text([处理日期])="""",[预缴费批处理!处理日期],if(Number([处理日期])<Number(FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1)),FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1),[处理日期]))")And EvalFor("用户信息","预缴费余额","if(text([处理日期])="""",[预缴费余额],if(Number([处理日期])<=Number(FindText(""预缴费批处理"",""处理日期"",""电话号码"",""="",[电话号码],-1)),FindText(""预缴费批处理"",""本次余额"",""电话号码"",""="",[电话号码],-1),[预缴费余额]))") And DelFor("未缴费记录","X","=",-1) And DeleteCol("未缴费记录","X") And CopyRows("预缴费历史数据") And RecalcGrid("预缴费历史数据") and cleargrid("预缴费批处理") And MsgBox("操作完毕!",0))

 回到顶部
帅哥哟,离线,有人找我吗?
gdlgh
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:职业侠客 帖子:449 积分:-10 威望:0 精华:0 注册:2006/8/27 12:47:00
  发帖心情 Post By:2006/12/3 19:35:00 [只看该作者]

呵。无一定的想象力都难做呀!佩服两位!!

 回到顶部
帅哥哟,离线,有人找我吗?
smileboy
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:8672 积分:1734 威望:0 精华:0 注册:2006/8/11 10:52:00
  发帖心情 Post By:2006/12/3 19:51:00 [只看该作者]

下面引用由gdlgh2006/12/03 07:35pm 发表的内容:
呵。无一定的想象力都难做呀!佩服两位!!

哈哈,这个程序一直是CZY版主在做。楼主还是抓紧时间仔细看几遍帮助吧,不然你永远也无法独立修改这个程序。


 回到顶部
帅哥哟,离线,有人找我吗?
流光
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:233 积分:0 威望:0 精华:0 注册:2006/10/30 14:51:00
  发帖心情 Post By:2006/12/3 19:53:00 [只看该作者]

要命了,怎么处理完成后“预缴费批处理”表的“本次余额”又不能返回给“用户信息”表中的“预缴费余额”了?

这东西怎么时好时坏?问题出在那里?


 回到顶部
帅哥哟,离线,有人找我吗?
smileboy
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:8672 积分:1734 威望:0 精华:0 注册:2006/8/11 10:52:00
  发帖心情 Post By:2006/12/3 20:14:00 [只看该作者]

CZY版主早就说了,你这个程序处理不好的话会很麻烦的

 回到顶部
帅哥哟,离线,有人找我吗?
gdlgh
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:职业侠客 帖子:449 积分:-10 威望:0 精华:0 注册:2006/8/27 12:47:00
  发帖心情 Post By:2006/12/3 20:21:00 [只看该作者]

下面引用由流光2006/12/03 07:53pm 发表的内容:
要命了,怎么处理完成后“预缴费批处理”表的“本次余额”又不能返回给“用户信息”表中的“预缴费余额”了?
这东西怎么时好时坏?问题出在那里?


呵。。索性叫csy班竹定做算啦,给些饮茶费都不怕呀!


 回到顶部
总数 27 1 2 3 下一页