免费注册 查看新帖 |

Chinaunix

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

关于DLTOVR FILE(XXX),请教高手! [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2012-03-06 21:09 |只看该作者 |倒序浏览
第一问:
在CLP中,是不是一般情况下用了OVRDBF FILE() TOFILE()命令之后,都应该用DLTOVR把重写清除掉

第二问:
如果是用OVRPRTF FILE() TOFILE()呢,DLTOVR是不是必须的,如果不写有什么后果?
如果不加TOFILE,即OVRPRTF FILE()的情况下,DLTOVR是不是必须的,如果不写有什么后果?

谢谢!

论坛徽章:
0
2 [报告]
发表于 2012-03-07 05:36 |只看该作者
把重写及时清除掉是好习惯,至于后果这东西是无法估计的。OVRPRTF没用过...

论坛徽章:
0
3 [报告]
发表于 2012-03-07 08:48 |只看该作者
本帖最后由 熊富貴 于 2012-03-07 10:51 编辑

刪除指向文件的數據是用DLTOVR,但可以根據情況,所以第一問'都'字不是非常適合

隻有OVRPRTF FILE() TOFILE(),不可能有OVRPRTF FILE(),系統默認為*BLANK時指向*FILE, 加DLTOVR(*PRTF)可能會刪除內制文件的屬性設定,在報表的PRTF文件中請樓主慎用

论坛徽章:
0
4 [报告]
发表于 2012-03-07 09:25 |只看该作者
回复 3# 熊富貴


    实际运用过程中,是从cobol里面用qcmdexc执行clp命令。
   03  STR.                                 
    05  FILLER                 PIC X(24)
        VALUE "OVRPRTF FILE(QPQUPRFIL) ".
    05  FILLER                 PIC X(20)
        VALUE "USRDTA('我的报表')".   

    执行时报表正常出在splf里面,并没有报错,加上TOFILE(QPQUPRFIL)结果也是一样。想问下DLTOVR在此时到底有没有用呢

论坛徽章:
0
5 [报告]
发表于 2012-03-07 09:37 |只看该作者
本帖最后由 熊富貴 于 2012-03-07 10:49 编辑

DLTOVR並不是清除定義的數據庫數據,而是刪除當前程序中OVRDBF所執行的指向一個或者多個臨時的數據庫,隻刪除'指向'這個命令而已

论坛徽章:
0
6 [报告]
发表于 2012-03-07 10:34 |只看该作者
谢谢楼上的解答,现在搞清楚了。在CLP中做了这样的测试:
CLP代码
1. OVRPRTF FILE(QPQUPRFIL) USRDTA('我的报表')
2. RUNQRY QRY(TESTQRY) QRYFILE((PF1) (PF2))
3. RUNQRY QRY(TESTQRY) QRYFILE((PF1) (PF2))
4. DLTOVR FILE(QPQUPRFIL)
5. RUNQRY QRY(TESTQRY) QRYFILE((PF1) (PF2))

结果(spool file)
QPQUPRFIL   USER      QPRINT      我的报表  RDY
QPQUPRFIL   USER      QPRINT      我的报表  RDY
QPQUPRFIL   USER      QPRINT                RDY

可以看到,不做DLTOVR的话,OVRPRTF改变的文件属性任然有效, 做了DLTOVR后,USRDAT变成无效了。想让它再显示‘我的报表’,就必须再重新定义。OVRDBF也是类似的吧。

论坛徽章:
0
7 [报告]
发表于 2012-03-07 10:46 |只看该作者
回复 6# zhonglei56


        是的
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP