John,
RE: INTRDR - You mean something boring like this?
todsn //intrdr <<EOF
//${LOGNAME}A JOB (),'Kirk'
// EXEC PGM=IEFBR14
//
EOF
if you are truly a "wierdo" -
set -o pipecurrent # rqd for | read
# set some new JES symbols
jessym -c DSN1=MY.FOO.IN <http://my.foo.in/> DSN2=MY.FOO.OUT
# submit a job, passing all JES symbols, and get the jobid
todsn -x "symlist(*)" //intrdr | read x jobid <<EOF
//${LOGNAME}A JOB (),'Kirk'
...
//
EOF
echo "JOB $jobid submitted"
# wait a bit for the job to run
i=0
while [[ i -lt 20 ]]; do
lsjes -t -i $jobid | read x jobname x phase x compl
# lsjes outputs a line like:
# JOBnnnn JOBNAME USERID PHASE CLASS RC=XXXX
if [[ "$phase" == "OUTPUT" ]]; then
echo "JOB $jobname($jobid) completed $compl"
# grab one of the job's spool files and print it to stdout
# or maybe your want to use awk/grep/sed to process it?
fromdsn -JES.$jobid.JESJCL
break
fi
let i=i+1
sleep 2
done
Kirk Wolf
Dovetailed Technologies
http://dovetail.com
On Thu, Nov 13, 2014 at 1:17 PM, John McKown <[email protected]>
wrote:
> ....
>
> Being a "weirdo", what I would like is for /dev/console to be
> "bidirectional". It is currently "write only" and routes the data written
> to it to the MVS SYSLOG. I wish that it could be read from to do the
> reverse. That is, when a line goes out the the MVS SYSLOG, the data would
> also be written to /dev/console. But in such a way that the data would not
> be "buffered", like in a FIFO which can cause the writer to wait, but only
> sent to whomever had a READ operation "waiting" on /dev/console.
> And while I'm waiting for that, I will again put in my request for a
> "/dev/intrdr" as well so that I can __easily__ submit a job from a normal
> shell script instead of being forced to do it in REXX.
>
> --
> The temperature of the aqueous content of an unremittingly ogled
> culinary vessel will not achieve 100 degrees on the Celsius scale.
>
> Maranatha! <><
> John McKown
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
