RE: 11 code error CPYTOIMPF

I've always used a CHGJOB CCSID(37) in my CL programs when I've run into
this in the past.

Paul Nelson
Cell 708-670-6978
Office 512-392-2577
nelsonp@xxxxxxxxxxxxx


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Pete Hall
Sent: Monday, September 03, 2007 6:37 PM
To: Midrange Systems Technical Discussion
Subject: Re: 11 code error CPYTOIMPF

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

The source file has CCSID 65535 for all fields. It's a DDS file. I don't
know yet if he has the source. CPYTOIMPF needs the CCSID to be something
other than 65535 in order to transform to ASCII.

Pete Hall
pbhall@xxxxxxxxxxxxx
http://pbhall.us


CRPence wrote:

OK. Now that the share issue is resolved, such that a file is
created and the data is getting copied, more analysis of what values to
specify on the CPYTOIMPF is required.

I suspect that STMFCODPAG(*STMF) [the default] was probably used.
That is, the request probably only included the following parameter
specifications:
CPYTOIMPF FROMFILE(EIQRY01/ITEMMASTER) RCDDLM(*CRLF)
TOSTMF('/QNTC/10.12.12.2/SHARED/seam/ITEMMASTER.TXT')

The special value *PCASCII is probably desirable, to specify what
data translation occurs; that is, what character representation does the
target file [system] expect to be written into the target stream file.
Try instead:
CPYTOIMPF FROMFILE(EIQRY01/ITEMMASTER) RCDDLM(*CRLF)
TOSTMF('/QNTC/10.12.12.2/SHARED/seam/ITEMMASTER.TXT')
STMFCODPAG(*PCASCII)

Although doing nothing more than adding the STMFCODPAG(*PCASCII)
might resolve the concern, the earlier response by Scott K gave very
good details about using the CPYTOIMPF. It might be worthwhile to
revisit that message:
http://archive.midrange.com/midrange-l/200708/msg01750.html

Regards, Chuck

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.7 (GNU/Linux)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

iD8DBQFG3JqVpcZsDl8OX6kRAqOGAJ0YibJ0H5dUYYF1qSSYqmnnbgoeKACgtHWV
alpvH4AyFrVym7yKyEP/erw=
=nt5I
-----END PGP SIGNATURE-----