Backup do Banco ou Backup de um File

O Adabas tem um utilitario chamado ADASAV que faz backup do banco ou de um file

Backup do Banco Todo

MEMBER=AAFPSAVE 000014 REC SAVE:17.02.2008 08:44 BY USERID AA99001 R=00000001
DSN=AAB.ADABAS.JCLS LIB=S3 VOL=PRL303 UNIT=1024
....+....1....+....2....+....3....+....4....+....5....+....6
//AAFPSAVE JOB (AAFP,DIBD),ADABAS,CLASS=7,MSGCLASS=A TYPRUN=HOLD
//*UQ ALLOW
//* ------------------------------------------------------------
//* SALVAR FILE EM CARTUCHO
//* ------------------------------------------------------------
//SAVE EXEC ADABAS001,TIME=1440
//DDSAVE1 DD DSN=AAF.C.SAVE.F297.F299.PODE.LIBERAR,
// DISP=(NEW,KEEP),UNIT=TP35,LABEL=(1,SL)
//* -------------------------------------------------------------
//DDCARD DD *
ADARUN PROG=ADASAV,DBID=001
//DDKARTE DD *
ADASAV SAVE
/*

Backup de um file (ou n. files)

MEMBER=AAFPSAVE 000014 REC SAVE:17.02.2008 08:44 BY USERID AA99001 R=00000001
DSN=AAB.ADABAS.JCLS LIB=S3 VOL=PRL303 UNIT=1024
....+....1....+....2....+....3....+....4....+....5....+....6
//AAFPSAVE JOB (AAFP,DIBD),ADABAS,CLASS=7,MSGCLASS=A TYPRUN=HOLD
//*UQ ALLOW
//* ------------------------------------------------------------
//* SALVAR FILE EM CARTUCHO
//* ------------------------------------------------------------
//SAVE EXEC ADABAS001,TIME=1440
//DDSAVE1 DD DSN=AAF.C.SAVE.F297.F299.PODE.LIBERAR,
// DISP=(NEW,KEEP),UNIT=TP35,LABEL=(1,SL)
//* -------------------------------------------------------------
//DDCARD DD *
ADARUN PROG=ADASAV,DBID=001
//DDKARTE DD *
ADASAV SAVE FILE=297,299,299,UTYPE=EXU
/*

A diferença dos dois é que um tem a lista de file e o outro não, a que não tem o JCL vai fazer o backup do banco inteiro e a que tem só vai fazer backup dos files que estão descritos;

ADASAV SAVE
ADASAV SAVE FILE=297,299,299,UTYPE=EXU 

Observação

Ninguem pode estar usando o file senão abend o job, ou lock o file ou tire o banco do ar.

Categories: Adabas, Adabas 7.4.4