Using Chris's suggestion below you can "print" to
!HPSPOOLID to another file before the job ends. I
do this on several jobs to send an email of the stdlist
at various points of a jobs completion.
FILE OUT=MAILF.PUB.ADMIN;DEV=DISC;NOCCTL;REC=-132,,F,ASCII
PRINT !HPSPOOLID.OUT.HPSPOOL;OUT=*OUT
**************************************************
Sam Knight Phone: (904)256-7509
Sr. Programmer/Analyst Fax: (904)256-7238
Jacksonville University Web: http://www.ju.edu
Jacksonville, FL 32211
-----Original Message-----
From: Bartram, Chris (Contractor)
[mailto:[log in to unmask]]
Sent: Friday, March 14, 2003 09:53
To: [log in to unmask]
Subject: Re: [HP3000-L] Copying of Spool files to Permanant Files
The !HPSPOOLID CIVar gives you the ID of the spoolfile for your job's
$stdlist, but in quick tests, :FCOPY, :COPY, and even CP.HPBIN.SYS are
unable to open the file to copy it (at least while it's still open).
-Chris Bartram
-----Original Message-----
From: Vamsi Sudha [mailto:[log in to unmask]]
Sent: Friday, March 14, 2003 9:05 AM
To: [log in to unmask]
Subject: Re: [HP3000-L] Copying of Spool files to Permanant Files
Hi Tom..
I need to do the same in a JCL...dynamically, after the JOB has been
executed.
I need to track the same dynamically..and I am not sure of the spool file
being created
in the JCL....Please let me know...if you have any script for the same.
- VS
Tom Brandt
<tom.brandt@nort To:
[log in to unmask],
htech.com> [log in to unmask]
cc:
03/14/03 07:01 Subject: Re: Copying of
Spool files to
PM Permanant Files
If you know the name of the spool file, for example, #O123, just do:
:COPY O123.OUT.HPSPOOL,FOO
This will copy the spool file #O123 to a flat file called FOO.
At 04:38 PM 3/14/2003 +0530, Vamsi Sudha wrote:
>Hi All,
>
>Can anyone tell me a simple way to copy a Spool file being created in
>HP3000 to a flat file on the system.
>I am printing a report and this is getting spooled on the spooler. I want
>to copy the same report spool
>file to a flat file...
>Please let me know if there is any script to do the same...
>- VS
--------------------------------
Tom Brandt
Northtech Systems, Inc.
130 S. 1st Street, Suite 220
Ann Arbor, MI 48104-1343
http://www.northtech.com/
* 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 *
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
