Re: MVS 3.8j Hercprint Control File

"John Murray [email protected] [H390-MVS]" <[email protected]> Sun, 31 May 2020 10:42:44 -0400
Newsgroups gmane.comp.emulators.hercules390.mvs
Message-ID <[email protected]>
--Apple-Mail-004DE808-B847-4268-B410-42E6DCAE49E4
Content-Type: text/plain;
	charset=utf-8
Content-Transfer-Encoding: quoted-printable

I originally wrote my job submission script in Perl, but, a couple of years=
 ago, I rewrote it in Python. You point it at a file containing some JCL an=
d it submits it to z/os and then waits around for the sysout which it optio=
nally then displays in an edit session. It has a few other interesting beha=
viors like:

- it picks up the IP address of the z/os system from an environment variabl=
e as well as the userid and password to insert in the job card. These value=
s can also be specified on the command line

- it will optionally insert files into the JCL. This allows you, for exampl=
e, to have a compile deck which then has source code, maintained in your PC=
 or other submission environment, inserted at submission time.

There=E2=80=99s other stuff, but it=E2=80=99s been a while and I=E2=80=99ve=
 largely forgotten about it.

Ottawa

> On May 31, 2020, at 4:51 AM, richard [email protected] [H390-M=
VS] <[email protected]> wrote:
>=20
> =EF=BB=BF
> I ended up writing my own which also included a JCL submission function.
>=20
>=20
>=20
> Sent from my Samsung Galaxy smartphone.
>=20
>=20
> -------- Original message --------
> From: "Andrew Gadsby [email protected] [H390-MVS]" <H390-MVS@yahoogroup=
s.com>
> Date: 30/05/2020 10:59 (GMT+00:00)
> To: [email protected]
> Subject: Re: [H390-MVS] MVS 3.8j Hercprint Control File
>=20
>=20=20
> Hi Dave
>=20
>=20
> Take a look at my hercprt Perl script that does the print processing on m=
y tk4- instance at mvs.gadsby.me.uk.=20
>=20
> Login as guest password guest to see the results..=20
>=20
> Andy=20
>=20
> Sent from my phone
>=20
>>> On 30 May 2020, at 09:38, Dave Trainor [email protected] [H390-MVS] <H390-=
[email protected]> wrote:
>>>=20
>> =EF=BB=BF=20=20
>> I am using Jay Mosley=E2=80=99s MVS3.8j and I need a Control file that w=
orks, the one that comes with it does not see the end of job separator, the=
 target statements are not correct.
>>=20
>>=20=20
>>=20
>> Looks to me like I could use a single trigger like the ***A END that I s=
ee in the text file --- but the ones that came with the hercprint as exampl=
es there have like 25-30 triggers and that would take a lot of work to sort=
 out as I am thinking if I tried to just have one trigger it would be a mis=
take=E2=80=93 and the nice PDF fake green bar with the tractor feed holes i=
s just , well, cool.
>>=20
>>=20=20
>>=20
>> Rather than re-invent the wheel here, does someone have a control file f=
or Jay Mosley=E2=80=99s version of MVS 3.8j ?
>>=20
>>=20=20
>>=20
>> Right now all my jobs are going into the prt00e.txt file and it=E2=80=99=
s a royal pain with vi, to sort thru this as the file gets large, and if I =
null it out the printer stops working and I have to IPL..
>>=20
>>=20=20
>>=20
>> Anyone have any help?
>>=20
>>=20=20
>>=20
>> Thanks and 73,
>>=20
>> Dave =E2=80=93 N8ZFM
>>=20
>=20
>=20

--Apple-Mail-004DE808-B847-4268-B410-42E6DCAE49E4
Content-Type: text/html; charset=UTF-8
Content-Transfer-Encoding: quoted-printable




<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/htm=
l4/strict.dtd">
<html>
<head>
</head>






=20
<body style=3D"background-color: #fff;">
<span style=3D"display:none">&nbsp;</span>

