请教一个指令OVRDBF的用途

newbiezhang

想请教OVRDBF的用途？
看了一个CLP程序感觉有点不清楚：            

PGM
OVRDBF     FILE(TXLOG) TOFILE(&LIB/TXLOG)
。。。。。。
CALL       PGM(&LIB/UPDLOG) PARM(&THID &KGID &MSG &LEN +
                          &RMSG)
ENDPGM

在UPDLOG中用到了TXLOG,其他整个程序中没有出现TXLOG。这个时候需要用OVRDBF指令吗？有什么作用。

newbiezhang

还有
PGM
OVRDBF     FILE(INPUT) TOFILE(*LIBL/FTPSH)      
OVRDBF     FILE(OUTPUT) TOFILE(*LIBL/FTPLOG)   
FTP        RMTSYS(&HOST)  
DLTOVR     FILE(INPUT)  
DLTOVR     FILE(OUTPUT)
ENDPGM
这段程序是说用FTPSH文件的内容做为FTP的输入指令，FTPLOG做为FTP的输出信息吗？INPUT和OUTPUT原来是代表了哪个系统文件（设备）？

myyzq

重新指定数据库而已 很简单

hanyu

q1
一般 rpg中打开指定的成员须通过cl命令OVRDBF指定成员.
q2
类似unix中的输入输出重定向

vampirec

原帖由 "newbiezhang" 发表：
想请教OVRDBF的用途？
看了一个CLP程序感觉有点不清楚：            

PGM
OVRDBF     FILE(TXLOG) TOFILE(&LIB/TXLOG)
。。。。。。
CALL       PGM(&LIB/UPDLOG) PARM(&THID &KGID &MSG &LEN +
         ..........

   

OVRDBF的作用就是重载（OVERRIDE）数据库，即将程序中用到的数据库文件重定向到自己所指定的文件。
你的CLP中程序UPDLOG用到了TXLOG文件，但此文件在&LIB中还有一个（即TXLOG有两个以上），而此CLP不要用缺省的TXLOG（即不用*LIBL中的TXLOG）而想用&LIB中的TXLOG，故用OVRDBF加以重载