Re: Copy just the first record with CPYFRMIMPF

Hi Peter,

Or if you want to treat the first record as one field use

*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
pdow@xxxxxxxxxxxxxxx <mailto:pdow@xxxxxxxxxxxxxxx> /


Steve McKay wrote:

Peter -

Because you only have 1 field in TEMPORARY, CPYFRMIMPF is copying the 1st "field" in the TXT file into the 1st field of the TEMPORARY file. If you create a TEMPORARY file with 5 or 6 fields, your CPYFRMIMPF will be successful.

HTH,

Steve

"Peter Vidal" <Peter_Vidal@xxxxxxxx> wrote in message news:mailman.4565.1155753784.2610.midrange-l@xxxxxxxxxxxxxxx

No.

As a matter of fact, I am doing this:

CPYFRMIMPF FROMSTMF('/TEST/2006_08_04_pay[1].20060804.013057.txt') TOFILE
(QTEMP/TEMPORARY) MBROPT(*REPLACE) STMFLEN(132) RCDDLM(*ALL) FROMRCD(1 5)


My txt file is:
10,08/04/06,01:19:04,00012345
20,820,999999999,"DEMO, AUTH","",""
20,820,999999999,"DEMO, AUTH","",""
20,820,999999999,"DEMO, AUTH","",""

My TEMPORARY file has with 5 records with special characters in the first
two positions: nothing else from position 3 and greater.  By the way, the
text file has 128 characters long and the first two characters equal the
record id: the third character is the first comma, as you can see in the
example above.

I just want to grab that first record and be able to copy it into
QTEMP/TEMPORARY.


Peter Vidal
PALL Corporation / SR Programmer Analyst, IT Development Group
10540 Ridge Rd., Ste 203, New Port Richey, FL 34654-5111
http://www.pall.com

"No nation can rise higher than the character of its people."
Anonymous





"Holden Tommy" <Tommy.Holden@xxxxxxxxxxxxxxxxx>
Sent by: midrange-l-bounces@xxxxxxxxxxxx
08/16/2006 02:32 PM
Please respond to Midrange Systems Technical Discussion

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

       cc:
       Fax to:
       Subject:        RE: Copy just the first record with CPYFRMIMPF


Would this work for you??

CPYFRMIMPF  FROMRCD(1 1)


Thanks,
Tommy Holden


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Peter Vidal
Sent: Wednesday, August 16, 2006 1:29 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Copy just the first record with CPYFRMIMPF

Hi list:

I want to get the first record of a text file in the IFS and be able to
copy that into a file (let's say, QTEMP/TEMPORARY) which has 132
characters long.

Can I do that using CPYFRMIMPF?  Is there a better way?

TIA,


Peter Vidal
PALL Corporation / SR Programmer Analyst, IT Development Group
10540 Ridge Rd., Ste 203, New Port Richey, FL 34654-5111
http://www.pall.com

"My religion consists of a humble admiration of the illimitable superior

spirit who reveals himself in the slight details we are able to perceive

with our frail and feeble mind."
Albert Einstein (1879 - 1955)

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