<!--~-|**|PrettyHtmlStartT|**|-~-->
<div id=3D"ygrp-mlmsg" style=3D"position:relative;">
  <div id=3D"ygrp-msg" style=3D"z-index: 1;">
<!--~-|**|PrettyHtmlEndT|**|-~-->

    <div id=3D"ygrp-text" >
=20=20=20=20=20=20
=20=20=20=20=20=20
      <p>I originally wrote my job submission script in Perl, but, a couple=
 of years ago, I rewrote it in Python. You point it at a file containing so=
me JCL and it submits it to z/os and then waits around for the sysout which=
 it optionally then displays in an edit session. It has a few other interes=
ting behaviors like:<div><br></div><div>- it picks up the IP address of the=
 z/os system from an environment variable as well as the userid and passwor=
d to insert in the job card. These values can also be specified on the comm=
and line</div><div><br></div><div>- it will optionally insert files into th=
e JCL. This allows you, for example, to have a compile deck which then has =
source code, maintained in your PC or other submission environment, inserte=
d at submission time.</div><div><br></div><div>There=E2=80=99s other stuff,=
 but it=E2=80=99s been a while and I=E2=80=99ve largely forgotten about it.=
</div><div><br><div dir=3D"ltr">Ottawa</div><div dir=3D"ltr"><br><blockquot=
e type=3D"cite">On May 31, 2020, at 4:51 AM, richard richard@richard-harper=
..me.uk [H390-MVS] &lt;[email protected]&gt; wrote:<br><br></blockquo=
te></div><blockquote type=3D"cite"><div dir=3D"ltr">=EF=BB=BF












=20

<span>&nbsp;</span>



    <div id=3D"ygrp-text">
=20=20=20=20=20=20
=20=20=20=20=20=20
      <p></p><div dir=3D"auto">I ended up writing my own which also include=
d a JCL submission function.</div><div dir=3D"auto"><br></div><div dir=3D"a=
uto"><br></div><div dir=3D"auto"><br></div><div id=3D"composer_signature" d=
ir=3D"auto"><div style=3D"font-size:85%;color:#575757;" dir=3D"auto">Sent f=
rom my Samsung Galaxy smartphone.</div></div><div dir=3D"auto"><br></div><d=
iv><br></div><div style=3D"font-size:100%;color:#000000;" dir=3D"auto"><!--=
 originalMessage --><div>-------- Original message --------</div><div>From:=
 "Andrew Gadsby [email protected] [H390-MVS]" &lt;H390-MVS-hHKSG33Tihh9OS/[email protected]=
