WRT QMNSRBND: YES that's the program but retrieving it will get you vastly more code than needed for a Save 21. It contains all the options for the save and restore menu with LOTS of conditioning and because you're getting the source from RTVCLSRC (note the program is DBCS) you get no comments, no indenting, and no spaces and still it's 460 lines long.

As a simpler way to see the important bits of what happens in a SAVE 21 simply GO SAVE put 21 on the command line and hit HELP. The important commands are right there and can be copied to a source member. You must add the DEV parm to those commands and of course any delays, MONMSG, etc.

Not saying you can't learn from the QMNSRBND program but ferreting out which parts of that are needed for the SAVE 21 isn't 'Intuitively obvious to the most casual observer' :-)

- Larry "DrFranken" Bolhuis


On 4/1/2014 4:51 PM, Charles Wilt wrote:

Why isn't the up to 24hr delay of GO SAVE good enough?

That automatically shuts down into restricted state.

Personally, I do a RTVCLSRC on QMNSRBND, that's where the option 21 - Save
entire System is done.

I call it SAVESYSTEM, added some code to cleaning shut down our system jobs
and and built a command front end for it.

You'll want to also want to remove the parm and add

You end up with a program that display's the save entire system screen, and
you can specify the time to start.


On Tue, Apr 1, 2014 at 4:29 PM, John McKee <jmmckee@xxxxxxxxxxxxxx> wrote:

Still riding system to oblivion. We >may< be losing our only opportunity
for an attended backup every other week. I have been asked to explore

No money.

I read in Infocenter that GO SAVE 21 has a capability to be set up to 24
hours in the future. Not a scheduled job, just sits in DLYJOB. The
thought occurred to me of writing a CL that would be submitted to
controlling subsystem (BCTL in our case) which would end to restricted
state and perform backup. Just a little afraid of that. If something
failed, with no workstation available, how could anybody know?

I retrieved the source for the GO SAVE 21 CLP, QMNSAVE. Two parms are
passed, &DFT and &CANCEL DFT has a length of 118, but the defaults data
area has a length of 200. I am assuming that is just a quirk, as the data
area is blank beyond 120 or so.

It looks like the CaNCEL parm is populated and sent back.

I am thinking that this retrieved source could be modified to have no
parameters. Just do RTVDTAARA and run the commands. Add an appropriate
DLYJOB at the top so it could be started from the console and it would wait
until the appropriate time. Would need to also end the online system
before subsystems are ended. I have that code already.

Final piece is to get the media library to pull tapes as needed. I presume
the changes to accomplish that are made through the front panel? This is
3590 E11.

Gets a bit more confusing: We have a single 3590. yet a WRKCFGSTS *DEV
TAP* shows:


TAPMLB01 was created by auto config. It shows device type 3590 E11. This
shows resource of TAP01 deallocated.

TAPMLB02 has *RSRCNAME for device type and model. No resources listed.

Can't vary on TAPMLB02 after vary off of TAP35. I am not surprised, based
on no resoueces.

I do not know why there are two MLBs. My thought is both are "incorrect".
Many years ago, there was a TAP01.

Ran WRKHDWRSC TYPE(*STG), TAPMLB01 is only tape library.

Was media library even set up correctly? It has never been used, as far as
I know.

I can add config source if it will make any sense.

John McKee
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

This thread ...


Return to Archive home page | Return to MIDRANGE.COM home page