Yes, actually the very next command was SHOWVAR CIERROR, then the EOJ.
Dan Barnes ..:.. LCI-Lawinger Consulting
106 Central Avenue, Suite A ..:.. Osseo, MN, 55369-1243
Tel: 763-425-1639 ..:.. Fax: 763-425-5483 ..:.. Cell: 612-240-2136 ..:.. Pager: 952-394-0132
[log in to unmask] ..:.. [log in to unmask]
-----Original Message-----
From: Jack Connor [mailto:[log in to unmask]]
Sent: Wednesday, April 06, 2011 12:28 PM
To: Dan Barnes; [log in to unmask]
Subject: RE: [HP3000-L] Continue before DSCopy
Dan,
It looks like the DSCOPY with the continue functioned as expected. There error came on the next statement, and :EOJ which would have queried the JCW at that point and determined the job had an error somewhere in the flow.
Not sure why the dual EOJ commands are there.
jack
-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On Behalf Of Dan Barnes
Sent: Wednesday, April 06, 2011 1:15 PM
To: [log in to unmask]
Subject: [HP3000-L] Continue before DSCopy
Hi Gang,
I had a user come to me with what you see below. This is a 7.0 PP2 system. He was asking why, with a CONTINUE in front of the DSCOPY, it still aborted. I tried searching the -L Archives but have found nothing there. Oh, and BTW, there is only 1 :EOJ in the JCL, so I am not sure where the one immediately before the 'Program terminated' message came from.
TIA,
Dan
2 :JOB EDIJOB,JOB.DDPDEV,JOB.
3 Priority = DS; Inpri = 8; Time = UNLIMITED seconds.
4 Job number = #j7024.
5 WED, APR 6, 2011, 9:08 AM.
6 HP3000 Release: C.70.00 User Version: C.70.02
7 MPE/iX HP31900 C.39.06 Copyright Hewlett-Packard 1987.
8 All rights reserved.
9 STREAMED BY A2GXCZZ,MGR.DDPDEV (#S233) ON LDEV# 86
10 STREAM DATE: WED, APR 6, 2011, 9:08 AM
11 ******* .&dCWARNING.&d@ *******
12 YOU HAVE CONNECTED TO A PRIVATE COMPUTER SYSTEM.
13 UNAUTHORIZED ACCESS BEYOND THIS POINT IS NOT PERMITTED.
14 VIOLATORS WILL BE PROSECUTED TO THE FULLEST EXTENT
15 ALLOWED BY LOCAL, STATE, AND FEDERAL LAWS.
16 ------------------------------ HP1609 ------------------------------
17 Tech Services 7.0 Development and COGNOS server
18
19
20 END OF PROGRAM
22 MPE/iX C.70.00
23 ElectroPage now enabled in this session.
25 #J7024 EDIJOB,JOB.DDPDEV,JOB LDEV:10 @ 9:08 AM, WED, APR 6, 2011
26 DDPDEV .&dJMDCS -- 30 Development system for Final Release 30 of MDCS
27 DDPDEV .&dJPMCS -- 25 Development system for Final Release 25 of PMCS
28 DDPDEV .&dJOPRA 06.3.00 Development system for Next Release 06.3.00 of OPRA
29 :SHOWVAR HPDOY
30 HPDOY = 96
31 :SETVAR EDFL ("EDFL" + "!HPDOY")
32 :SHOWVAR EDFL
33 EDFL = EDFL96
34 :HISTORY !EDFL
35 File does not exist - No history done
36 :CONTINUE
37 :DSCOPY EDIFINL.DATABASE;!EDFL;MOVE
38 Source file: EDIFINL.DATABASE.DDPDEV
39 NONEXISTENT PERMANENT FILE (FSERR 52)
40 SOURCE FILE WAS NOT FOUND. (NS/NFTERR 9)
41
42 :EOJ
43 Program terminated in an error state. (CIERR 976)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
44 :EOJ
45 CPU sec. = 1. elapsed min. = 1. WED, APR 6, 2011, 9:08 AM.
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
Call us today about our Windows consulting for monthly support services, plus configurations and migrations.
CONFIDENTIALITY NOTICE: This communication with its contents may contain confidential information. It is solely for the use of the intended recipient(s). Unauthorized interception, review, use or disclosure is prohibited and may violate applicable laws including the Electronic Communications Privacy Act. If you are not the intended recipient, please contact the sender and destroy all copies of the communication.
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
