No ambiente de produção, não basta apenas realizar o backup e verificar se o processo foi concluído com sucesso. É fundamental testar se esse backup realmente pode ser restaurado. Sempre que possível, procuro executar um teste de restauração para confirmar se o backup está íntegro e se os dados armazenados podem, de fato, ser recuperados quando houver necessidade. Afinal, um backup que foi gerado corretamente, mas que apresenta problemas no momento da restauração, pode dar uma falsa sensação de segurança. Na prática, não adianta olhar apenas para o resultado do job e verificar que terminou com RC=0 ou que o arquivo de backup foi criado. Isso confirma que o processo foi executado conforme o esperado, mas não garante, por si só, que teremos uma recuperação bem-sucedida quando precisarmos dos dados. O teste de restauração permite identificar antecipadamente possíveis problemas, como arquivos de backup corrompidos, falhas durante a gravação, inconsistências nos dados, problemas com mídias, parâmetros incorretos ou dificuldades no próprio procedimento de recuperação. Outro ponto importante é que o teste não deve validar apenas o arquivo de backup, mas todo o processo de recuperação. É necessário saber onde o backup está armazenado, como localizá-lo, quais procedimentos devem ser executados, quais parâmetros precisam ser utilizados e, principalmente, quanto tempo será necessário para concluir a restauração.
No ambiente Mainframe, onde temos sistemas e bancos de dados que permanecem em produção por muitos anos, essa validação se torna ainda mais importante. Um backup pode permanecer armazenado durante meses ou até anos, mas somente descobriremos se ele realmente é confiável quando tentarmos utilizá-lo. Por isso, considero o teste de restauração uma etapa tão importante quanto a própria execução do backup. Backup realizado é apenas o primeiro passo. Backup restaurado e validado é o que realmente nos dá confiança de que os dados poderão ser recuperados quando forem necessários. Afinal, o pior momento para descobrir que um backup não funciona é justamente quando precisamos dele para recuperar o ambiente de produção.
Esse é o layout que ficou em cada cartucho os files do banco Adabas;
Informações importantes do PLOG
Foi restaurado com sucesso
Restaurado os files
No ambiente Mainframe, onde temos sistemas e bancos de dados que permanecem em produção por muitos anos, essa validação se torna ainda mais importante. Um backup pode permanecer armazenado durante meses ou até anos, mas somente descobriremos se ele realmente é confiável quando tentarmos utilizá-lo. Por isso, considero o teste de restauração uma etapa tão importante quanto a própria execução do backup. Backup realizado é apenas o primeiro passo. Backup restaurado e validado é o que realmente nos dá confiança de que os dados poderão ser recuperados quando forem necessários. Afinal, o pior momento para descobrir que um backup não funciona é justamente quando precisamos dele para recuperar o ambiente de produção.
Backup
O backup rodou1 J E S 2 J O B L O G -- S Y S T E M C P A C -- N O
D E J E S 2
0
18.31.18 STC08609 ---- TUESDAY, 11 AUG 2026 ----
18.31.18 STC08609 IEF677I WARNING MESSAGE(S) FOR JOB ADAB0080 ISSUED
18.31.18 STC08609 IEF695I START ADAB0080 WITH JOBNAME ADAB0080 IS ASSIGNED TO USER ADA0001 , GROUP STCGRP
18.31.18 STC08609 $HASP373 ADAB0080 STARTED
18.31.18 STC08609 IEF403I ADAB0080 - STARTED - TIME=18.31.18
18.31.19 STC08609 +BACKUP DO BANCO - ADAB0080
18.31.19 STC08609 @83 REPLY C TO CONTINUE PROCESSING OR R TO REPEAT DISPLAY
18.31.21 STC08609 R 83,C
18.31.22 STC08609 *IEF233A M 089B,PRIVAT,SL,ADAB0080,SAVE, 170
170 ADABAS.C.SAVE.DB080.DIA.G4315V00
18.31.24 STC08609 IEC705I TAPE ON 089B,VC1312,SL,COMP,ADAB0080,SAVE,ADABAS.C.SAVE.DB080.DIA.G4315V00,MEDIA4
18.31.24 STC08609 ADAU14 00080 ADASAV-Run with save tape 8758
18.31.49 STC08609 IEC205I DDSAVE1,ADAB0080,SAVE,FILESEQ=1, COMPLETE VOLUME LIST, 184
184 DSN=ADABAS.C.SAVE.DB080.DIA.G4315V00,VOLS=VC1312,
184 TOTALBLOCKS=5621
18.31.51 STC08609 ADAU14 00080 ADASAV-Run with save tape 8759
18.32.06 STC08609 IEC205I DDSAVE1,ADAB0080,SAVE1,FILESEQ=2, COMPLETE VOLUME LIST, 193
193 DSN=ADABAS.C.SAVE.SIASIP.DB080.DIA.G3275V00,VOLS=VC1312,
193 TOTALBLOCKS=5621
18.32.23 STC08609 IEF234E K 089B,VC1312,PVT,ADAB0080
18.32.23 STC08609 IEF404I ADAB0080 - ENDED - TIME=18.32.23
18.32.23 STC08609 $HASP395 ADAB0080 ENDED
0------ JES2 JOB STATISTICS ------
- 11 AUG 2026 JOB EXECUTION DATE
- 2 CARDS READ
- 1,259 SYSOUT PRINT RECORDS
- 0 SYSOUT PUNCH RECORDS
- 60 SYSOUT SPOOL KBYTES
- 1.07 MINUTES EXECUTION TIME
Esse é o layout que ficou em cada cartucho os files do banco Adabas;
____________________________________________________________________________________________________________________________________
* A D A S A V DB PROD 80 SIAFEM PAG. 0001
__________________________________________________________________________________________________________________________ 11/08/26
111 111 00000 88888 22222 666 TTTTTTT EEEEEEE RRRRRR CCCCCC AAAAA
1111 1111 000 000 888 888 22 222 666 TTT EEE RRR RRR CCC AAA AAA
11111 11111 000 000 888 888 222 666 TTT EEE RRR RRR CCC AAA AAA
111 111 000 000 88888 222 666666 TTT EEEEEEE RRRRRR CCC AAAAAAA
111 111 000 000 888 888 222 666 666 TTT EEE RRRRRR CCC AAA AAA
111 111 000 000 888 888 222 666 666 TTT EEE RRR RRR CCCCCC AAA AAA
1111111 1111111 00000 88888 2222222 66666 TTT EEEEEEE RRR RRR CC AAA AAA
VOLSER-Table:
-------------
I No. I Type I VOLSER I Device I High I Tape I Size in I
I I I I I RABN I Drive I Tracks I
I-----I------I--------I--------I------------I-------I----------I
I 1 I ASSO I ADS030 I 8391 I 722868 I 1 I 6305 I
I 2 I DATA I ADS030 I 8391 I 449995 I 1 I 23502 I
----------------------------------------------------------------
A D A S A V Processing Statistics:
-------------------------------------
Ended at 2026-08-11 18:32:04
Input read from database 00080 (DB.S080.OFFICE)
File list written to output volumes:
I VOLSER I Contents I Tape I
I--------I------------------------------------------------------------I------I
I VC1312 I ASSO 007 - 011 , 015 , 019 , 021 - 036 , 038 - 052 I 1 I
I I ASSO 064 - 074 , 081 - 087 , 089 - 099 , 109 I 1 I
I I ASSO 111 - 114 , 116 - 119 , 121 - 132 , 134 - 138 I 1 I
I I ASSO 149 - 171 , 190 - 192 , 200 , 233 - 234 , 236 I 1 I
I I ASSO 238 - 255 I 1 I
I VC1312 I DATA 007 - 011 , 015 , 019 , 021 - 036 , 038 - 052 I 1 I
I I DATA 064 - 074 , 081 - 087 , 089 - 099 , 109 I 1 I
I I DATA 111 - 114 , 116 - 119 , 121 - 132 , 134 - 138 I 1 I
I I DATA 149 - 171 , 190 - 192 , 200 , 233 - 234 , 236 I 1 I
I I DATA 238 - 255 I 1 I
I I Protection Log PLOGNUM=8739, SYN1=17703, SYN2=17706 I I
I--------I------------------------------------------------------------I------I
To restore any file from this tape use the RESTONL-Function.
RABN ranges as written to the output:
I VOLSER I Contents I Tape I
I--------I------------------------------------------------------------I------I
I VC1312 I ASSO 000001- 001414, 001447- 426323 I 1 I
I I DATA 000001- 357444 I 1 I
I--------I------------------------------------------------------------I------I
The following files have been modified while ADASAV was running:
I Files I
I---------------------------------------------------------------------I
I 019 I
I---------------------------------------------------------------------I
A restore operation requires the Protection Log of the
current nucleus session.
A D A S A V Terminated normally 2026-08-11 18:32:04
PLOG
Esse foi o PLOG que vamos utilizar1 J E S 2 J O B L O G -- S Y S T E M C P A C -- N O D E J E S 2
0
13.54.13 JOB03149 ---- WEDNESDAY, 12 AUG 2026 ----
13.54.13 JOB03149 IRR010I USERID ADAB0080 IS ASSIGNED TO THIS JOB.
13.54.13 JOB03149 ICH70001I ADAB0080 LAST ACCESS AT 20:14:53 ON SATURDAY, AUGUST 1, 2026
13.54.13 JOB03149 $HASP373 PLOGP080 STARTED - INIT K - CLASS S - SYS CPAC
13.54.14 JOB03149 IEF403I PLOGP080 - STARTED - TIME=13.54.14
13.54.15 JOB03149 *IEF233A M 0894,PRIVAT,SL,PLOGP080,PLOGDB,ADABAS.C.DB080.PLOG.G0247V00
13.54.19 JOB03149 IEC705I TAPE ON 0894,VC0551,SL,COMP,PLOGP080,PLOGDB,ADABAS.C.DB080.PLOG.G0247V00,MEDIA4
13.54.31 JOB03149 IEC205I DDSIAUS1,PLOGP080,PLOGDB,FILESEQ=1, COMPLETE VOLUME LIST, 245
245 DSN=ADABAS.C.DB080.PLOG.G0247V00,VOLS=VC0551,TOTALBLOCKS=1016
13.54.33 JOB03149 IEF234E K 0894,VC0551,PVT,PLOGP080,PLOGDB
13.54.33 JOB03149 - --TIMINGS (MINS.)-- -----PAGING COUNTS----
13.54.33 JOB03149 -STEPNAME PROCSTEP RC EXCP CONN TCB SRB CLOCK SERV WORKLOAD PAGE SWAP VIO SWAPS
13.54.33 JOB03149 -PLOGDB 00 6311 3995 .02 .00 .3 194K BATCH 0 0 0 0
13.54.33 JOB03149 IEF404I PLOGP080 - ENDED - TIME=13.54.33
13.54.33 JOB03149 -PLOGP080 ENDED. NAME-DBA TOTAL TCB CPU TIME= .02 TOTAL ELAPSED TIME= .3
13.54.33 JOB03149 $HASP395 PLOGP080 ENDED
0------ JES2 JOB STATISTICS ------
- 12 AUG 2026 JOB EXECUTION DATE
- 29 CARDS READ
- 198 SYSOUT PRINT RECORDS
- 0 SYSOUT PUNCH RECORDS
- 9 SYSOUT SPOOL KBYTES
- 0.33 MINUTES EXECUTION TIME
Informações importantes do PLOG
1
A D A R E S V7.4 SM4 DBID = 00080 Started 2026-08-12 13:54:14
Parameters:
-----------
ADARES PLCOPY
DDSIAUS1 Output Volume=VC0551, Session NR=8739
FROMBLK= 1, FROMTIME=2026-08-01 20:14:53
TOBLK= 19430, TOTIME= 2026-08-12 13:54:12
The copy operation was successful, and the
sequential output dataset has been closed.
ADARES (PLCOPY): 19430 blocks copied from DDPLOGR1 to DDSIAUS1/2.
Protection Log Number = 8739
A D A R E S Terminated normally 2026-08-12 13:54:32
Restore
Esse é o JCL que vamos utilizar para fazer a restauração;//AAFPREST JOB (ABBP,DIBD),SUPORTE,CLASS=S,MSGCLASS=A TYPRUN=HOLD //*UQ ALLOW //*----------------------------------------------------------------- //* RESTORE DO BANCO 141 ONLINE //*----------------------------------------------------------------- //RESTORE EXEC AAFAU141,TIME=1440 //DDREST1 DD DSN=ADABAS.C.SAVE.DB080.DIA.G4315V00, // DISP=OLD,UNIT=CVRT,LABEL=(1,SL),VOL=SER=VC1312 //* ---------------------------------------------------------------- //DDPLOG DD DSN=ADABAS.C.DB080.PLOG.G0247V00, // DISP=OLD,UNIT=AFF=DDREST1,VOL=SER=VC0551 //*----------------------------------------------------------------- //DDCARD DD * ADARUN PROG=ADASAV,DBID=141 //DDKARTE DD * ADASAV RESTONL FMOVE=28,30,31,32,33,34,35,36,38,43,47,50,65 ADASAV FMOVE=66,67,70,96,109,116,192,243,246,250 ADASAV PLOGNUM=8739,SYN1=17703,OVERWRITE /*
Foi restaurado com sucesso
1 J E S 2 J O B L O G -- S Y S T E M C P A C -- N O D E J E S 2
0
14.05.30 JOB03290 ---- WEDNESDAY, 12 AUG 2026 ----
14.05.30 JOB03290 ICH70001I DBAP055 LAST ACCESS AT 14:04:39 ON WEDNESDAY, AUGUST 12, 2026
14.05.30 JOB03290 $HASP373 AAFPREST STARTED - INIT K - CLASS S - SYS CPAC
14.05.30 JOB03290 IEF403I AAFPREST - STARTED - TIME=14.05.30
14.05.31 JOB03290 *IEF233A M 0891,VC1312,,AAFPREST,AAFAU141, 151
151 ADABAS.C.SAVE.DB080.DIA.G4315V00
14.06.07 JOB03290 IEC502E K 0891,VC1312,SL,AAFPREST,AAFAU141
14.06.07 JOB03290 *IEC501A M 0891,VC0551,SL,,AAFPREST,AAFAU141.RESTORE,ADABAS.C.DB080.PLOG.G0247V00
14.06.17 JOB03290 IEF234E K 0891,VC0551,PVT,AAFPREST,AAFAU141
14.06.17 JOB03290 - --TIMINGS (MINS.)-- -----PAGING COUNTS----
14.06.17 JOB03290 -STEPNAME PROCSTEP RC EXCP CONN TCB SRB CLOCK SERV WORKLOAD PAGE SWAP VIO SWAPS
14.06.17 JOB03290 -RESTORE AAFAU141 00 7057 6293 .06 .01 .7 505K BATCH 0 0 0 0
14.06.17 JOB03290 IEF404I AAFPREST - ENDED - TIME=14.06.17
14.06.17 JOB03290 -AAFPREST ENDED. NAME-SUPORTE TOTAL TCB CPU TIME= .06 TOTAL ELAPSED TIME= .7
14.06.17 JOB03290 $HASP395 AAFPREST ENDED
0------ JES2 JOB STATISTICS ------
- 12 AUG 2026 JOB EXECUTION DATE
- 21 CARDS READ
- 1,449 SYSOUT PRINT RECORDS
- 0 SYSOUT PUNCH RECORDS
- 60 SYSOUT SPOOL KBYTES
- 0.78 MINUTES EXECUTION TIME
Restaurado os files
A D A S A V V7.4 SM4 DBID = 00141 Started 2026-08-12 14:05:31
Parameters:
-----------
ADASAV RESTONL FMOVE=28,30,31,32,33,34,35,36,38,43,47,50,65
ADASAV FMOVE=66,67,70,96,109,116,192,243,246,250
ADASAV PLOGNUM=8739,SYN1=17703,OVERWRITE
Function to be executed:
------------------------
RESTONL FILE(S) ONLINE
Restore tape from Database 80 (DB.S080.OFFICE)
Loading into Database 141 (DB.S141.OFFICE)
File Number 28 is already present and will be overwritten.
File Number 30 is already present and will be overwritten.
File Number 31 is already present and will be overwritten.
File Number 32 is already present and will be overwritten.
File Number 33 is already present and will be overwritten.
File Number 34 is already present and will be overwritten.
File Number 35 is already present and will be overwritten.
File Number 36 is already present and will be overwritten.
File Number 38 is already present and will be overwritten.
File Number 43 is already present and will be overwritten.
File Number 47 is already present and will be overwritten.
File Number 50 is already present and will be overwritten.
File Number 65 is already present and will be overwritten.
File Number 66 is already present and will be overwritten.
File Number 67 is already present and will be overwritten.
File Number 70 is already present and will be overwritten.
File Number 96 is already present and will be overwritten.
File Number 109 is already present and will be overwritten.
File Number 116 is already present and will be overwritten.
File Number 192 is already present and will be overwritten.
File Number 243 is already present and will be overwritten.
File Number 246 is already present and will be overwritten.
File Number 250 is already present and will be overwritten.
0 comentários:
Enviar um comentário