|
Keyword STMFCODPAG not valid for this command. Rob Berendt ================== Remember the Cole! Joel Fritz <JFritz@sharperimag To: "'MIDRANGE-L@midrange.com'" <MIDRANGE-L@midrange.com> e.com> cc: Sent by: Subject: RE: SNDEMAIL: Having problems with a text file owner-midrange-l@mi drange.com 02/27/01 12:49 PM Please respond to MIDRANGE-L I don't think you need a PTF at v4r5. If you do the cpytoimpf using the semi hidden stmfcodpag parameter set to *pcascii when you create the file, you should be set. > -----Original Message----- > From: rob@dekko.com [mailto:rob@dekko.com] > Sent: Tuesday, February 27, 2001 8:15 AM > To: MIDRANGE-L@midrange.com > Subject: Re: SNDEMAIL: Having problems with a text file > > > > Ok, I am making some headway. However the archives have > alluded to some > magic ptf that will give further options on the CPYTOIMPF > command. I am on > V4R5. This is the monkeyshines I have to pull now to get > this to work. > > CPYTOIMPF FROMFILE(*LIBL/&FILE) TOSTMF(&IFSFILE) + > RCDDLM(*CRLF) > > /* > | Convert the code page into something that SNDEMAIL will > | handle. > */ > CHGVAR VAR(&SENDFILE) VALUE(&DIR + > *TCAT '/' *TCAT &FILE *TCAT '_A.TXT') > DEL OBJLNK(&SENDFILE) > MONMSG MSGID(CPFA0A9) /* Object not found */ > CPY OBJ(&IFSFILE) TOOBJ(&SENDFILE) + > TOCODEPAGE(*PCASCII) DTAFMT(*TEXT) > DEL OBJLNK(&IFSFILE) > ... > SNDEMAIL ADDRESSEE((ROB@DEKKO.COM 'Rob Berendt')) + > SENDER(DONOTREPLY@DEKKO.COM 'The AS400') + > SUBJECT(&SUBJECT) FILENAME(&SENDFILE) + > MESSAGE(&MESSAGE) > > > Notice the parameters TOCODEPAGE and DTAFMT? I searched the > archives for > CPYTOIMPF and CODEPAGE. After reviewing the archives I do > appreciate what > Roger was doing by creating the file first instead of the > additional copy. > What I have is functional. > > So is there some magic PTF, or is there a fungus on this > apple I am eating? > > Thanks to y'all for your help! > > > Rob Berendt > +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +--- +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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.