RE: Client Access Transfer

Paul,

Thanks for the code - I keep getting a CPFA097 error and to honest with
you I have no idea what/how this works.

If you would be so kind as to elaborate on this I would very much
appreciated it.

(I am using a flat file hsbcchkf1 and the file is in qgpl)

Thank you

***************************************
Len Grieco
iSeries/LANSA Programmer

William S. Hein & Co., Inc.
1285 Main Street
Buffalo, NY 14209
Phone (716) 882-2600 Ext. 131
Fax (716) 883-8100
l_grieco@xxxxxxxxxx

***************************************

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Paul Nelson
Sent: Wednesday, September 08, 2010 11:26 AM
To: 'Midrange Systems Technical Discussion'
Subject: RE: Client Access Transfer

Len,

I have a customer who fought with the bank for months over
the same issue, and the bank refused to budge for him.
Apparently the bank views him as too small a customer.

We ended up using CPYTOSTMF to place the file into the IFS.
Here's the code
snippet:

ELSE CMD(CPYTOSTMF +
FROMMBR('/qsys.lib/qtemp.lib/pospayapf.file+
/pospayapf.mbr') TOSTMF(&STMFILE) +
STMFOPT(*REPLACE) ENDLINFMT(*FIXED) +
STMFCODPAG(*PCASCII))



Paul Nelson
Office 512-392-2577
Cell 708-670-6978
nelsonp@xxxxxxxxxxxxx


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Len Grieco
Sent: Wednesday, September 08, 2010 9:56 AM
To: midrange-l@xxxxxxxxxxxx
Subject: Client Access Transfer

Greetings,

I'm using client access transfer (version 5.9) to take a
flat file from our iSeries that is 300 characters long and
place it on our network so the end user can upload it to
the bank for their Positive Pay System. The bank's specs
of the file are as follows:

Must be 300 characters regardless of the data length, in
the 301st position there is a carriage return, there can
not be any blank records, and it must be uploaded as a .TXT file.

I am able to give them the correct length (with spaces
padded at the end of the record if needed), when the last
record in the file is encountered it is adding the carriage
return and end of file indicator. I can control if the end
of file indicator is included or not but either way it is
causing (according to the bank) a blank record at the end.

I was using textpad to eliminate the "last (blank) record"
and then saving the file as a .txt. The bank will not
accept any files that are manually modified.

Can someone point me in the right direction as how this can
be accomplished using Client Access Transfer, or if it is
not possible any ideas on how to give the bank what they
are asking for.

Thank you

***************************************
Len Grieco
iSeries/LANSA Programmer

William S. Hein & Co., Inc.
1285 Main Street
Buffalo, NY 14209
Phone (716) 882-2600 Ext. 131
Fax (716) 883-8100
l_grieco@xxxxxxxxxx

***************************************


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



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