RE: Backup cl-program question

["Ingvaldson, Scott" <SIngvaldson@xxxxxxxxxxxx>]

I'm curious why you would omit QUSRSYS, /QIBM/ProdData and
/QOpenSys/QIBM/ProdData?

I would recommend doing the SAVDLO before the SAV for the same reason as Al,
if someone unfamiliar with your system has to do the restore that is what
they would expect.  (For the same reason I wouldn't recommend omitting
QUSRSYS, /QIBM/ProdData and /QOpenSys/QIBM/ProdData.)

As far as locked files go you need to look at them and see what they are.
You should do ENDTCPSVR SERVER(*MGTC) before a SAVLIB of QUSRSYS and
STRTCPSVR SERVER(*MGTC) after.  

The IFS SAV is trickier.  Apache HTTP servers will have a couple of log
files each that are locked.  So will WebSphere application servers.  Domino
servers will have many locked files.  FAX/400 will lock one object for each
receiver job, but it is only an empty file waiting for an incoming fax so it
can be omitted pretty safely.  Look at the objects that you receive the lock
messages for and determine if a.) that object can be ommitted from the
backup, or b.) the job that has the lock should be ended before the SAV and
restarted after.  If you use the SAVACTMSGQ you can monitor it for the sync
message and restart your jobs while the SAV is still running.


Hope this helps,

Scott Ingvaldson
AS/400 System Administrator
GuideOne Insurance Group

"Remember, Only YOU Can Prevent Forest Fires!"
                                                -- Smokey Bear 

-----Original Message-----
date: Thu, 17 Jun 2004 08:34:26 +0200
from: Jan.Rockstedt@xxxxxxxxxxxx
subject: RE: Backup cl-program question

Why should i do the savdlo before the sav?

I have the sav command now in my clp.
But there is many lock files in the joblog.

Should i use the option SAVACT(*YES) for the SAV command or should i use a 
monmsg on there error?

My clp now:

SAVCFG     DEV(TAP01) ENDOPT(*LEAVE) 
SAVSECDTA  DEV(TAP01) ENDOPT(*LEAVE) 
SAVLIB     LIB(*ALLUSR) DEV(TAP01) ENDOPT(*LEAVE) + 
             SAVACT(*NO) ACCPTH(*YES) OMITLIB(QMPGDATA +
             QPFRDATA QUSRSYS) 
SAVDLO     DLO(*ALL) DEV(TAP01) ENDOPT(*LEAVE) 
SAV        DEV('QSYS.LIB/TAP01.DEVD') OBJ(('/*') + 
             ('/QSYS.LIB' *OMIT) ('/QDLS' *OMIT) + 
             ('/QIBM/ProdData' *OMIT) + 
             ('/QOpenSys/QIBM/ProdData' *OMIT)) + 
             SAVACT(*YES) ENDOPT(*UNLOAD) UPDHST(*YES) 

Mvh / Regards Jan Rockstedt
HSB Syd IT
Spangatan 37B, 2:a van.
211 53 Malmo Sweden
Phone: +46-40 - 668 07 45
Fax: +46-40-668 07 55
www.sydit.hsb.se
   
This message and accompanying documents are covered by the Electronic
Communications Privacy Act, 18 U.S.C. §§ 2510-2521, and contains information
intended for the specified individual(s) only. This information is
confidential. If you are not the intended recipient or an agent responsible
for delivering it to the intended recipient, you are hereby notified that
you have received this document in error and that any review, dissemination,
copying, or the taking of any action based on the contents of this
information is strictly prohibited. If you have received this communication
in error, please notify us immediately by e-mail, and delete the original
message.