RE: Automating backups - the solution!

[DaleGindlesperger@xxxxxxxxxxx]

HI everyone,

First, thanks to everyone for their suggestions.  This thread is excellent!
I wrote a CL that runs in batch (scheduled through the OS/400 Job
Scheduler) that reproduces the same thing that the MAPICS Copy disk backup
to tape option creates.  I tested it, then ran a restore to my test
environment using the created tape - no problems.  If anyone is interested,
here is the VERY simple CL that handles this, with also creating a DSPTAP
catalog that also satisfies the SARBOX people.

======================================================================

PGM

INZTAP     DEV(TAP04) NEWVOL(MSM001) NEWOWNID(FLTWOOD) +
             CHECK(*NO) /* Initialize tape */

SAVSAVFDTA SAVF(AMSLIB/SVDTAABCKM) DEV(TAP04) +
             ENDOPT(*LEAVE)

SAVSAVFDTA SAVF(AMSLIB/AMFBCKM) DEV(TAP04) +
             ENDOPT(*LEAVE) /* Save AMFLIB */

SAVSAVFDTA SAVF(AMSLIB/AMTBCKM) DEV(TAP04) +
             ENDOPT(*LEAVE) /* Save AMTLIB */

SAVSAVFDTA SAVF(AMSLIB/ZSVCTLBCKM) DEV(TAP04) +
             ENDOPT(*REWIND)

DSPTAP     DEV(TAP04) OUTPUT(*PRINT) ENDOPT(*UNLOAD) /* +
             Generate tape directory listing */

ENDPGM

===================================================================

The DSPTAP that this generates is identical to what you get when you do one
after the canned MAPICS interactive job.  It'd be nice if MAPICS would
swipe this, put their required stuff in it, and add it to their backup
menu.  Or possibly put it in e:Info for people that aren't on this thread
to have access to....  (hint hint).

Dale Gindlesperger
IT Manager/Special Projects Leader
Fleetwood Folding Trailers, Inc.
258 Beacon Street
Somerset, PA  15501