Sample Archive log command file for VMS

Sample Archive log command file for VMS:
----------------------------------------
$ dup = "backup/ignore=(noback,interl,label)/log"
$ sqldba
CONNECT INTERNAL
alter tablespace system begin backup;
exit
$ dup u01:[oracle]ora_system.dbs tape1:ora_system.bck/sav
$ sqldba
CONNECT INTERNAL
alter tablespace system end backup;
alter tablespace appl1 begin backup;
exit
$ dup u02:[oracle]appl1.dbs tape1:appl1.bck/sav
$ sqldba
CONNECT INTERNAL
alter tablespace appl1 end backup;
exit
$!
$! get archive logs
$ rename/log u03:[oracle.arcs]*.arc *.arclogs
$ rename/log u04:[oracle.arcs2]*.arc *.arclogs !secondary arcs dir
$ sqldba
CONNECT INTERNAL
alter system switch logfile;
exit
$ dup u03:[oracle.arcs]*.arclogs,u04:[oracle.arcs2]*.arclogs
tape1:logs.bck/sav
$ del/log u03:[oracle.arcs]*.arclogs;0
$ del/log u04:[oracle.arcs2]*.arclogs;0
$!
$! get control file
$ sqldba
CONNECT INTERNAL
alter database backup controlfile to 'u01:[oracle]control.bkp' reuse;
exit
$ dup u01:[oracle]control.bkp tape1:control.bck/sav

Note: The "alter system switch logfile" command is all but undocumented,
(see pg 3-15 of the DBA guide. It refers you to a nonexistent
cross-reference). It will NOT show up in the alert log. Don't
be alarmed by that; it does actually work.