editing numeric fields in a physical file

I am copying records from an input file to an output file.

Can I use edit codes in the DDS field definition of the output file such that a CPYF *MAP will change a packed numeric field to an alpha or at lease a zoned numeric field with zero suppression?

Is there a method to force the edit code to apply when writing to a PF?



Example:

Input physical file:


A..........T.Name++++++RLen++TDpB......Functions++++++++++
OrderAmt 7 2P



Output physical file:

A..........T.Name++++++RLen++TDpB......Functions++++++++++
OrderAmt 9 EDTCDE(N)




Data example:

input
x "0012345C"

output:

123.45



Thanks!




______________________________________________________________________
This outbound email has been scanned for all viruses by the MessageLabs Skyscan service.
For more information please visit http://www.symanteccloud.com
______________________________________________________________________