Re: Automate a full system save in a CL

["Larry \"DrFranken\" Bolhuis" <midrange@xxxxxxxxxxxx>]

The only issue this WOULD create is if you tried to do a full system 
recovery their would be multiples of some things on the tape, like 
security and config. :-)  Clearly not fatal but could be confusing.
	- L

On 11/2/2021 1:49 PM, Jim Oberholtzer wrote:
> Those are included in SAVSYS.
> Doing them again hurts nothing but takes time/tape.
>
> --
> Jim Oberholtzer
> Chief Technical Architect
> Agile Technology Architects
>
>
> On Tue, Nov 2, 2021 at 12:26 PM Jerry Draper <midrangel@xxxxxxxxxxxxx>
> wrote:
>
> >     Be sure to add:
> >
> >     SAVSECDTA
> >
> >     SAVCFG
> >
> >     or is that in one of these other SAV*?
> >
> >     Jerry
> >     On 11/2/2021 8:44 AM, Gmail wrote:
> >
> >       PGM
> >                    ENDHOSTSVR SERVER(*ALL)
> >                    ENDTCPSVR  SERVER(*ALL)
> >                    MONMSG     MSGID(TCP1A77)
> >                    DLYJOB     DLY(300)
> >                    ENDTCP     OPTION(*IMMED)
> >                    MONMSG     MSGID(TCP1A13 TCP1A70 TCP1A72 TCP1A77)
> >                    ENDSBS     SBS(*ALL) OPTION(*IMMED) BCHTIMLMT(120)
> >                    MONMSG     MSGID(CPF0000)
> >                    DLYJOB     DLY(180)
> >                    VRYCFG     CFGOBJ(TAP01) CFGTYPE(*DEV) STATUS(*ON)
> >                    MONMSG     MSGID(CPF26B6 CPF26B7 CPF262F CPF2640 +
> >                                 CPF2659) EXEC(GOTO CMDLBL(RESTART))
> >                    SAVSYS     DEV(TAP01) ENDOPT(*LEAVE) CLEAR(*ALL) +
> >                                 DTACPR(*DEV)
> >                    SAVLIB     LIB(*NONSYS) DEV(TAP01) ENDOPT(*LEAVE) +
> >                                 CLEAR(*ALL) ACCPTH(*YES) SPLFDTA(*ALL)
> >                    SAVDLO     DLO(*ALL) DEV(TAP01) ENDOPT(*LEAVE)
> >                    SAV        DEV('/qsys.lib/tap01.devd') OBJ(('/*') +
> >                                 ('/qsys.lib' *OMIT) ('/qdls' *OMIT)) +
> >                                 ENDOPT(*UNLOAD) UPDHST(*YES) CLEAR(*ALL)
> >
> >        RESTART:    STRSBS SBSD(QCTL)
> >
> >                    ENDPGM
> >
> >       Il 01/11/2021 22:13, Danner, Duane ha scritto:
> >
> >         Looking for an example of automating a full system save thru a CL if
> >         possible.
> >
> >         Thanks
> >
> >         Duane Danner
> >         Avery Weigh-Tronix
> >
> >   --
> >   Jerry Draper, Trilobyte Software Systems, since 1976
> >   IBM I, Network, and Connectivity Specialists, LAN/WAN/VPN
> >   Representing WinTronix, Synapse, HiT, and others .....
> >   (415) 457-3431 . [1]www.trilosoft.com
> >
> > References
> >
> >     Visible links
> >     1. http://www.trilosoft.com/
> > --
> > This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> > To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: https://lists.midrange.com/mailman/listinfo/midrange-l
> > or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at https://archive.midrange.com/midrange-l.
> >
> > Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> > questions.
> >
> > Help support midrange.com by shopping at amazon.com with our affiliate
> > link: https://amazon.midrange.com