MPE CI Programming for 7.5

July 22, 2008
Page 55
hp e3000
strategy
printing spoolfiles
PRINTSP script:
PARM job=!HPLASTJOB
# Prints spoolfile for a job, default is the last job you streamed
if !job = “” then
echo No job to print
return
endif
setvar hplastjob !job
if hplastspid = “” then
echo No $STDLIST spoolfile to print for !job”.
return
endif
print !HPLASTSPID.out.hpspool
:stream scopejob
#J324
:printsp
:JOB SCOPEJOB,MANAGER.SYS,SCOPE.
Priority = DS; Inpri = 8; Time = UNLIMITED seconds . . .