RE: QtmmSendMail - Send Mail API -- MIDRANGE-L

Rob,

Your hieroglyphics are due to the DBFCCSID & STMFCODPAG parms of CPYTOSTMF.
Prompt the command and use the help key on those parms for their
descriptions..  HTH.

Regards,
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Jon A. Erickson
Viking Industries, Inc.
http://www.vikingindustries.com
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


-----Original Message-----
From: owner-midrange-l@MIDRANGE.COM
[mailto:owner-midrange-l@MIDRANGE.COM]On Behalf Of Rob Berendt
Sent: Wednesday, August 12, 1998 9:39 AM
To: MIDRANGE-L@MIDRANGE.COM
Subject: Re: QtmmSendMail - Send Mail API


Thank you for the tip about the blank line.  That fixed problem #2.  I am
still having problem #1 with the CPYTOSTMF command.  Suggestions would be
much appreciated.




twmac@mindspring.com on 08/12/98 11:06:17 AM
Please respond to MIDRANGE-L@MIDRANGE.COM@Internet
To:     MIDRANGE-L@MIDRANGE.COM@Internet
cc:
Subject:        Re: QtmmSendMail - Send Mail API

Leave a blank line between the message header and the body.

At 08:54 AM 8/12/98 -0500, you wrote:
>Many thanks to those whose earlier email inspired me to use this.  I've
been using SNDDST.  Frustrations with SNDDST include the mandatory Subject
line that is ignored, this is a bug in my mind.  Also lack of formatting on
a simple message.
>
>I've received some sample RPGLE code from one of the Redbook authors and
it is a start.
>
>Thanks to Patrick Townsend for pointing out that QtmmSendMail is in the
service program QTMMSNDM.  I've wrote the books people that this should be
included in the manual.  This was my first RPGLE program that I bound a
service program into.  (Good thing I am in the middle of taking that ATS
RPGLE course!)
>
>The problems I am having are twofold.
>
>Problem 1)  Getting the QSYS system file into the IFS.  I used CPYTOSTMF.
However when I opened the file using Notepad it was all hieroglyphics.
What options should I be using on the CPYTOSTMF command?
>
>Problem 2)  Format of the file to send.  At first I typed in 'Hi ya' in
the IFS file using Notepad.  I never received the email.  Then I typed in:
>From:  rob@dekko.com
>To:  rob@dekko.com
>Subject:  Test
>This is a test.
>
>I received the From, To and the subject.  (Tangent, both of the
rob@dekko.com got translated into Rob Berendt/DEKKO@DEKKO when it came into
my Notes.)  I never received the body of my message.  Am I missing some
keyword such as Body:?
>
>Group Dekko Services, LLC
>Rob Berendt, CCP
>Dept 01.073
>PO Box 2000
>Kendallville IN 46755
>219.347.3100 ext 70560
>219.349.2005 fax
>rob@dekko.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
>+---
>
+---
| 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
+---


begin 666 Jon Erickson.vcf
M0D5'24XZ5D-!4D0-"E9%4E-)3TXZ,BXQ#0I..D5R:6-K<V]N.TIO;CL[.PT*
M1DXZ2F]N($5R:6-K<V]N#0I/4D<Z5FEK:6YG($EN9'5S=')I97,L($EN8RX[
M26YF;W)M871I;VX@4WES=&5M<PT*5$E43$4Z4W(N(%!R;V=R86UM97(@06YA
M;'ES= T*5$5,.U=/4DL[5D])0T4Z*#4P,RD@-C8W+38P,S @>#4U, T*5$5,
M.TA/344[5D])0T4Z#0I414P[0T5,3#M63TE#13HH-3 S*2 S,#<M-S8U-@T*
M5$5,.U=/4DL[1D%8.B@U,#,I(#8V.2TQ,3,U#0I!1%([5T]22SH[.S$X-C P
M($XN12X@5VEL:V5S(%)D+CM0;W)L86YD.T]2.SDW,C,P+38Y.34[56YI=&5D
M(%-T871E<R!O9B!!;65R:6-A#0I,04)%3#M73U)+.T5.0T]$24Y'/5%53U1%
M1"U04DE.5$%"3$4Z,3@V,# @3BY%+B!7:6QK97,@4F0N/3!$/3!!4&]R;&%N
M9"P@3U(@.3<R,S M-CDY-3TP1#TP055N:71E9"!3=&%T97,@;V8@06UE<CT-
M"FEC80T*0412.TA/344Z.SLQ-3,S-"!312!/<F5G;VX@5')A:6P@1'(N.T-L
M86-K86UA<SM/4CLY-S Q-3M5;FET960@4W1A=&5S(&]F($%M97)I8V$-"DQ!
M0D5,.TA/344[14Y#3T1)3D<]455/5$5$+5!224Y404),13HQ-3,S-"!312!/
M<F5G;VX@5')A:6P@1'(N/3!$/3!!0VQA8VMA;6%S+"!/4B Y-S Q-3TP1#TP
M055N:71E9"!3=&%T97,@;V8@06UE/0T*<FEC80T*0412.U!/4U1!3#H[.U N
M3RX@0F]X(#(P-3$X.U!O<G1L86YD.T]2.SDW,CDT+3 U,3@[56YI=&5D(%-T
M871E<R!O9B!!;65R:6-A#0I,04)%3#M03U-404P[14Y#3T1)3D<]455/5$5$
M+5!224Y404),13I0+D\N($)O>" R,#4Q.#TP1#TP05!O<G1L86YD+"!/4B Y
M-S(Y-"TP-3$X/3!$/3!!56YI=&5D(%-T871E<R!O9B!!;65R:6-A#0I54DPZ
M#0I54DPZ:'1T<#HO+W=W=RYP8V5Z+F-O;2]^97=A<F4-"E)/3$4Z#0I"1$%9
M.C$Y-C Q,C T#0I%34%)3#M04D5&.TE.5$523D54.FIO;F5R:6-K<V]N0'9I
M:VEN9VEN9'5S=')I97,N8V]M#0I%34%)3#M)3E1%4DY%5#IE=V%R94!P8V5Z
G+F-O;0T*4D56.C$Y.3@P-S,Q5#(P,SDR,EH-"D5.1#I60T%21 T*
`
end


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