m&gt; </div><div>Date: 30/05/2020  10:59  (GMT&#43;00:00) </div><div>To: H3=
[email protected] </div><div>Subject: Re: [H390-MVS] MVS 3.8j Hercprin=
t Control File </div><div><br></div></div>
<span>&nbsp;</span>



    <div id=3D"ygrp-text">
=20=20=20=20=20=20
=20=20=20=20=20=20
      <p>Hi Dave</p><div><br></div><div>Take a look at my hercprt Perl scri=
pt that does the print processing on my tk4- instance at mvs.gadsby.me.uk.&=
nbsp;</div><div><br></div><div>Login as guest password guest to see the res=
ults..&nbsp;</div><div><div><br><div dir=3D"ltr">Andy&nbsp;<div><br></div><=
div>Sent from my phone</div></div><div dir=3D"ltr"><br><blockquote type=3D"=
cite">On 30 May 2020, at 09:38, Dave Trainor [email protected] [H390-MVS] &lt;=
[email protected]&gt; wrote:<br><br></blockquote></div><blockquote t=
ype=3D"cite"><div dir=3D"ltr">=EF=BB=BF












=20

<span>&nbsp;</span>



    <div id=3D"ygrp-text">
=20=20=20=20=20=20
=20=20=20=20=20=20
      <p>


</p><div class=3D"WordSection1">
<p class=3D"MsoNormal">I am using Jay Mosley=E2=80=99s MVS3.8j and I need a=
 Control file that works, the one that comes with it does not see the end o=
f job separator, the target statements are not correct.<o></o></p>
<p class=3D"MsoNormal"><o>&nbsp;</o></p>
<p class=3D"MsoNormal">Looks to me like I could use a single trigger like t=
he ***A END that I see in the text file --- but the ones that came with the=
 hercprint as examples there have like 25-30 triggers and that would take a=
 lot of work to sort out as I am thinking
 if I tried to just have one trigger it would be a mistake=E2=80=93 and the=
 nice PDF fake green bar with the tractor feed holes is just , well, cool.<=
o></o></p>
<p class=3D"MsoNormal"><o>&nbsp;</o></p>
<p class=3D"MsoNormal">Rather than re-invent the wheel here, does someone h=
ave a control file for Jay Mosley=E2=80=99s version of MVS 3.8j ?<o></o></p=
>
<p class=3D"MsoNormal"><o>&nbsp;</o></p>
<p class=3D"MsoNormal">Right now all my jobs are going into the prt00e.txt =
file and it=E2=80=99s a royal pain with vi, to sort thru this as the file g=
ets large, and if I null it out the printer stops working and I have to IPL=
...<o></o></p>
<p class=3D"MsoNormal"><o>&nbsp;</o></p>
<p class=3D"MsoNormal">Anyone have any help?<o></o></p>
<p class=3D"MsoNormal"><o>&nbsp;</o></p>
<p class=3D"MsoNormal">Thanks and 73,<o></o></p>
<p class=3D"MsoNormal">Dave =E2=80=93 N8ZFM<o></o></p>
</div>


<p></p>

    </div>
=20=20=20=20=20

=20=20=20=20





<!-- end group email -->

</div></blockquote></div></div><p></p>

    </div>
=20=20=20=20=20

=20=20=20=20

<p></p>

    </div>
=20=20=20=20=20

=20=20=20=20





<!-- end group email -->

</div></blockquote></div></p>

    </div>
=20=20=20=20=20

    <!--~-|**|PrettyHtmlStart|**|-~-->
    <div style=3D"color: #fff; height: 0;">__._,_.___</div>

=20=20=20=20=20=20=20=20=20=20
=20=20
=20

=20=20=20=20
    <div style=3D"clear:both"> </div>

    <div id=3D"fromDMARC" style=3D"margin-top: 10px;">
        <hr style=3D"height:2px ; border-width:0; color:#E3E3E3; background=
-color:#E3E3E3;">
        Posted by: John Murray &lt;[email protected]&gt;        <hr =
style=3D"height:2px ; border-width:0; color:#E3E3E3; background-color:#E3E3=
E3;">
     </div>
    <div style=3D"clear:both"> </div>

    <table cellspacing=3D4px style=3D"margin-top: 10px; margin-bottom: 10px=
; color: #2D50FD;">
      <tbody>
        <tr>
          <td style=3D"font-size: 12px; font-family: arial; font-weight: bo=
ld; padding: 7px 5px 5px;"  >
                          <a style=3D"text-decoration: none; color: #2D50FD=
" href=3D"https://groups.yahoo.com/neo/groups/H390-MVS/conversations/messag=
es/19418;_ylc=3DX3oDMTJxcGIyYXVqBF9TAzk3MzU5NzE0BGdycElkAzI1ODc5NjYEZ3Jwc3B=
JZAMxNzA1MzA5NTQ4BG1zZ0lkAzE5NDE4BHNlYwNmdHIEc2xrA3JwbHkEc3RpbWUDMTU5MDkzNj=
E2Nw--?act=3Dreply&messageNum=3D19418">Reply via web post</a>
                      </td>
          <td>&bull;</td>
          <td style=3D"font-size: 12px; font-family: arial; padding: 7px 5p=
x 5px;" >
            <a href=3D"mailto:[email protected]?subject=3DRe%3A%20%5=
BH390-MVS%5D%20MVS%203%2E8j%20Hercprint%20Control%20File" style=3D"text-dec=
oration: none; color: #2D50FD;">
               Reply to sender            </a>
          </td>
          <td>&bull;</td>
          <td style=3D"font-size: 12px; font-family: arial; padding: 7px 5p=
x 5px;">
            <a href=3D"mailto:[email protected]?subject=3DRe%3A%20%5=
BH390-MVS%5D%20MVS%203%2E8j%20Hercprint%20Control%20File" style=3D"text-dec=
oration: none; color: #2D50FD">
              Reply to group            </a>
          </td>
          <td>&bull;</td>
          <td style=3D"font-size: 12px; font-family: arial; padding: 7px 5p=
x 5px;" >
            <a href=3D"https://groups.yahoo.com/neo/groups/H390-MVS/convers=
ations/newtopic;_ylc=3DX3oDMTJlZ2U0aGxuBF9TAzk3MzU5NzE0BGdycElkAzI1ODc5NjYE=
Z3Jwc3BJZAMxNzA1MzA5NTQ4BHNlYwNmdHIEc2xrA250cGMEc3RpbWUDMTU5MDkzNjE2Nw--" s=
tyle=3D"text-decoration: none; color: #2D50FD">Start a New Topic</a>
          </td>
          <td>&bull;</td>
          <td style=3D"font-size: 12px; font-family: arial; padding: 7px 5p=
x 5px;color: #2D50FD;" >
                            <a href=3D"https://groups.yahoo.com/neo/groups/=
H390-MVS/conversations/topics/19415;_ylc=3DX3oDMTM2YjB1YTVzBF9TAzk3MzU5NzE0=
BGdycElkAzI1ODc5NjYEZ3Jwc3BJZAMxNzA1MzA5NTQ4BG1zZ0lkAzE5NDE4BHNlYwNmdHIEc2x=
rA3Z0cGMEc3RpbWUDMTU5MDkzNjE2NwR0cGNJZAMxOTQxNQ--" style=3D"text-decoration=
: none; color: #2D50FD;">Messages in this topic</a>
                (4)
                      </td>
        </tr>
      </tbody>
    </table>

=20=20=20=20=20=20=20=20

<!------- Start Nav Bar ------>




=20

<!-- |**|begin egp html banner|**| -->
<div id=3D"ygrp-vital" style=3D"background-color: #f2f2f2; font-family: Ver=
dana; font-size: 10px; margin-bottom: 10px; padding: 10px;">

    <span id=3D"vithd" style=3D"font-weight: bold; color: #333; text-transf=
orm: uppercase; "><a href=3D"https://groups.yahoo.com/neo/groups/H390-MVS/i=
nfo;_ylc=3DX3oDMTJlcjJxbGxkBF9TAzk3MzU5NzE0BGdycElkAzI1ODc5NjYEZ3Jwc3BJZAMx=
NzA1MzA5NTQ4BHNlYwN2dGwEc2xrA3ZnaHAEc3RpbWUDMTU5MDkzNjE2Nw--" style=3D"text=
-decoration: none;">Visit Your Group</a></span>

     <ul style=3D"list-style-type: none; margin: 0; padding: 0; display: in=
line;">
                                                    </ul>
  </div>


<div id=3D"ft" style=3D"font-family: Arial; font-size: 11px; margin-top: 5p=
x; padding: 0 2px 0 0; clear: both;">
  <a href=3D"https://groups.yahoo.com/neo;_ylc=3DX3oDMTJkM2lyODdjBF9TAzk3ND=
c2NTkwBGdycElkAzI1ODc5NjYEZ3Jwc3BJZAMxNzA1MzA5NTQ4BHNlYwNmdHIEc2xrA2dmcARzd=
GltZQMxNTkwOTM2MTY3" style=3D"float: left;"><img src=3D"https://s.yimg.com/=
ru/0.9.12/min/css/yahoo_en-US_f_pw_101x21.png" height=3D"21" width=3D"101" =
alt=3D"Yahoo! Groups" style=3D"border: 0;"/></a>
  <div style=3D"color: #747575; float: right;"> &bull; <a href=3D"https://i=
nfo.yahoo.com/privacy/us/yahoo/groups/details.html" style=3D"text-decoratio=
n: none;">Privacy</a> &bull; <a href=3D"mailto:H390-MVS-unsubscribe@yahoogr=
oups.com?subject=3DUnsubscribe" style=3D"text-decoration: none;">Unsubscrib=
e</a> &bull; <a href=3D"https://info.yahoo.com/legal/us/yahoo/utos/terms/" =
style=3D"text-decoration: none;">Terms of Use</a> </div>
</div>
<br>

<!-- |**|end egp html banner|**| -->

  </div> <!-- ygrp-msg -->

=20
  <!-- Sponsor -->
  <!-- |**|begin egp html banner|**| -->
  <div id=3D"ygrp-sponsor" style=3D"width:160px; float:right; clear:none; m=
argin:0 0 25px 0; background: #fff;">

<!-- Start Recommendations -->
<div id=3D"ygrp-reco">
     </div>
<!-- End Recommendations -->



  </div>   <!-- |**|end egp html banner|**| -->

  <div style=3D"clear:both; color: #FFF; font-size:1px;">.</div>
</div>

  <img src=3D"http://geo.yahoo.com/serv?s=3D97359714/grpId=3D2587966/grpspI=
d=3D1705309548/msgId=3D19418/stime=3D1590936167" width=3D"1" height=3D"1"> =
<br>

<img src=3D"http://y.analytics.yahoo.com/fpc.pl?ywarid=3D515FB27823A7407E&a=
=3D10001310322279&js=3Dno&resp=3Dimg" width=3D"1" height=3D"1">=20

<div style=3D"color: #fff; height: 0;">__,_._,___</div>
<!--~-|**|PrettyHtmlEnd|**|-~-->

</body>

<!--~-|**|PrettyHtmlStart|**|-~-->
<head>
  <style type=3D"text/css">
  <!--
  #ygrp-mkp {
  border: 1px solid #d8d8d8;
  font-family: Arial;
  margin: 10px 0;
  padding: 0 10px;
}

