400/COBOL中,无键字文件如何声明,请高手指教
如题,
环境部定义如下:
SELECT XXXXX ASSIGN TO DATABASE-XXXXX
ORGANIZATION IS INDEXED
ACCESS MODE IS DYNAMIC
RECORD KEY IS EXTERNALLY-DESCRIBED-KEY
WITH DUPLICATES.
数据部描述:
FD xxxxx.
01 xxxxx-REC.
COPY DDS-ALL-FORMATS OF xxxxx.
对此文件有个写操作,编译提示:文件类型定义不正确,请高手指点,此文件无键字
如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱,如果其他用户或者作者回复了您的评论,将不能在第一时间通知您!
发布评论
评论(3)
谢谢,问题已经解决了
文件没有键字,为什么要定义成 RECORD KEY IS EXTERNALLY-DESCRIBED-KEY ?
无键字文件可以直接写成
SELECT xx ASSIGN TO DATABASE-xx
ORGANIZATION IS SEQUENTIAL
ACCESS IS SEQUENTIAL
FILE STATUS FILE-STATUS-xx.
SELECT XXXXX ASSIGN TO DATABASE-XXXXX
ORGANIZATION IS SEQUENTIAL
ACCESS MODE IS SEQUENTIAL
你试试