CPYTOIMPF的问题！！！！！！！！！！！！！！！

weeking

请问一下我想把一个obj的数据全都转换成字符型应该怎么写啊（主要是为了转化原来数据里的数字型，不存在双字节）是不是用CPYTOIMPF可以做到?
CPYTOIMPF  FROMFILE(PSMPGM0809/UF001 *FIRST) +               
             TOSTMF('/TEST/UF001.CSV') +                     
             MBROPT(*REPLACE) STMFCODPAG(*STDASCII) +         
             RCDDLM(*LF) DTAFMT(*DLM) STRDLM(*NONE) +         
             FLDDLM(',')            

下面是错误MSG                 
Message ID . . . . . . :   CPA0701                                             
Date sent  . . . . . . :   08/10/16      Time sent  . . . . . . :   13:19:09   
                                                                              
Message . . . . :   CPF2817 received by #CALL at 2000. (C D I R)               
                                                                              
Cause . . . . . :   Control language (CL) program #CALL in library PSMPGM0809  
  detected an error at statement number 2000. Message text for CPF2817 is:     
  Copy command ended because of error.                                         
Recovery  . . . :   This inquiry message can be avoided by changing the        
  program. Monitor for the error (MONMSG command) and perform error recovery   
  within the program. To continue, choose a reply value.                       
Possible choices for replying to message . . . . . . . . . . . . . . . :      
  C -- Cancel the CL program.                                                  
  D -- Dump the CL program variables and cancel the CL program.               
  I -- Ignore the failing command.                                             
  R -- Try the failing command again.                                          
                                                                        Bottom
非程序执行下的错误
Message ID . . . . . . :   CPFA0D4                                             
Date sent  . . . . . . :   08/10/16      Time sent  . . . . . . :   13:29:12   
                                                                              
Message . . . . :   File system error occurred.  Error number 3025.            
                                                                              
Cause . . . . . :   File system experienced an unexpected error. Error number  
  3025 was received.

[ 本帖最后由 weeking 于 2008-10-16 13:31 编辑 ]

ericliu83

CPYF FROMFILE(源LIB/源FILE) TOFILE(目标LIB/目标FILE) MBROPT(*REPLACE) FMTOPT(*CVTFLOAT *MAP)

weeking

根据以前的帖子试了下不好用！！

weeking

weeking

给点提示也行！

huangxkst

命令CPYTOIMPF的严谨性比较高,转换文件中要是某个字段出现了一个和FLDDLM(',')的字符相等时就会报错,所以使用它转换之前要先将字段中可能出现和FLDDLM(',')中的字符相等的去掉,同时每个文件中每个字符字段不能出现x'0e'和x'0f'.要是有也的去掉.

weeking

我们是根据真实数据生成的合理数据大多都在几万条以上！如果是数据的问题那么就一点意义都没有了,另外现在库里的数据不存在双字节。实在是令人头疼弄了半天了。。。。。。不过还是谢谢！！

yzclxw

高手们进来指点一下，以前的帖子好像不好用呀

ux400

不会想点别的办法吗？
编个程序？C、RPG、SQL、......

weeking

没办法客户要求！要求在CL里最后执行！