ERROR-093, Utility not permitted to run - Pending AUTORESTART detected.

Este tópico quero mostrar como o Adabas se comporta quando ele é cancelado sem executar as rotinas para garantir a sua segurança, este banco estava habilitado com parametro ADARUN IGNDIB com YES, o que este parâmetro faz? O autorestart é uma rotina que verifica se o buffer estava ativo quando ocorreu uma interrupção da sessão do banco. Quando o banco é colocado no ar é checado se o buffer flush estava com um processo se sim o banco sai logo em seguida mandando um alerta ao usuário para o potencial problema e inclui uma lista dos files que estava sendo atualizados quando o flush do buffer estava em processo. Primeiro comando para tirar o banco do ar;

  F AAFAI222,ADAEND
  +ADAN51 00222 2013-05-16 11:45:02 Operator type-in: ADAEND
  +ADAN42 00222 2013-05-16 11:45:02 Function accepted

Depois de 43 segundos foi o segundo comando para tirar o banco - ele não saiu do ar;

  F AAFAI222,ADAEND
  +ADAN51 00222 2013-05-16 11:45:39 Operator type-in: ADAEND
  +ADAN42 00222 2013-05-16 11:45:39 Function accepted

Depois de 1 minuto do último comando como o banco não saia do ar deram outro comando;

  F AAFAI222,ADAEND
  +ADAN51 00222 2013-05-16 11:46:44 Operator type-in: ADAEND
  +ADAN42 00222 2013-05-16 11:46:44 Function accepted

Como estava demorando resolveram cancelar o banco - descobriram o ASID do banco para cancelar o banco Adabas;

  D A,AAFAI222
  IEE115I 11.47.11 2013.136 ACTIVITY 204
   JOBS     M/S    TS USERS    SYSAS    INITS   ACTIVE/MAX VTAM     OAS
  00001    00079    00003      00030    00010    00003/00008       00011
   AAFAI222 AAFAI222 ADAV744  NSW  S   A=0045   PER=NO   SMC=000
                                       PGN=N/A  DMN=N/A  AFF=NONE
                                       CT=00.37.52  ET=35.32.06
                                       WUID=STC02512 USERID=ADABASP
                                       WKL=SYSTEM   SCL=SYSSTC   P=1
                                       RGP=N/A      SRVR=NO  QSC=NO
                                       ADDR SPACE ASTE=0417E140

E deram o comando cancelando o banco do ar - ele saiu;

CANCEL AAFAI222,A=0045
IEA989I SLIP TRAP ID=X222 MATCHED.  JOBNAME=AAFAI222, ASID=0045.
+ADAM99 00222 ADABAS   Abend code 40222000 PSW 078D1000 8001DDB2

Como tinham que tirar o banco para iniciar um backup offline quando foram rodar o job do backup ele cancelou logo em seguida;

1                       J E S 2  J O B  L O G  --  S Y S T E M  C P A C  --  N O
0
11.49.09 STC06744 ---- THURSDAY,  16 MAY 2013 ----
11.49.09 STC06744  IEF695I START AAFASGRH WITH JOBNAME AAFASGRH IS ASSIGNED TO
11.49.09 STC06744  $HASP373 AAFASGRH STARTED
11.49.09 STC06744  IEF403I AAFASGRH - STARTED - TIME=11.49.09
11.49.09 STC06744 *IEF233A M 0790,PRIVAT,SL,AAFASGRH,SAVE,  402
11.49.09 STC06744 *CTS001  IEF233A M 0790,PRIVAT,SL,AAFASGRH,SAVE,ADABAS.C.SAVE
    402                     ADABAS.C.SAVE.DB222.ETIQ.G0015V00
11.49.10 STC06744  IEF450I AAFASGRH SAVE - ABEND=S000 U0035 REASON=00000000  40
    404                     TIME=11.49.10
11.49.15 STC06744  IEF404I AAFASGRH - ENDED - TIME=11.49.15
11.49.15 STC06744  $HASP395 AAFASGRH ENDED

Checando o erro que ocorreu do utilitário do Adabas apareceu esta mensagem - não permitido quando tem uma pendência de AUTORESTART

ADASAV SAVE

A D A S A V:  Error occurred during execution:

ERROR-093, Utility not permitted to run

            Pending AUTORESTART detected.

            Restart the nucleus to perform the AUTORESTART.
            Perform a shutdown after successful nucleus start if
            required. Rerun this job.

A D A S A V  Terminated                                   2013-05-16  11:49:08
UQS0009 - END OF DATA SET.

Questionando o pessoal o que tinha acontecido foi passado que o banco não saia dai deram o comando para cancelar ele - checando no momento a performance da CPU do mainframe estava muito alta - o horário 11 horas quase 12 é a hora de maior carga e de usuário online - autorestart funcionou para checar que tinha algo no buffer flush; A única saída foi colocar o banco de novo no ar (tentei colocar com o comando normal) deu erro - coloquei de novo o banco em usando o comando ADA=A (S AAFAI222,ADA=A) para ver no que iria ocorrer mais já ciente que se não resolve-se teria que acionar o suporte (e restaurar este banco com o último backup) - com o comando ADA=A foi executado o autorestat modificou vários files - e o banco ficou online;

11.53.38 STC06766  +ADAN03 00222 ADABAS coming up
11.53.38 STC06766  +ADAN55 00222 Recovery data found on Work dataset(s)
11.53.38 STC06766  +ADAN56 00222 Backward repair done
11.53.42 STC06766  +ADAN56 00222 Forward repair done
11.53.42 STC06766  +ADAN56 00222 Autobackout done
11.53.42 STC06766  +ADAN49 00222 2013-05-16 11:53:41
11.53.42 STC06766  +             1   1792 backed out during system open
11.53.42 STC06766  +             UID= 404040F1F7F9F2F1
11.53.42 STC06766  +ADAN5A 00222 Files modified during autorestart:
11.53.42 STC06766  +ADAN5A 00222 00009 00019 00021 00183 00211 00212
11.53.42 STC06766  +ADAN5A 00222
11.53.42 STC06766  +ADAN19 00222 Buffer flush is  a s y n c h r o n o u s
11.53.42 STC06766  +ADAN01 00222 A D A B A S  V7.4.4  is active
11.53.42 STC06766  +ADAN01 00222 MODE = MULTI
11.53.42 STC06766  +ADAN01 00222 Running without recovery log
11.53.42 STC06766  +TRIMX4 00222 TRIMV761    STARTUP IS IN PROGRESS
11.53.42 STC06766  +TRIMX4 00222 TRIMV761    ADABAS LBP - ABOVE THE 16 MEG LINE
11.53.42 STC06766  +TRIMX4 00222 TRIMV761    TRIM IS ACTIVE
11.58.07 STC06766  +ADAN51 00222 2013-05-16 11:58:06 Operator type-in: ADAEND
11.58.07 STC06766  +ADAN42 00222 2013-05-16 11:58:06 Function accepted
11.58.07 STC06766  +UEX2   00222 CHAMADA P/ PLOG, FLAGS=X'0040'

Acessei o banco e cheguei alguns files tudo ok, foi tirado o banco do ar para iniciar o backup offline que rodou ok também;

Categories: Adabas