免费注册 查看新帖 |

Chinaunix

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

cobol/400 逻辑文件和物理文件的用法 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2006-04-03 10:03 |只看该作者 |倒序浏览
我把物理文件和逻辑文件建立联系后,在程序中使用逻辑文件可是程序报错说找不到文件,但是我只用物理文件的时候程序OK(只用物理文件的意思就是只建立物理文件不创建逻辑文件)
物理文件:
*************** Beginning of data ***********************************
     A          R FAIREAW                   TEXT('FAIREAW')
     A            AIALCD         1          TEXT('AIALCD')
     A                                      COLHDG('AIALCD' )
     A            AIAMCD        12O         TEXT('AIAMCD')
     A                                      COLHDG('AIAMCD' )
     A            AIBFIG        12O         TEXT('AIBFIG')
     A                                      COLHDG('AIBFIG' )
     A            AIAICD        10          TEXT('AIAICD')
     A                                      COLHDG('AIAICD' )
     A            AIAFDT         8  0       TEXT('AIAFDT')
     A                                      COLHDG('AIAFDT' )
     A            AIAATM         6  0       TEXT('AIAATM')
     A                                      COLHDG('AIAATM' )
     A          K AIALCD
逻辑文件
*************** Beginning of data *************************************
      A          R FAIREAW                   TEXT('FAIREAY')
      A                                      PFILE(PFILEID)
      A            AIALCD                    TEXT('AIALCD')
      A            AIAMCD                    TEXT('AIAMCD')
      A            AIBFIG                    TEXT('AIBFIG')
      A            AIAICD                    TEXT('AIAICD')
      A            AIAFDT                    TEXT('AIAFDT')
      A            AIAATM                    TEXT('AIAATM')
      A* KEY FIELDS
      A          K AIALCD
****************** End of data ****************************************

论坛徽章:
0
2 [报告]
发表于 2006-04-03 10:33 |只看该作者
逻辑文件编译了么?路径对吗?一本程序里同时用物理文件和逻辑文件需要重命名record名称

论坛徽章:
0
3 [报告]
发表于 2006-04-03 10:53 |只看该作者
逻辑文件和物理文件都编译OK。
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP