×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
CRTPF then CPY gives me:
CPFA098 The CCSID of the target file could not be set to match the CCSID of the source file.
-----Original Message-----
From: Rob Berendt [mailto:rob@xxxxxxxxx]
Sent: Tuesday, February 13, 2018 1:14 PM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Subject: RE: CPYFRMSTMF & character conversion
While I think processing the IFS file directly is the way to go I respect your least disruption concern.
How does this work?
CPY OBJ('/home/ROB/jt.txt') TOOBJ('/qsys.lib/rob.lib/jt.file/jt.mbr')
REPLACE(*YES)
crtpf rob/jt rcdlen(80)
Ownership of object JT in ROB type *FILE changed.
File JT created in library ROB.
Member JT added to file JT in ROB.
EDTF STMF('/home/ROB/jt.txt')
CPY OBJ('/home/ROB/jt.txt') TOOBJ('/qsys.lib/rob.lib/jt.file/jt.mbr')
Object already exists. Object is /qsys.lib/rob.lib/jt.file/jt.mbr.
CPY OBJ('/home/ROB/jt.txt') TOOBJ('/qsys.lib/rob.lib/jt.file/jt.mbr')
REPL
ACE(*YES)
Member JT removed from file JT in ROB.
Member JT added to file JT in ROB.
Object copied.
dsppfm rob/jt
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
12345678911234567892123456789312345678941234567895123456789612345678971234567898
■■123456789112345678921234567893123456789412345678951234567896123456789712345678
98■■
****** END OF DATA ****** F10=Display hexadecimal Ok, there is a CRLF concern...
0D25
Rob Berendt
--
IBM Certified System Administrator - IBM i 6.1 Group Dekko Dept 1600 Mail to: 2505 Dekko Drive
Garrett, IN 46738
Ship to: Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com
midrange.com
