wrkobj疑问

lvxinzhi

wrkobj里有copy功能只能复制表结构，而不能将表中的数据复制过去，如果我想将数据也复制过去，请问怎么办？
谢谢

fxf_china

Copy File (CPYF)                              
                                                                             
Type choices, press Enter.                                                   
                                                                             
From file  . . . . . . . . . . .                 Name                        
  Library  . . . . . . . . . . .     *LIBL       Name, *LIBL, *CURLIB        
To file  . . . . . . . . . . . .                 Name, *PRINT               
  Library  . . . . . . . . . . .     *LIBL       Name, *LIBL, *CURLIB        
From member  . . . . . . . . . .   *FIRST        Name, generic*, *FIRST, *ALL
To member or label . . . . . . .   *FIRST        Name, *FIRST, *FROMMBR, *ALL
Replace or add records . . . . .   *NONE         *NONE, *ADD, *REPLACE...   
Create file  . . . . . . . . . .   *NO           *NO, *YES                  
Print format . . . . . . . . . .   *CHAR         *CHAR, *HEX

lvxinzhi

Copy Object (COPY)                              
                                                                              
Type choices, press Enter.                                                     
                                                                              
Object . . . . . . . . . . . . . > 'vslland/vsagentli2'                        
                                                                              
To directory . . . . . . . . . . > 'vsagentli2'                                
                                                                              
To object  . . . . . . . . . . . > vslld                                       
                                                                              
Symbolic link  . . . . . . . . .   *NO           *NO, *YES                     
From CCSID . . . . . . . . . . .   *OBJ          1-65533, *OBJ, *PCASCII...   
To CCSID . . . . . . . . . . . .   *OBJ          1-65533, *OBJ, *CALC...      
Data Format  . . . . . . . . . .   *BINARY       *BINARY, *TEXT               
Directory subtree  . . . . . . .   *NODIR        *NODIR, *NONE, *ALL           
Replace object . . . . . . . . .   *NO           *NO, *YES                     
Owner  . . . . . . . . . . . . .   *NEW          *NEW, *KEEP                  
                                                                              
                                                                              
                                                                              
                                                                        Bottom
F3=Exit   F4=Prompt   F5=Refresh   F12=Cancel   F13=How to use this display   
F24=More keys                                                                  
TODIR not allowed with TOOBJ.                                                  

我想将vsagentli2库中的vslland 表复制到当前库中并重新命名，我这里的To object vslld还不存在，请问，我上面的不能执行，问题出在哪里？谢谢

lordlost

COPY 跟 CPYF不一樣。

fairyboy

用WRKOBJ找到OBJ时,用3=COPY的时候,实际上是用TDUPOBJ命令,
From object  . . . . . . . . . . > CHRHDR     
From library . . . . . . . . . . > MM510LIB   
Object type  . . . . . . . . . . > *FILE      
To library . . . . . . . . . . .   *FROMLIB   
New object . . . . . . . . . . .   *OBJ      
From ASP device  . . . . . . . .   *         
To ASP device  . . . . . . . . .   *ASPDEV   
Duplicate data . . . . . . . . .   *NO        ==>YES(就是连数据记录一直复制)

adversa

CRTDUPOBJ


From object  . . . . . . . . . .                 Name, generic*, *ALL         
From library . . . . . . . . . .                 Name, *LIBL, *CURLIB         
Object type  . . . . . . . . . .                 *ALL, *ALRTBL, *AUTL...      
               + for more values                                             
To library . . . . . . . . . . .   *FROMLIB      Name, *FROMLIB, *SAME...     
New object . . . . . . . . . . .   *OBJ          Name, *OBJ, *SAME            
From ASP device  . . . . . . . .   *             Name, *, *CURASPGRP, *SYSBAS
To ASP device  . . . . . . . . .   *ASPDEV       Name, *ASPDEV, *...

roden

DATA(*YES)