标题:科目查询代码转换
取消只看楼主
kesc
Rank: 2
等 级:论坛游民
威 望:1
帖 子:84
专家分:10
注 册:2006-10-11
结帖率:60%
已结贴  问题点数:19 回复次数:3 
科目查询代码转换
查询的科目的格式为:科目编码.部门编码.个人编码.客户编码.供应商编码.项目编码
km="22310108.0101.0068.0088.hcjs.hchy"
如何转换成dm="22310108" and bmbm=="0101" and grbm=="0068" and khbm=="0088" and gybm=="hcjs" and xmbm=="hchy"
再比如km="286801.0108..yxgs"   
转换成  dm="286801" and bmbm=="0108" and khbm=="yxgs"
再比如km="286801"   则只转换成  dm="286801"

搜索更多相关主题的帖子: 项目 如何 供应商 
2015-05-14 11:41
kesc
Rank: 2
等 级:论坛游民
威 望:1
帖 子:84
专家分:10
注 册:2006-10-11
得分:0 
回复 3楼 吹水佬
完善一下
km="2231058508.gcb1...hcjs.hchy"
cExp=""
ALINES(aExp,[dm="," and bmbm=="," and grbm=="," and khbm=="," and gybm=="," and xmbm=="], ",")
FOR i=1 TO ALINES(aKM,km,".")
IF LEN(ALLTRIM(aKM[i]))>0
  cExp=cExp+aExp[i]+aKM[i]
ENDIF
ENDFOR
cExp=cExp+["]
?cExp
2015-05-14 14:54
kesc
Rank: 2
等 级:论坛游民
威 望:1
帖 子:84
专家分:10
注 册:2006-10-11
得分:0 
谢谢各位版主,你们的答案都很精彩!
2015-05-14 14:57
kesc
Rank: 2
等 级:论坛游民
威 望:1
帖 子:84
专家分:10
注 册:2006-10-11
得分:0 
回复 10楼 hu9jj
这是一个财务函数中的一个部分
2015-05-14 15:07



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-445275-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015612 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved