🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: comp.lang.cobol
2 messages
2 total messages Started by Bill Gentry Tue, 21 Dec 2004 01:25
Email from JCL with attachment
#61
Author: Bill Gentry
Date: Tue, 21 Dec 2004 01:25
67 lines
2431 bytes
OK, I've been spinning my wheels on this for a bit.

I want to send an email from a JCL *with an attachment*.

I'm able to send the email, but I can't get a file to attach.

The following JCL ( with some particulars changed to protect the innocent )
is what I have that works, so far:
//IMAUSERA JOB (,,0000,0000,0,00),'SEND AN EMAIL',

// CLASS=N,MSGCLASS=Q,MSGLEVEL=(1,1),NOTIFY=IMAUSER

//IEBGENER EXEC PGM=IEBGENER

//OUTPUT DD SYSOUT=*

//SYSIN DD DUMMY

//SYSUT1 DD *

HELO MBPGHA

MAIL FROM:<IMAUSER@THECO.COM>

RCPT TO:<BILL.GENTRY@NOSPAM.COM>

DATA

TO:BILL.GENTRY@NOSPAM.COM

SUBJECT: THIS IS A TEST!

MIME-VERSION: 1.0

CONTENT-TYPE: MULTIPART/MIXED;

BOUNDARY="----_=_NEXTPART_000_01C0DFAD.3EF4A2D0"

THIS MESSAGE IS IN MIME FORMAT...

------_=_NEXTPART_000_01C0DFAD.3EF4A2D0

CONTENT-TYPE: TEXT/PLAIN;

CHARSET="ISO-8859-1"

THIS IS A TEST!

FIRST MESSAGE!

SECOND MESSAGE!

------_=_NEXTPART_000_01C0DFAD.3EF4A2D0--

/*

//SYSUT2 DD SYSOUT=(X,ZSPTCPM)

//SYSOUT DD SYSOUT=*

//SYSPRINT DD SYSOUT=*



Anyone have any idea *how* I code the attachment???

Any input is appreciated!
Re: Email from JCL with attachment
#62
Author: Richard
Date: Mon, 20 Dec 2004 23:38
24 lines
1835 bytes
Anyone have any idea *how* I code the attachment???

There must be a blank line between the MIME header and the body of each
part:

Each attachment would be within its own set of bondaries.

TO:BILL.GEN...@NOSPAM.COM
SUBJECT: THIS IS A TEST!
MIME-VERSION: 1.0
CONTENT-TYPE:
MULTIPART/MIXED;BOUNDARY="----_=_NEXTPART_000_01C0DFAD.3EF4A2D0"
<blank line here>
THIS MESSAGE IS IN MIME FORMAT...
----_=_NEXTPART_000_01C0DFAD.3EF4A2D0
CONTENT-TYPE: TEXT/PLAIN; CHARSET="ISO-8859-1"
<blank line here>
THIS IS A TEST!
FIRST MESSAGE!
----_=_NEXTPART_000_01C0DFAD.3EF4A2D0
CONTENT-TYPE: TEXT/PLAIN; CHARSET="ISO-8859-1"
<blank line here>
SECOND MESSAGE!
------_=_NEXTPART_000_01C0DFAD.3EF4A2D0--
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads