Cobole edtcde help -- COBOL400-L

Subject: Cobole edtcde help
From: Mike Apice <mapice3284@xxxxxxxxx>
Date: Sat, 15 Nov 2008 08:36:37 -0800 (PST)
List-archive: <http://archive.midrange.com/cobol400-l>
List-help: <mailto:cobol400-l-request@midrange.com?subject=help>
List-id: COBOL Programming on the iSeries/AS400 <cobol400-l.midrange.com>
List-post: <mailto:cobol400-l@midrange.com>
List-subscribe: <http://lists.midrange.com/mailman/listinfo/cobol400-l>, <mailto:cobol400-l-request@midrange.com?subject=subscribe>
List-unsubscribe: <http://lists.midrange.com/mailman/listinfo/cobol400-l>, <mailto:cobol400-l-request@midrange.com?subject=unsubscribe>

Hi all!

I have what should be a simple issue to resolve.I am moving a the following fields.

WS-DEPOSITAMT-E PIC 9(12). to
AMTCHKESTU 12 2 40EDTCDE(3)

My results are wrong as shown in the following displays. Ignore the first 15 char.

WS-DEPOSITAMT-E DETAIL = 000000060000
DETA01-O A = 000010000200001000006000000

The ws field has 7 zeroes and then 60000, the output has 5 zeroes and then 6000000
The Ws field is correct, The amount is 600.00

Any help would be appreciated.

Mike

Follow-Ups:

Re: Cobole edtcde help , Jon Paris

This mailing list archive is Copyright 1997-2026 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.