免费注册 查看新帖 |

Chinaunix

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

关于EXTERNALLY-DESCRIBED-KEY理解 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2006-11-07 08:26 |只看该作者 |倒序浏览
请教大家:
如何理解以下语句,本人考虑很久,看了好多资料都理解不透,请各位帮忙了!
START   table-rec                     
             KEY >= EXTERNALLY-DESCRIBED-KEY

论坛徽章:
0
2 [报告]
发表于 2006-11-08 15:58 |只看该作者
EG:
if table ZHCD have these record :
COPANY (order by AESC)  MEMPLOY( order by DESC)
1                                          6
2                                          8
2                                          4


INITIALIZE                       ZHCD-DTA           
MOVE '2'             TO COMPANY OF ZHCD
MOVE '4'             TO MEMPLOY OF ZHCD

                                                   
START ZHCD KEY >= EXTERNALLY-DESCRIBED-KEY         
      INVALID KEY CONTINUE                          
END-START     


The pointer will point to record color=Red]2                                          4

论坛徽章:
0
3 [报告]
发表于 2006-11-08 16:04 |只看该作者
EG:
if table ZHCD have these record :
COPANY (order by AESC)  MEMPLOY( order by DESC)
1                                          4
2                                          8
2                                          3


INITIALIZE                       ZHCD-DTA           
MOVE '2'             TO COMPANY OF ZHCD
MOVE '4'             TO MEMPLOY OF ZHCD

                                                   
START ZHCD KEY >= EXTERNALLY-DESCRIBED-KEY         
      INVALID KEY CONTINUE                          
END-START     


The pointer will point to record color=Red]2                                          3

论坛徽章:
0
4 [报告]
发表于 2006-11-08 16:44 |只看该作者
START ZHCD KEY >= EXTERNALLY-DESCRIBED-KEY         
      INVALID KEY CONTINUE                          
END-START     相当于rpg中的setll可以用read reade读(read next)

START ZHCD KEY >EXTERNALLY-DESCRIBED-KEY         
      INVALID KEY CONTINUE                          
END-START     相当于rpg中的setgt可以用reap redpe读(read prior)
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP