Re: CPYTOSTMF and Codepage problem

I think the help text does state that if you do not specify the to file
ccsid the resultant file will inherit the ccsid of the from file. I do
know this is true at 5.4

Looking at your command string I do see that you have not specified a to
file ccsid.

What os version are you on?

Bentley Pearson
Vice President - Information Services
Southland National Insurance Corporation
1812 University Blvd
Tuscaloosa, Al
35403
205 345 7410
bpearson@xxxxxxxxxxxxxxxxxxxxx

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On
Behalf Of Steve Moland
Sent: Wednesday, December 12, 2007 3:31 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Re: CPYTOSTMF and Codepage problem

Well Aaron, that works as claimed. That gives me a short clean way to
have
it all controlled from within a CL program.
Thanks

Can assume that I just package the QSH inside a Qcmdexe or does that run
as
is inside CL.

This is a neat way to do it but it's odd that one should have to resort
to
have to do it that way. I would think that having CPYTOSTMF create a
file if
needed would one of the first features designed into it. I wonder why
the
help text says it will do it.

Steve

"Aaron Bartell" <albartell@xxxxxxxxx> wrote
in
message 001c01c83d00$8dffe030$a9ffa090$@com">news:001c01c83d00$8dffe030$a9ffa090$@com...

I always create the file and explicitly specify the code page. Run this

from
the command line:

QSH CMD('touch -C 819 /CDPREPDVD/tcodepage.dat')

HTH,
Aaron Bartell
http://mowyourlawn.com


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On
Behalf Of Steve Moland
Sent: Wednesday, December 12, 2007 2:14 PM
To: midrange-l@xxxxxxxxxxxx
Subject: CPYTOSTMF and Codepage problem

I have an almost canned process for copy an ISeries file to a PC share
folder using CPYTOSTMF so that once the file is sent on DVD to another

site
that it can be added to an existing ISeries file using CPYFRMSTMF. The

file
contains mostly binary data so no conversion is desired.

To get the file to the PC I use the following: (This CL is a test

process

I'm using today to try to solve the problem)

CPYTOSTMF FROMMBR('qsys.lib/JUNK.lib/tcodepage.file/CATDAT2.mbr')
TOSTMF('/CDPREPDVD/tcodepage.dat')
STMFOPT(*REPLACE) CVTDTA(*NONE) ENDLINFMT(*FIXED)

The PROBLEM is, if there is no existing PC file named "tcodepage.dat"

the

copy fails with this message.
CCSID conversion could not be performed.
Object not copied.

So I just create an empty file using any PC file editor and the

process

works fine.

In production the copy just uses the previous runs existing file and

all

the

records are replaced.

Everything works fine until a human gets involved and sometimes clears

the

PC folder after burning a DVD.

I'd like to have CPYTOSTMF create a proper file which it says it will

do.

the HELP information on STMFOPT fields says it will create a file if

the

file is not there. I can not get it to do that and I think I've tried

all

the pertinent combination of parameters.

Using DSPFD on the ISeries file yields this CCSID 65535
--

Steve Moland
Access Paths Inc
12 Parmenter Rd Unit C4
Londonderry NH 03053
steve@xxxxxxxxxxx





--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list
To post a message email:
MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list
To post a message email:
MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email:
MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.


CONFIDENTIALITY NOTICE: This electronic mail transmission is intended only
for use by the addressee(s) named herein and may contain information that
is confidential, privileged, or proprietary. Distribution to anyone other
than the addressee is prohibited. If you are not the intended recipient,
you are not authorized to read, print, retain, copy or disseminate this
message, any part of it, or any attachments. If you have received this
message in error, please permanently delete this message and any
attachments without reading the content and notify the sender immediately
of the inadvertent transmission.


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email:
MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.