🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.cobol
Article #61

Email from JCL with attachment

#61
From: 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!
Technical Details
Message-ID: <csGdnTIa2plRzVrcRVn-hg@comcast.com>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!news.maxwell.syr.edu!border1.nntp.dca.giganews.com!nntp.giganews.com!local1.nntp.dca.giganews.com!nntp.comcast.com!news.comcast.com.POSTED!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Thread: 10d15b,10b6b20c08e329d6,start
X-Google-Thread: fd4af,10b6b20c08e329d6,start
X-Google-Attributes: gid10d15b,gidfd4af,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!news.maxwell.syr.edu!border1.nntp.dca.giganews.com!nntp.giganews.com!local1.nntp.dca.giganews.com!nntp.comcast.com!news.comcast.com.POSTED!not-for-mail
NNTP-Posting-Date: Mon, 20 Dec 2004 16:23:08 -0600
From: "Bill Gentry" <Bill@nospam.com>
Newsgroups: comp.lang.cobol,bit.listserv.ibm-main
Subject: Email from JCL with attachment
Date: Mon, 20 Dec 2004 17:25:35 -0800
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1106
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1106
Message-ID: <csGdnTIa2plRzVrcRVn-hg@comcast.com>
Lines: 69
NNTP-Posting-Host: 69.141.123.245
X-Trace: sv3-MjxhPdD5jl3QgzsGMP1m4AbfaO/ipE4psPkxBNAoN8jbjoNvmlho61XnCqPZbhQzeQ2my36KJzSxHED!ZRE1ayhgIsK5jvAqCnIvAzBHYAQsQE+mDY8Q44f60aG7ATGMkfDp1FU3F74cni8=
X-Complaints-To: abuse@comcast.net
X-DMCA-Complaints-To: dmca@comcast.net
X-Abuse-and-DMCA-Info: Please be sure to forward a copy of ALL headers
X-Abuse-and-DMCA-Info: Otherwise we will be unable to process your complaint properly
X-Postfilter: 1.3.22