#ygrp-mkp hr {
  border: 1px solid #d8d8d8;
}

#ygrp-mkp #hd {
  color: #628c2a;
  font-size: 85%;
  font-weight: 700;
  line-height: 122%;
  margin: 10px 0;
}

#ygrp-mkp #ads {
  margin-bottom: 10px;
}

#ygrp-mkp .ad {
  padding: 0 0;
}

#ygrp-mkp .ad p {
  margin: 0;
}

#ygrp-mkp .ad a {
  color: #0000ff;
  text-decoration: none;
}
  #ygrp-sponsor #ygrp-lc {
  font-family: Arial;
}

#ygrp-sponsor #ygrp-lc #hd {
  margin: 10px 0px;
  font-weight: 700;
  font-size: 78%;
  line-height: 122%;
}

#ygrp-sponsor #ygrp-lc .ad {
  margin-bottom: 10px;
  padding: 0 0;
}

  #actions {
    font-family: Verdana;
    font-size: 11px;
    padding: 10px 0;
  }

  #activity {
    background-color: #e0ecee;
    float: left;
    font-family: Verdana;
    font-size: 10px;
    padding: 10px;
  }

  #activity span {
    font-weight: 700;
  }

  #activity span:first-child {
    text-transform: uppercase;
  }

  #activity span a {
    color: #5085b6;
    text-decoration: none;
  }

  #activity span span {
    color: #ff7900;
  }

  #activity span .underline {
    text-decoration: underline;
  }

  .attach {
    clear: both;
    display: table;
    font-family: Arial;
    font-size: 12px;
    padding: 10px 0;
    width: 400px;
  }

  .attach div a {
    text-decoration: none;
  }

  .attach img {
    border: none;
    padding-right: 5px;
  }

  .attach label {
    display: block;
    margin-bottom: 5px;
  }

  .attach label a {
    text-decoration: none;
  }
