Subject: | |
From: | |
Reply To: | |
Date: | Wed, 31 Oct 2007 17:12:09 -0500 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
I have a command file that might help, it currently only looks at the $STDLIST of a job number passed to it. It could modified to look at other spool files for a job/session.
USER DEFINED COMMAND FILE: JLIST.UTIL.SYS
Parm jobnum='#' ldev='00'
SETVAR HPAUTOCONT TRUE
Setvar _jobnum '!jobnum'
If '!_jobnum' = '#' Then
Setvar _jobnum str(HPLASTJOB,3,![len(HPLASTJOB)] - 2)
Endif
Setvar hpcierr 0
Spoolf o@;seleq=[(jobnum=j!_jobnum) and (filedes=$stdlist)];show > $null
If hpcierr > 0
Echo !hpcierrmsg
return
Endif
SETVAR HPLASTJOB '#J!_jobnum'
IF FINFO('!HPLASTSPID.OUT.HPSPOOL','EXISTS') = FALSE
echo Standard list for job #J!_jobnum doesn't exist!
return
Endif
setvar _mpecmd 'print '+'!HPLASTSPID'+'.out.hpspool;PAGE=0'
If '!ldev' = '00'
echo !_mpecmd
!_mpecmd
Else
File jlist;dev=!ldev
!_mpecmd >*jlist
Endif
:
--
Michael Anderson
Programmer/Analyst -- Technology Dept.
Spring Independent School District
16717 Ella Boulevard
Houston, Texas 77090-4299
office: 832.764.4231
Mobile: 832.515.3868
fax: 281.586.1187
-
>>> mag <[log in to unmask]> 10/31/2007 11:57 am >>>
hi,
I ran a vstore command against a tape and set the output to a line printer. I
dont want to print it, but I want to browse the #0xxxxxx file. I don't
remember how in the world to do this? I would appreciate it!
thanks a lot!
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
|
|