topic Re: OpenVMS and Backup Script in Operating System - OpenVMS

OpenVMS and Backup Script

Ryan Frillman — Tue, 21 Feb 2006 15:01:40 GMT

I want to be able to write a script that would sit in a queue and automatically run daily, weekly, and monthly backups. I don't know how to determine which day is the end of the week and which day is the beginning of the month. Does anyone have a script that I could follow?

Re: OpenVMS and Backup Script

Uwe Zessin — Tue, 21 Feb 2006 15:19:53 GMT

No scripts, but a short example:

$ w = F$CVTIME (F$TIME(),,"WEEKDAY")
$ show symbol w
W = "Tuesday"
$

A month does always begin with day 1, no?

$ d = F$CVTIME (F$TIME(),,"DAY")
$ show symbol d
D = "21"
$

Re: OpenVMS and Backup Script

Steven Schweda — Tue, 21 Feb 2006 15:21:02 GMT

You could have it run every day, and check
for day of month = 1, and day of week = X,
where X is your "end of the week" day. For
example:

$ write sys$output F$CVTIME( "", , "DAY")
21

$ write sys$output F$CVTIME( "", , "WEEKDAY")
Tuesday

See "HELP LEXICALS F$CVTIME".

Running every day can be done by having the
procedure re-SUBMIT itself with an
appropriate /AFTER option. For example, to
run again tomorrow at 00:10:00, add code
like this to the end of the procedure:

$!
$! Re-submit the latest version of this procedure.
$!
$ CPR = F$ENVIRONMENT( "PROCEDURE")
$ CPR = CPR- F$PARSE( CPR, , , "VERSION")
$!
$ IF (CPR .NES. "")
$ THEN
$ SUBMIT -
/AFTER = "TOMORROW+ 00:10:00" -
/NOPRINTER -
'CPR'
$ ENDIF

(Of course, the real thing has better
indentation than you can see here.)

I have a SYS$MANAGER:DAILY.COM which does a
few things, like:

Submit the daily incremental BACKUP job.
Run a procedure to check for nearly full disks.
Purge some useless log files.
Et c.

Re: OpenVMS and Backup Script

Phillip Thayer — Tue, 21 Feb 2006 16:04:50 GMT

Another quick way to get the current day is:

f$element(2,"-",f$element(0," ",f$cvtime()))

I use this all the time and it works great.

Phil

Re: OpenVMS and Backup Script

Ryan Frillman — Tue, 21 Feb 2006 17:49:49 GMT

Is there any way I could see that SYS$MANAGER:DAILY.COM script just the daily backup part not all the rest.

Re: OpenVMS and Backup Script

Phillip Thayer — Tue, 21 Feb 2006 18:12:36 GMT

There is no way to do this from the BACKUP command only. You will have to have a "driver" DCL script that determines what day it is and then executes (with @SYS$MANAGER:DAILY) the daily script during the weekdays, executes (with @SYS$MANAGER:WEEKLY) the weekly script when it is a weekend, using the F$CVTIME (F$TIME(),,"WEEKDAY", to determine if it is the day you want to run the weekly backups and then a check for the day of the month to determine it it is the first of the month (or whatever day of the month) for the monthly backups and executes the (with @SYS$MANAGER:MONTHLY) the monthly backups.

I would say check for the Monthly backup first, then weekly and then daily.

Phil

Re: OpenVMS and Backup Script

Steven Schweda — Tue, 21 Feb 2006 19:22:43 GMT

> Is there any way I could see [...]

Well, the BACKUP part is just this (again,
with better indentation):

$!
$! Nightly incremental BACKUP.
$!
$ CPR := HOME_BACKUP:[BACKUP]INCR.COM
$ CPRF = F$SEARCH( CPR)
$ IF (CPRF .NES. "")
$ THEN
$!
$ LOG = CPRF- -
F$PARSE( CPRF, , , "VERSION")- F$PARSE( CPRF, , , "TYPE")+ ".LOG"
$!
$ SUBMIT -
/AFTER = 01:10 -
/LOG = 'LOG' -
/NOPRINTER -
/USER = BACKUP -
'CPR'
$!
$ PURGE /KEEP = 31 'LOG'
$!
$ ENDIF
$!

So, my daily incremental BACKUP jobs start
at about 1:10 every day. If you'd like any
additional stuff, send some e-mail to
sms@antinode-org (roughly).

Re: OpenVMS and Backup Script

Klaes-Göran Carlsson — Wed, 22 Feb 2006 03:31:18 GMT

Hi

Attached a part of my backup routine, maybee you can pick out some dcl-code from it.

/Klaes-Goran

Re: OpenVMS and Backup Script

Jan van den Ende — Wed, 22 Feb 2006 05:29:25 GMT

Steven wrote:

"
For example, to
run again tomorrow at 00:10:00, add code
like this to the end of the procedure:

"

I do MUCH prefer to put the re-submitting code at the BEGINNING of any repeating batch jobs!

This guarantees, that regardless of ANY things happening during the run, the next run will be in the queue.

hth

Proost.

Have one on me.

jpe

Re: OpenVMS and Backup Script

Steven Schweda — Wed, 22 Feb 2006 08:32:46 GMT

> I do MUCH prefer to put the re-submitting
> code at the BEGINNING of any repeating
> batch jobs!

The BEGINNING of my DAILY.COM looks like THIS:

$!
$! Daily tasks. Run once per day.
$!
$ SET NOON
$!

> This guarantees, that regardless of ANY
> things happening during the run, the next
> run will be in the queue.

It's a rare problem which has but one
solution.

When I first started using VMS, I was often
puzzled by the significance of 12:00 PM, but
eventually I figured it out.

Re: OpenVMS and Backup Script

Ruud Dijt — Wed, 22 Feb 2006 08:41:08 GMT

I have 'made' a set off utilities more than 10 years ago, determining all the facts about a certain date; they know about day ofv the week, weekends and hollidays; beginning and ending off a month and quarter
self explaining, parameter parsing, almost like a lexical function; You can use them within amother dcl script, that can start off the backups selectively; let me know if yoy like to get them zipped.

F$FIRSTWORKDAY.COM;4
F$HOLIDAY.COM;14
F$JULIAN.COM;12
F$JULIAN_DATE.COM;3
F$KWARTAALNUM.COM;4
F$KWARTAAL_DATES.COM;4
F$LASTWORKDAY.COM;4
F$NEXTWORKDAY.COM;5
F$NODE_NAME.COM;1
F$PASEN.COM;11
F$PREVWORKDAY.COM;7
F$WEEKDAGNUM.COM;4
F$WEEKNUM.COM;4
F$WORKABLEDAYS.COM;7
F$WORKDAY.COM;7
F$WORKDAYNO.COM;5

Re: OpenVMS and Backup Script

Ian Miller. — Wed, 22 Feb 2006 09:15:23 GMT

Parhaps you would add your dcl to the archive at dcl.openvms.org?

For more complex scheduling there are various commercial products.

Re: OpenVMS and Backup Script

Ryan Frillman — Thu, 23 Feb 2006 09:28:28 GMT

Yeah that would be great to have those scripts. Could you please zip them? Thanks everyone for the great responses

Re: OpenVMS and Backup Script

Klaes-Göran Carlsson — Fri, 24 Feb 2006 05:44:10 GMT

Wow, that was my first 10 point! TY
Attached script for incremental backups, could be useful for copy/paste...more points? :)