Leonard,
Why the ALTGROUP command?
regards,
Robert
-----Original Message-----
From: Leonard S. Berkowitz [mailto:[log in to unmask]]
Sent: 11 September 2001 16:46
To: [log in to unmask]
Subject: Re: Exiting a job before EOJ
We use this in backups as well as in jobs to restore data bases to other
systems. We have code for every data base of concern. Here is one example,
from a restore job. Store works the same way:
!RUN MAIN.PUB.VESOFT,MPEX;PARM=1;INFO=&
! "LISTF ACCTNG.DATA.AMISYS(OPENED),ACCESS"
!IF MPEXNUMSUCCEEDED > 0 THEN
! ALTGROUP DATA.AMISYS;ACCESS=(R,W,A,L,X,S:ANY)
! TELLOP !HPJOBNAME CANNOT CONTINUE
! TELLOP !HPJOBNUM WILL ABORT; ACCTNG DATA BASE OPEN
! ESCAPE
!ELSE
===================
Leonard S. Berkowitz
Perot Health Care Systems
(Harvard Pilgrim Health Care account)
voice: 617-509-1212
fax: 617-509-3737
pager: 781-226-2431
John Bawden <[log in to unmask]> on 09/11/2001 11:27:10 AM
Please respond to John Bawden <[log in to unmask]>
To: [log in to unmask]
cc: (bcc: Leonard Berkowitz/CORP/HPHC)
Subject [HP3000-L] Exiting a job before EOJ
:
Fellow listers,
I'm looking for a way to exit a store job before
starting the store operations if someone is accessing
a database. I've got MPEX LISTF ..., ACCESS to check
but have gone brain dead on how to end the job if
MPEXNUMSUCCEEDS > 0. Any help is appreciated.
John
__________________________________________________
Do You Yahoo!?
Get email alerts & NEW webcam video instant messaging with Yahoo! Messenger
http://im.yahoo.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 *
|