=20=20
  blockquote {
    margin: 0 0 0 4px;
  }

  .bold {
    font-family: Arial;
    font-size: 13px;
    font-weight: 700;
  }

  .bold a {
    text-decoration: none;
  }

  dd.last p a {
    font-family: Verdana;
    font-weight: 700;
  }

  dd.last p span {
    margin-right: 10px;
    font-family: Verdana;
    font-weight: 700;
  }

  dd.last p span.yshortcuts {
    margin-right: 0;
  }

  div.attach-table div div a {
    text-decoration: none;
  }

  div.attach-table {
    width: 400px;
  }

  div.file-title a, div.file-title a:active, div.file-title a:hover, div.fi=
le-title a:visited {
    text-decoration: none;
  }

  div.photo-title a, div.photo-title a:active, div.photo-title a:hover, div=
..photo-title a:visited {
    text-decoration: none;
  }

  div#ygrp-mlmsg #ygrp-msg p a span.yshortcuts {
    font-family: Verdana;
    font-size: 10px;
    font-weight: normal;
  }

  .green {
    color: #628c2a;
  }

  .MsoNormal {
    margin: 0 0 0 0;
  }

  o {
    font-size: 0;
  }

  #photos div {
    float: left;
    width: 72px;
  }

  #photos div div {
    border: 1px solid #666666;
    height: 62px;
    overflow: hidden;
    width: 62px;
  }

  #photos div label {
    color: #666666;
    font-size: 10px;
    overflow: hidden;
    text-align: center;
    white-space: nowrap;
    width: 64px;
  }

  #reco-category {
    font-size: 77%;
  }

  #reco-desc {
    font-size: 77%;
  }

  .replbq {
    margin: 4px;
  }

  #ygrp-actbar div a:first-child {
   /* border-right: 0px solid #000;*/
    margin-right: 2px;
    padding-right: 5px;
  }

  #ygrp-mlmsg {
    font-size: 13px;
    font-family: Arial, helvetica,clean, sans-serif;
    *font-size: small;
    *font: x-small;
  }

  #ygrp-mlmsg table {
    font-size: inherit;
    font: 100%;
  }

  #ygrp-mlmsg select, input, textarea {
    font: 99% Arial, Helvetica, clean, sans-serif;
  }

  #ygrp-mlmsg pre, code {
    font:115% monospace;
    *font-size:100%;
  }

  #ygrp-mlmsg * {
    line-height: 1.22em;
  }

  #ygrp-mlmsg #logo {
    padding-bottom: 10px;
  }


  #ygrp-msg p a {
    font-family: Verdana;
  }

  #ygrp-msg p#attach-count span {
    color: #1E66AE;
    font-weight: 700;
  }

  #ygrp-reco #reco-head {
    color: #ff7900;
    font-weight: 700;
  }

  #ygrp-reco {
    margin-bottom: 20px;
    padding: 0px;
  }

  #ygrp-sponsor #ov li a {
    font-size: 130%;
    text-decoration: none;
  }

  #ygrp-sponsor #ov li {
    font-size: 77%;
    list-style-type: square;
    padding: 6px 0;
  }=20

  #ygrp-sponsor #ov ul {
    margin: 0;
    padding: 0 0 0 8px;
  }

  #ygrp-text {
    font-family: Georgia;
  }

  #ygrp-text p {
    margin: 0 0 1em 0;
  }

  #ygrp-text tt {
    font-size: 120%;
  }

  #ygrp-vital ul li:last-child {
    border-right: none !important;=20
  }=20
  -->
  </style>
</head>

<!--~-|**|PrettyHtmlEnd|**|-~-->
</html>
<!-- end group email -->


--Apple-Mail-004DE808-B847-4268-B410-42E6DCAE49E4--