免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
12下一页
最近访问板块 发新帖
查看: 5191 | 回复: 15
打印 上一主题 下一主题

请问WRKQRY中LIKE %"中山路 "%的功能如何在RPG中应用? [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2007-02-04 13:38 |只看该作者 |倒序浏览
请问WRKQRY中LIKE  %" 中山路"%的功能如何在RPG中应用?


例如有100条人事资料的PF---LNF11

其中LN1105(2 s 0 )-----------------这个栏位是工作年限

其中LN1120(100J )-----------------这个栏位是居住地址!

如果要给用户增加根据不同条件搜索这个PF的操作!

1,搜索工作年限LK1105 >5的记录,如下:

*LOVAL  SETLLLNF11R
*IN90     DOUEQ'1'
              READELNF11R
*IN90     IFEQ '0'
LN1105   ANDGT5

2,搜索居住地址长度LK1120(100J)只要有"中山路"这三个字的所有记录.

这部分一直以来我是用SQLRPG写程序实现,或创建一个写好的Query,直接让用户调用!

但是如果直接用RPG3或RPGLE写的话,这个可是实现么?

大家有写过么?


*LOVAL  SETLLLNF11R
*IN90     DOUEQ'1'
              READELNF11R
*IN90     IFEQ '0'
  (LN1120 LIKE %" 中山路"%)  -------难道是这样?这个是个人狂想ING.........呵呵!!!开个玩笑

[ 本帖最后由 leason 于 2007-2-4 14:10 编辑 ]

论坛徽章:
0
2 [报告]
发表于 2007-02-04 13:59 |只看该作者
做个SQLRPG就可以用SQL了,你想要的实现就很容易了

论坛徽章:
0
3 [报告]
发表于 2007-02-04 14:09 |只看该作者
楼上的兄弟,你没看内容吧!! 寒一个!


,我不是说过了,一直以来我是用SQLRPG和创建一个固定的Query实现的么!

我现在咨询的是有没有人直接用RPG写过的!

论坛徽章:
0
4 [报告]
发表于 2007-02-04 20:56 |只看该作者
个人觉得还是离不开SQL,,,
在RPGLE用动态SQL实现模糊查询有没有好点。

论坛徽章:
0
5 [报告]
发表于 2007-02-04 23:28 |只看该作者
轻舟兄你的都开口了,看来RPG直接写是不行了,我也试了一天,的确不行,还是要利用SQL语句来做!

还是要SQLRPG啊!要是这个PF容量达到4G以上,这个SQLRPG有得跑了....

论坛徽章:
0
6 [报告]
发表于 2007-02-05 09:00 |只看该作者
你有汉字的截取程序吗!!如果有应该可以实现.
把地址顺序截取,每次截取三个汉字即八个字符,截取的汉字和中山路比较

论坛徽章:
0
7 [报告]
发表于 2007-02-05 09:31 |只看该作者
要没有汉字,SCAN语句应该可以实现。加上汉字就麻烦了,想不到办法

论坛徽章:
0
8 [报告]
发表于 2007-02-05 09:48 |只看该作者
5楼的兄弟,汉字截取程序,当然有,不过你说的方法我也知道,不过不行的,地址长度100J啊,因为用户可以任意输入一个字,或两个字,或3个字,最多7个字进行查询,所以这样比较不行的。

直接用RPG写还是不行的,只能用SQLRPG了

论坛徽章:
0
9 [报告]
发表于 2007-02-05 12:30 |只看该作者
你用用scan可能行,你把“0E中山路)F”中的0E 0F都截掉,放到一个变量里面,不用管它是否可以显示,然后用“中山路”scan。如果是中英文混合,需要把0E 0F挤掉。

论坛徽章:
0
10 [报告]
发表于 2007-02-05 15:49 |只看该作者
提供两个思路:
1。先用rpg用空格去check字段,把中文字前的空白去掉,然后再结合clp的opnqryf去做。
2。只用clp。用%SST做循环截取中文字,再用opnqryf去做。

[ 本帖最后由 尘 于 2007-2-5 16:31 编辑 ]
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP