× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



I'm using the free tool MMAIL from Easy400 site.
Have made nice things with it to generate al kinds of types of messages
including HTML.
You can find it at: http://www-922.ibm.com/mmail/start

Eduard. 
--- rpg400-l-request@xxxxxxxxxxxx wrote:
> Send RPG400-L mailing list submissions to
>       rpg400-l@xxxxxxxxxxxx
> 
> To subscribe or unsubscribe via the World Wide Web, visit
>       http://lists.midrange.com/mailman/listinfo/rpg400-l
> or, via email, send a message with subject or body 'help' to
>       rpg400-l-request@xxxxxxxxxxxx
> 
> You can reach the person managing the list at
>       rpg400-l-owner@xxxxxxxxxxxx
> 
> When replying, please edit your Subject line so it is more specific
> than "Re: Contents of RPG400-L digest..."
> 
> 
> Today's Topics:
> 
>    1. Setting up an email message (Malchow, Grizzly)
>    2. RE: Setting up an email message (Bob cozzi)
>    3. Re: Setting up an email message (rob@xxxxxxxxx)
>    4. Re: Setting up an email message (Joel Cochran)
>    5. RE: Setting up an email message (Tom Daly)
>    6. RE: Setting up an email message (Joel Cochran)
>    7. Re: Setting up an email message (Booth Martin)
>    8. RE: Setting up an email message (Bruce Vining)
>    9. RE: Setting up an email message (Scott Johnson)
> 
> 
>
----------------------------------------------------------------------
> 
> message: 1
> date: Tue, 28 Oct 2003 08:40:30 -0600
> from: "Malchow, Grizzly" <GMalchow@xxxxxxxxxxxxxxxxxxxxx>
> subject: Setting up an email message
> 
> I'm using the QtmmSendMail API to send emails. Is there a way to put
> a
> carriage return into the message so the formatting looks a little
> better? Could I use HTML tags?
> 
> 
> 
> ------------------------------
> 
> message: 2
> date: Tue, 28 Oct 2003 08:52:34 -0600
> from: "Bob cozzi" <cozzi@xxxxxxxxx>
> subject: RE: Setting up an email message
> 
> Put a X'25' into the text of the message where you want the line feed
> to
> appear.
> 
> 
> Bob Cozzi
> Cozzi Consulting
> www.rpgiv.com
> 
> 
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of Malchow, Grizzly
> Sent: Tuesday, October 28, 2003 8:41 AM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: Setting up an email message
> 
> I'm using the QtmmSendMail API to send emails. Is there a way to put
> a
> carriage return into the message so the formatting looks a little
> better? Could I use HTML tags?
> 
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
> 
> 
> 
> 
> ------------------------------
> 
> message: 3
> date: Tue, 28 Oct 2003 09:55:22 -0500
> from: rob@xxxxxxxxx
> subject: Re: Setting up an email message
> 
> X'0D25'
> 
> Rob Berendt
> -- 
> "They that can give up essential liberty to obtain a little temporary
> 
> safety deserve neither liberty nor safety." 
> Benjamin Franklin 
> 
> 
> 
> 
> "Malchow, Grizzly" <GMalchow@xxxxxxxxxxxxxxxxxxxxx> 
> Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> 10/28/2003 09:40 AM
> Please respond to
> RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> 
> 
> To
> <rpg400-l@xxxxxxxxxxxx>
> cc
> 
> Subject
> Setting up an email message
> 
> 
> 
> 
> 
> 
> I'm using the QtmmSendMail API to send emails. Is there a way to put
> a
> carriage return into the message so the formatting looks a little
> better? Could I use HTML tags?
> 
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
> 
> 
> 
> ------------------------------
> 
> message: 4
> date: Tue, 28 Oct 2003 10:28:34 +0000
> from: Joel Cochran <jrc@xxxxxxxxxx>
> subject: Re: Setting up an email message
> 
> I've been trying to get this going as well.  *IF* what I understand
> is
> correct, the message itself has to be a properly formatted Stream
> file
> in the IFS.  In my mind that means I need to develop the stream file,
> in
> my case on the fly to incorporate dynamic content.  Given this
> scenario,
> it is simple enough to include a carraige return by writing x'0D25'
> to
> the Stream File.
> 
> If this is not the way this API works I would appreciate someone
> letting
> me know, I've been spinning my wheels a little.  My biggest problem
> right now is that the example I found uses the following /copy for
> the
> API data structure error call:
> 
>  * copy error structure from QSYSINC
>  /copy qsysinc/qrpglesrc,qusec
> d Qdata                  17    216
>  * set pointer to Error structure
> d pErr            s               *   Inz(%addr(QUSEC))
> 
> I get an error because it cannot find the /copy, and I haven't been
> able
> to find the DS description at the API website
> 
> Search for QtmmSendMail here:
>
http://publib.boulder.ibm.com/iseries/v5r2/ic2924/index.htm?info/apis/apifinder.htm
> 
> I got my project done by reverting to SNDDST for the time being, but
> eventually I would like to get this working.
> 
> Joel
> http://www.rpgnext.com
> 
> 
> On Tue, 2003-10-28 at 14:40, Malchow, Grizzly wrote:
> > I'm using the QtmmSendMail API to send emails. Is there a way to
> put a
> > carriage return into the message so the formatting looks a little
> > better? Could I use HTML tags?
> > 
> > _______________________________________________
> > This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> > 
> 
> 
> 
> ------------------------------
> 
> message: 5
> date: Tue, 28 Oct 2003 10:52:39 -0500
> from: Tom Daly <Tdaly@xxxxxxxxxxxxxx>
> subject: RE: Setting up an email message
> 
> 
> 
>  |    My biggest problem
>  |  right now is that the example I found uses the following 
>  |  /copy for the
>  |  API data structure error call:
>  |  
>  |   * copy error structure from QSYSINC
>  |   /copy qsysinc/qrpglesrc,qusec
>  |  d Qdata                  17    216
>  |   * set pointer to Error structure
>  |  d pErr            s               *   Inz(%addr(QUSEC))
>  |  
>  |  I get an error because it cannot find the /copy, and I 
>  |  haven't been able
>  |  to find the DS description at the API website
> 
> 
> 
> You can find QUSEC in QSYSINC/H but you will have to convert it from
> C to
> RPG.
> 
>  typedef struct Qus_EC                                               
>   
>     {                                                                
>   
>        int  Bytes_Provided;                                          
>   
>        int  Bytes_Available;                                         
>   
>        char Exception_Id[7];                                         
>   
>        char Reserved;                                                
>   
>      /*char Exception_Data[];*/           /* Varying length        */
>   
>     } Qus_EC_t;                                                      
>   
>                                                                      
>   
> 
> 
> This could probably be improved upon but I've gotten by with this:
> 
> D QUSEC           ds
> 
> D  BytesProv                    10i 0 inz(%size(qusec))     
> D  BytesAvail                   10i 0 inz(0)               
> D  ErrorID                       7                         
> 
> 
> 
> 
> HTH
> Tom Daly
> 
> 
> 
> ------------------------------
> 
> message: 6
> date: Tue, 28 Oct 2003 11:33:30 +0000
> from: Joel Cochran <jrc@xxxxxxxxxx>
> subject: RE: Setting up an email message
> 
> Thanks, that's what I was looking for!
> 
> Joel
> http://www.rpgnext.com
> 
> 
> On Tue, 2003-10-28 at 15:52, Tom Daly wrote:
> >  |    My biggest problem
> >  |  right now is that the example I found uses the following 
> >  |  /copy for the
> >  |  API data structure error call:
> >  |  
> >  |   * copy error structure from QSYSINC
> >  |   /copy qsysinc/qrpglesrc,qusec
> >  |  d Qdata                  17    216
> >  |   * set pointer to Error structure
> >  |  d pErr            s               *   Inz(%addr(QUSEC))
> >  |  
> >  |  I get an error because it cannot find the /copy, and I 
> >  |  haven't been able
> >  |  to find the DS description at the API website
> > 
> > 
> > 
> > You can find QUSEC in QSYSINC/H but you will have to convert it
> from C to
> > RPG.
> > 
> >  typedef struct Qus_EC                                             
>     
> >     {                                                              
>     
> >        int  Bytes_Provided;                                        
>     
> >        int  Bytes_Available;                                       
>     
> >        char Exception_Id[7];                                       
>     
> >        char Reserved;                                              
>     
> >      /*char Exception_Data[];*/           /* Varying length       
> */   
> >     } Qus_EC_t;                                                    
>     
> >                                                                    
>     
> > 
> > 
> > This could probably be improved upon but I've gotten by with this:
> > 
> > D QUSEC           ds
> > 
> > D  BytesProv                    10i 0 inz(%size(qusec))     
> > D  BytesAvail                   10i 0 inz(0)               
> > D  ErrorID                       7                         
> > 
> > 
> > 
> > 
> > HTH
> > Tom Daly
> > 
> > _______________________________________________
> > This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> 
> 
> 
> ------------------------------
> 
> message: 7
> date: Tue, 28 Oct 2003 10:39:52 -0600 (Central Standard Time)
> from: "Booth Martin" <Booth@xxxxxxxxxxxx>
> subject: Re: Setting up an email message
> 
> I use:
>  
> D CRLF C X'0D0A'
>  
> for "carriage return, line feed" 
>  
> This would only be used at paragraph breaks. e-mail doesn't normally
> use
> line breaks.
>  
>  
>  
> ---------------------------------------------------------
> Booth Martin http://www.MartinVT.com
> Booth@xxxxxxxxxxxx
> ---------------------------------------------------------
>  
> -------Original Message-------
>  
> From: RPG programming on the AS400 / iSeries
> Date: Tuesday, October 28, 2003 9:00:37 AM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: Setting up an email message
>  
> I'm using the QtmmSendMail API to send emails. Is there a way to put
> a
> carriage return into the message so the formatting looks a little
> better? Could I use HTML tags?
> 
> 
> 
> ------------------------------
> 
> message: 8
> date: Tue, 28 Oct 2003 10:55:14 -0600
> from: Bruce Vining <bvining@xxxxxxxxxx>
> subject: RE: Setting up an email message
> 
> 
> 
> 
> 
> If you install option 13 (System Openness Includes) of OS/400 you
> will get
> the QSYSINC library and QRPGLESRC/QUSEC include.
> 
> This however is NOT going to fix all of your problems...  The example
> is
> making a (bad) assumption -- namely that the last data structure in
> QUSEC
> is QUSEC, that it ends at byte 16, and that they can then append
> Qdata to
> it starting at byte 17.  Several releases back a new data structure
> was
> added (QUSC0200) to the QUSEC include and Qdata is now going to be
> appended
> to this structure and not the intended one (if you use this
> approach).
> 
> Is Qdata actually used in the sample program?
> 
> 
> 
>                                                                      
>                                                               
>                       Tom Daly                                       
>                                                               
>                       <Tdaly@sddsystems.        To:       "'RPG
> programming on the AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>        
>                       com>                      cc:                  
>                                                               
>                       Sent by:                  Subject:  RE: Setting
> up an email message                                           
>                       rpg400-l-bounces@m                             
>                                                               
>                       idrange.com                                    
>                                                               
>                                                                      
>                                                               
>                                                                      
>                                                               
>                       10/28/2003 09:52                               
>                                                               
>                       AM                                             
>                                                               
>                       Please respond to                              
>                                                               
>                       RPG programming on                             
>                                                               
>                       the AS400 /                                    
>                                                               
>                       iSeries                                        
>                                                               
>                                                                      
>                                                               
>                                                                      
>                                                               
> 
> 
> 
> 
> 
> 
>  |    My biggest problem
>  |  right now is that the example I found uses the following
>  |  /copy for the
>  |  API data structure error call:
>  |
>  |   * copy error structure from QSYSINC
>  |   /copy qsysinc/qrpglesrc,qusec
>  |  d Qdata                  17    216
>  |   * set pointer to Error structure
>  |  d pErr            s               *   Inz(%addr(QUSEC))
>  |
>  |  I get an error because it cannot find the /copy, and I
>  |  haven't been able
>  |  to find the DS description at the API website
> 
> 
> 
> You can find QUSEC in QSYSINC/H but you will have to convert it from
> C to
> RPG.
> 
>  typedef struct Qus_EC
>     {
>        int  Bytes_Provided;
>        int  Bytes_Available;
>        char Exception_Id[7];
>        char Reserved;
>      /*char Exception_Data[];*/           /* Varying length        */
>     } Qus_EC_t;
> 
> 
> 
> This could probably be improved upon but I've gotten by with this:
> 
> D QUSEC           ds
> 
> D  BytesProv                    10i 0 inz(%size(qusec))
> D  BytesAvail                   10i 0 inz(0)
> D  ErrorID                       7
> 
> 
> 
> 
> HTH
> Tom Daly
> 
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
> 
> 
> 
> 
> 
> ------------------------------
> 
> message: 9
> date: Tue, 28 Oct 2003 11:02:53 -0600
> from: "Scott Johnson" <sjohnson@xxxxxxxxxxxxx>
> subject: RE: Setting up an email message
> 
> 
> Instead of re-inventing the wheel, check out "MIME & Mail" (MMail)
> from IBM in
> Italy.  Has a lot of nice features that are all done and ready to go.
>  You get
> the source too. So, you can tweak it to your liking.
> 
> http://www-922.ibm.com/mmailh/intro.htm#topic1
> 
> -- Scott J.
> 
> > I've been trying to get this going as well.
> <snip>
> > Search for QtmmSendMail here:
> <snip>
> 
> 
> 
> 
> ------------------------------
> 
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) digest
> list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
> 
> 
> End of RPG400-L Digest, Vol 2, Issue 831
> ****************************************


=====
Implement-It,
Pos Cabai OfficePark unit 2,
Willemstad, Curaçao,
Netherlands Antilles.

Cell: 5999 5618980 Tel: 5999 7372031 Fax 5999 7372048 

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.