RE: Problem with CPYFRMIMPF

["Harvell, Joel" <jbharvell@xxxxxxxxxxxx>]

It seems I encountered a PEBKAC error.  

At some time I must have created the STMF File in production using
*PCASCII on the CPYTOIMPF COMMAND, probably during testing, and when the
program ran in production using *STDASCII it failed.  It seems that if
STMF file exists when you do the CPYTOIMPF command the CCSID parm on the
command has to match the STMF file.

I am adding a RMVLNK command to remove the STMF file before I do the
CPYTOIMPF command.  That will fix the problem.

Thanks for the responses.



Be seeing you...B

Joel B. Harvell
Food Lion, LLC
(704) 633-8250 x2709
jbharvell@xxxxxxxxxxxx


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of carl j novit
Sent: Monday, November 10, 2008 1:26 PM
To: Midrange Systems Technical Discussion
Subject: Re: Problem with CPYFRMIMPF

Actually I had a problem this morning with the CPYFRMIMPF command and 
there is not PTF for V5R4.
You need to create a data area with this info, which fixed the problem.

crtdtaara qsys/qcpfrmimpf *char 'CPV5R2'
This was causing zeros to be placed in the file instead of blanks.
Support Line says this was fixed in i6.1

Thanks,

Carl Novit
Vice President
FRS, Inc.
843.720.7436 ext.7708

Carln@xxxxxxxxx



Scott Klement <midrange-l@xxxxxxxxxxxxxxxx> 
Sent by: midrange-l-bounces@xxxxxxxxxxxx
11/10/2008 01:13 PM
Please respond to
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>


To
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
cc

Subject
Re: Problem with CPYFRMIMPF






Externally defined files can have different CCSIDs on each individual 
field.   Have you looked at those?

Also, there were problems with CPYTOIMPF (relating to CCSID) at the time

V5R3 was released.  Are you up-to-date on PTFs?

You may want to verify that your job's CCSID is not 65535 (*HEX).

Harvell, Joel wrote:
> Oops sorry about that, it is the CPYTOIMPF
>
> I get CPF2845 -- The copy did not complete for reason code 1.
>
> The CCSID = 37 on the file, I'm copying on both systems.  The file I'm
> coping from is an Externally Described file.