MPE/VMS command @SCRIPT
Mikael.Olesen@qss-uk.com
Mikael.Olesen@qss-uk.com
Tue, 18 Jan 2005 12:20:57 -0000
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
------_=_NextPart_001_01C4FD58.29CEF096
Content-Type: text/plain
Hi
If you want to run a job from qdesign on MPE here is a way to do it:
;File statement
file JOBFIL designer open 2 append exclusive need all; (contain item JF-LINE
cha*80)
procedure designer Doh
close JOBFIL
run command "purge jobfil" on error continue nowarn
run command "PURGE JOBFIL,TEMP" on error continue nowarn
run command "BUILD JOBFIL;rec=-80,,f,ascii;temp"
let JF-LINE = "!JOB " + W-JOBNAVN + "," + Logonid + "," &
+ truncate(Signongroup) + ";OUTCLASS=LP,8"
put jobfil reset
let JF-LINE = "! your commands....."
put JOBFIL reset
let JF-LINE = "! your commands....."
put JOBFIL reset
let JF-LINE = "!eoj"
put JOBFIL reset
close JOBFIL
info = "# " now
run command "stream jobfil"
return
end
Kind Regards
Mikael Olesen
_______________________________
Mikael Olesen
Analyst Programmer
Quadrant Subscription Services
tel: 01444 445340
email: mikael.olesen@qss-uk.com
-----Original Message-----
From: powerh-l-admin@lists.sowder.com
[mailto:powerh-l-admin@lists.sowder.com] On Behalf Of
powerh-l-request@lists.sowder.com
Sent: 18 January 2005 12:10
To: powerh-l@lists.sowder.com
Subject: powerh-l digest, Vol 1 #1202 - 1 msg
Send powerh-l mailing list submissions to
powerh-l@lists.sowder.com
To subscribe or unsubscribe via the World Wide Web, visit
http://lists.sowder.com/mailman/listinfo/powerh-l
or, via email, send a message with subject or body 'help' to
powerh-l-request@lists.sowder.com
You can reach the person managing the list at
powerh-l-admin@lists.sowder.com
When replying, please edit your Subject line so it is more specific
than "Re: Contents of powerh-l digest..."
r============================ DISCLAIMER =============================
This message is intended only for the use of the person(s)
(\"Intended Recipient\") to whom it is addressed. It may contain
information, which is privileged and confidential. Accordingly
any dissemination, distribution, copying or other use of this
message or any of its content by any person other than the Intended
Recipient may constitute a breach of civil or criminal law and is
strictly prohibited. If you are not the Intended Recipient, please
contact the sender as soon as possible.
Reed Business Information Ltd. and its subsidiary companies
Tel: +44 (0)20 8652 3500
=======================================================================
------_=_NextPart_001_01C4FD58.29CEF096
Content-Type: text/html
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; charset=3Dus-ascii">
<META NAME=3D"Generator" CONTENT=3D"MS Exchange Server version 5.5.2658.2">
<TITLE>MPE/VMS command @SCRIPT</TITLE>
</HEAD>
<BODY>
<P><FONT SIZE=3D2>Hi</FONT>
</P>
<P><FONT SIZE=3D2>If you want to run a job from qdesign on MPE here is a wa=
y to do it:</FONT>
</P>
<P><FONT SIZE=3D2>;File statement</FONT>
<BR><FONT SIZE=3D2>file JOBFIL designer open 2 append exclusive need all; (=
contain item JF-LINE cha*80)</FONT>
</P>
<P><FONT SIZE=3D2>procedure designer Doh</FONT>
<BR><FONT SIZE=3D2> close JOBFIL</FONT>
<BR><FONT SIZE=3D2> run command "purge jobfil" on error con=
tinue nowarn</FONT>
<BR><FONT SIZE=3D2> run command "PURGE JOBFIL,TEMP" on erro=
r continue nowarn</FONT>
<BR><FONT SIZE=3D2> run command "BUILD JOBFIL;rec=3D-80,,f,ascii=
;temp"</FONT>
</P>
<P><FONT SIZE=3D2> let JF-LINE =3D "!JOB " + W-JOBNAVN + &q=
uot;," + Logonid + "," &</FONT>
<BR><FONT SIZE=3D2> &n=
bsp; + truncate(Signongroup) + ";O=
UTCLASS=3DLP,8"</FONT>
<BR><FONT SIZE=3D2> put jobfil reset</FONT>
<BR><FONT SIZE=3D2> let JF-LINE =3D "! your commands....."<=
/FONT>
<BR><FONT SIZE=3D2> put JOBFIL reset</FONT>
<BR><FONT SIZE=3D2> let JF-LINE =3D "! your commands....."<=
/FONT>
<BR><FONT SIZE=3D2> put JOBFIL reset</FONT>
<BR><FONT SIZE=3D2> let JF-LINE =3D "!eoj"</FONT>
<BR><FONT SIZE=3D2> put JOBFIL reset</FONT>
<BR><FONT SIZE=3D2> close JOBFIL</FONT>
<BR><FONT SIZE=3D2> info =3D "# " now</FONT>
<BR><FONT SIZE=3D2> run command "stream jobfil"</FONT>
<BR><FONT SIZE=3D2> return</FONT>
<BR><FONT SIZE=3D2>end</FONT>
</P>
<BR>
<P><FONT SIZE=3D2>Kind Regards</FONT>
</P>
<P><FONT SIZE=3D2>Mikael Olesen</FONT>
</P>
<P><FONT SIZE=3D2>_______________________________</FONT>
<BR><FONT SIZE=3D2>Mikael Olesen </FONT>
<BR><FONT SIZE=3D2>Analyst Programmer</FONT>
<BR><FONT SIZE=3D2>Quadrant Subscription Services</FONT>
<BR><FONT SIZE=3D2>tel: 01444 445340</FONT>
<BR><FONT SIZE=3D2>email: mikael.olesen@qss-uk.com </FONT>
</P>
<BR>
<BR>
<BR>
<BR>
<P><FONT SIZE=3D2>-----Original Message-----</FONT>
<BR><FONT SIZE=3D2>From: powerh-l-admin@lists.sowder.com [<A HREF=3D"mailto=
:powerh-l-admin@lists.sowder.com">mailto:powerh-l-admin@lists.sowder.com</A=
>] On Behalf Of powerh-l-request@lists.sowder.com</FONT></P>
<P><FONT SIZE=3D2>Sent: 18 January 2005 12:10</FONT>
<BR><FONT SIZE=3D2>To: powerh-l@lists.sowder.com</FONT>
<BR><FONT SIZE=3D2>Subject: powerh-l digest, Vol 1 #1202 - 1 msg</FONT>
</P>
<BR>
<P><FONT SIZE=3D2>Send powerh-l mailing list submissions to</FONT>
<BR> <FONT SIZE=3D2>powerh-l@list=
s.sowder.com</FONT>
</P>
<P><FONT SIZE=3D2>To subscribe or unsubscribe via the World Wide Web, visit=
</FONT>
<BR> <FONT SIZE=3D2><A HREF=3D"ht=
tp://lists.sowder.com/mailman/listinfo/powerh-l" TARGET=3D"_blank">http://l=
ists.sowder.com/mailman/listinfo/powerh-l</A></FONT>
<BR><FONT SIZE=3D2>or, via email, send a message with subject or body 'help=
' to</FONT>
<BR> <FONT SIZE=3D2>powerh-l-requ=
est@lists.sowder.com</FONT>
</P>
<P><FONT SIZE=3D2>You can reach the person managing the list at</FONT>
<BR> <FONT SIZE=3D2>powerh-l-admi=
n@lists.sowder.com</FONT>
</P>
<P><FONT SIZE=3D2>When replying, please edit your Subject line so it is mor=
e specific</FONT>
<BR><FONT SIZE=3D2>than "Re: Contents of powerh-l digest..."</FON=
T>
</P>
<FONT SIZE=3D3><BR>
<BR>
r=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D DISCLAIMER =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D<BR>
This message is intended only for the use of the person(s) <BR>
(\"Intended Recipient\") to whom it is addressed. It may contain <BR>
information, which is privileged and confidential. Accordingly <BR>
any dissemination, distribution, copying or other use of this <BR>
message or any of its content by any person other than the Intended <BR>
Recipient may constitute a breach of civil or criminal law and is <BR>
strictly prohibited. If you are not the Intended Recipient, please <BR>
contact the sender as soon as possible.<BR>
<BR>
Reed Business Information Ltd. and its subsidiary companies<BR>
Tel: +44 (0)20 8652 3500<BR>
<BR>
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D <BR>
<BR>
</FONT>
</BODY>
</HTML>
------_=_NextPart_001_01C4FD58.29CEF096--