RE: Copying EBCDIC file from IFS to AS400 File

I did the WRKLNK and got the 437 as the CCSID, but it still did a
conversion.  I did some more digging and final came up with the following
command that did work:

CPY OBJ('\gecc\ntpd3rcv.004')
    TOOBJ('/qsys.lib/jgiusto.lib/tppgeccru.file/tppgeccru.mbr')
    FROMCCSID(*PCASCII)
    TOCCSID(*CALC)
    DTAFMT(*BINARY)
    REPLACE(*YES)

Thanks to all who offered suggestions.  The List rules!

 -----Original Message-----
From:   midrange-l-admin@midrange.com [mailto:midrange-l-admin@midrange.com]
On Behalf Of Vernon Hamberg
Sent:   Wednesday, October 16, 2002 12:15 PM
To:     midrange-l@midrange.com
Subject:        RE: Copying EBCDIC file from IFS to AS400 File

Joe

It's probably 37 or 437. But you can find out by going to its location
WRKLNK, then take opt 8 to look at attributes. The CCSID is on the first
screen.

HTH

Vern