RE: CPYTOIMPF and numerics > 15 Digits

[Joe Giusto <jgiusto@xxxxxxxxxxxxxx>]

When I double checked my results, I was getting the ", but excel still
treated these as numeric and made the 16th digit a 0.
My excel was set to autosave, so when I reopened it in notepad, excel had
stripped the "s off.


 -----Original Message-----
From:   midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx]  On Behalf Of Charly Jones
Sent:   Wednesday, June 25, 2003 6:01 PM
To:     midrange-l@xxxxxxxxxxxx
Subject:        RE: CPYTOIMPF and numerics > 15 Digits



Here is what I got by copying a 3 record file with three fields:  a one 
digit numeric field followed by a 16 character alpha field followed by 
another one digit numeric field:

1  ,"8888877776654321",2
3  ,"9992509516956789",4
5  ,"9992509516443322",6

The commands I used were:

CPYTOSTMF FROMMBR('/qsys.lib/charly.lib/qddssrc.file/atest.mbr')
     TOSTMF( '/home/charly/querya') STMFCODPAG(*PCASCII)

to create the stream file with a code page of 1252

then:

CPYTOIMPF FROMFILE(CHARLY/ATEST) TOSTMF('/home/charly/querya')
   MBROPT(*REPLACE) TOCCSID(*FILE) RCDDLM(*CRLF) DTAFMT(*DLM)
   STRDLM('"') FLDDLM(',') NULLIND(*NO) DECPNT(*PERIOD)
   DATFMT(*ISO) TIMFMT(*ISO)

So my question is: why aren't you getting double quotes around your alpha 
field?

--  Charly

Merlin Inc
Box 640
Gig Harbor WA 98335 USA
253 265-6244





>From: "Fisher, Don" <Dfisher@xxxxxxxxxxxxxxxxx>
>Reply-To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
>To: "'Midrange Systems Technical Discussion'" <midrange-l@xxxxxxxxxxxx>
>Subject: RE: CPYTOIMPF and numerics > 15 Digits
>Date: Wed, 25 Jun 2003 17:01:51 -0400
>
>That is interesting.  Are you using a string delimiter (STRDLM)?
>
>Donald R. Fisher, III
>Project Manager
>Roomstore Furniture Company
>(804) 784-7600 extension 2124
>DFisher@xxxxxxxxxxxxx
>
><clip>
>However, if I open it with notepad, here is one of the lines:
>
>30,1610,2,5251255,V,9992509516956650,83656,14,14,0,20030606,0,0
>
>the 9992509516956650 should be 9992509516956651 and is listed as a 16 alpha
>in the database file.
><clip>
>_______________________________________________
>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.
>

_________________________________________________________________
Add photos to your messages with MSN 8. Get 2 months FREE*.  
http://join.msn.com/?page=features/featuredemail

_______________________________________________
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.