Translate

terça-feira, 19 de julho de 2022

DB2 Utilities sem Mistérios : O Guia do Programador COBOL Padawan para Entender REBUILD, REORG, COPY, RUNSTATS e o JCL por Trás da Tela Verde

 

Bellacosa Mainframe e o db2 utilies sem misterios

☕ Um Café no Bellacosa Mainframe

DB2 Utilities sem Mistérios 

O Guia do Programador COBOL Padawan para Entender REBUILD, REORG, COPY, RUNSTATS e o JCL por Trás da Tela Verde

Imagine a seguinte cena.

Você está diante de um terminal 3270. A tela preta parece silenciosa, quase imóvel. No alto aparece a inscrição:

DB2 UTILITIES

À direita, surge o nome do subsistema:

SSID: DB9G

No centro da tela, alguns campos aparentemente simples:

FUNCTION  ==> EDITJCL
JOB ID    ==> TEMP
UTILITY   ==> REBUILD
RESTART   ==> NO
LISTDEF   ==> NO
TEMPLATE  ==> NO

Para um programador COBOL Padawan, essa tela pode parecer apenas mais um formulário antigo do ISPF. Talvez algo criado em uma era na qual os monitores eram pesados, os teclados faziam barulho e os programadores carregavam manuais do tamanho de listas telefônicas.

Mas não se deixe enganar pela simplicidade visual.

Essa tela é como o painel de controle de uma enorme estação orbital. Por trás de poucos campos existe um conjunto de programas capazes de copiar, reorganizar, validar, reconstruir, descarregar e recuperar bancos de dados que podem armazenar bilhões de registros.

É aqui que o Db2 deixa de ser apenas o lugar onde seu programa COBOL executa um SELECT ou um UPDATE e revela sua verdadeira natureza: um sistema vivo que precisa de manutenção, estatísticas, cópias de segurança, reorganização e monitoramento constante.

Hoje vamos abrir esse painel, desmontar seus componentes e entender a engenharia escondida por trás de cada opção.


Bellacosa Mainframe e a tela do db2 para comandos de administracao

1. A tela não executa a mágica: ela gera as ordens

O primeiro conceito importante é compreender que o painel do Db2 Utilities não é, por si só, o utilitário.

Ele funciona como uma interface de preparação.

O fluxo normalmente é:

Usuário
   |
   v
Painel ISPF
   |
   v
Parâmetros informados
   |
   v
Geração de JCL
   |
   v
Submissão ao JES2
   |
   v
Execução do utilitário Db2
   |
   v
Mensagens no spool

O painel pergunta:

  • Qual utilitário deseja executar?

  • Qual subsistema Db2 será utilizado?

  • Onde estão os comandos do utilitário?

  • Deseja apenas editar o JCL ou submetê-lo?

  • A execução será nova ou continuará uma execução anterior?

  • Serão utilizadas listas automáticas?

  • Serão utilizados templates para datasets?

Com essas respostas, ele monta o JCL necessário.

Essa filosofia é muito comum no mainframe: a interface não tenta esconder completamente o que está acontecendo. Ela ajuda, orienta e gera o material operacional, mas o profissional ainda consegue examinar o JCL, alterar parâmetros e analisar o resultado.


2. SSID: escolhendo o universo Db2 correto

Na imagem temos:

SSID: DB9G

SSID significa:

Subsystem Identifier

É o identificador do subsistema Db2.

Uma instalação z/OS pode executar vários subsistemas Db2. Cada um representa um ambiente independente, com seu próprio catálogo, logs, buffer pools, planos, packages e objetos.

Exemplos:

DB2D  - Desenvolvimento
DB2T  - Testes
DB2H  - Homologação
DB2P  - Produção
DB9G  - Ambiente de laboratório ou treinamento

O nome não possui uma regra universal. Cada organização define seu padrão.

Essa escolha é crítica.

Executar um REBUILD INDEX em desenvolvimento é uma coisa.

Executar no subsistema de produção, durante o horário de pico, é outra completamente diferente.

Um erro no SSID pode transformar uma atividade rotineira em um incidente.

Easter egg operacional

Muitos profissionais experientes confirmam o SSID várias vezes antes de submeter um utilitário. Não é paranoia. É memória histórica.

Um DBA pode ter duas sessões abertas:

Sessão 1: DB2D
Sessão 2: DB2P

As telas são praticamente idênticas.

Um comando correto no ambiente errado continua sendo um comando errado.


3. FUNCTION: o que fazer com o JCL

Na tela aparece:

FUNCTION ==> EDITJCL

Esse campo define o destino da operação.

As opções normalmente incluem:

SUBMIT
EDITJCL
DISPLAY
TERMINATE

3.1 EDITJCL

A opção EDITJCL gera o JCL e abre o resultado no editor ISPF.

É uma das opções mais seguras, pois permite revisar tudo antes da execução.

Você pode conferir:

  • JOBNAME;

  • CLASS;

  • MSGCLASS;

  • subsistema Db2;

  • datasets;

  • comandos SYSIN;

  • parâmetros de SORT;

  • nomes de tablespaces e índices;

  • opções de paralelismo;

  • espaço temporário;

  • instruções de restart.

Fluxo:

Painel
   |
   v
Geração do JCL
   |
   v
ISPF Edit
   |
   v
Revisão humana
   |
   v
SUBMIT

Para produção, essa revisão é importantíssima.

3.2 SUBMIT

A opção SUBMIT gera o JCL e o envia diretamente ao JES2.

É prática e rápida, mas elimina a oportunidade de revisão manual.

Pode ser adequada em ambientes controlados, especialmente quando:

  • o procedimento já foi testado;

  • o JCL segue um padrão;

  • os datasets são gerados por template;

  • o objeto já foi validado;

  • o usuário conhece o impacto da operação.

Para um Padawan, EDITJCL é a escolha mais educativa.

3.3 DISPLAY

DISPLAY permite consultar utilitários em execução ou pendentes.

Um utilitário Db2 mantém informações sobre seu estado.

Por exemplo:

UTILID = REORGP01
PHASE  = RELOAD
STATUS = ACTIVE

Isso permite saber:

  • qual utilitário está executando;

  • qual objeto está sendo processado;

  • em qual fase está;

  • se está parado;

  • se aguarda algum recurso;

  • se pode ser reiniciado.

3.4 TERMINATE

TERMINATE encerra o estado registrado de uma utility.

Mas cuidado: terminar uma utility não significa simplesmente “cancelar um job”.

Existe uma diferença entre:

CANCEL do job no JES2

e:

TERM UTILITY no Db2

Quando um job é cancelado, o Db2 pode manter informações de restart.

A utility continua registrada como incompleta.

O comando de término informa ao Db2 que aquela execução não será retomada.

Essa operação deve ser feita com conhecimento, porque pode eliminar a possibilidade de restart daquela utility.


4. JOB ID: identificando a missão

Na imagem:

JOB ID ==> TEMP

Esse campo serve como identificador para a geração ou para a execução.

Dependendo do painel e do modelo utilizado, ele pode participar da criação de:

  • JOBNAME;

  • utility ID;

  • nomes temporários;

  • membros;

  • datasets de trabalho.

Exemplos mais descritivos:

REBLIDX
REORGCAD
COPYFIN
RUNSTPRD
LOADCLI

Em produção, nomes claros ajudam muito.

Compare:

TEMP

com:

RBCUST01

O segundo nome já sugere:

RB = Rebuild
CUST = Customer
01 = Execução ou partição

Quando dezenas de jobs aparecem no SDSF, uma boa nomenclatura reduz confusão.


5. UTILITY: escolhendo a ferramenta certa

Na imagem, a opção selecionada é:

UTILITY ==> REBUILD

O painel lista vários utilitários:

CHECK DATA
CHECK INDEX
CHECK LOB
COPY
DIAGNOSE
LOAD
MERGE
MODIFY
QUIESCE
REBUILD
RECOVER
REORG INDEX
REORG LOB
REORG TABLESPACE
REPORT
REPAIR
RUNSTATS
STOSPACE
UNLOAD

Cada um resolve um problema diferente.

Vamos entender os principais.


6. REBUILD INDEX: reconstruindo a árvore

Um índice Db2 normalmente utiliza uma estrutura semelhante a uma árvore B+.

Ele permite localizar rapidamente linhas sem ler toda a tabela.

Imagine uma tabela:

TB_CLIENTE

com as colunas:

ID_CLIENTE
CPF
NOME
CIDADE
SALDO

E um índice:

IX_CLIENTE_CPF

Ao executar:

SELECT NOME
  FROM TB_CLIENTE
 WHERE CPF = '12345678900';

o Db2 pode consultar o índice e localizar diretamente a página correspondente.

Com o tempo, porém, o índice sofre alterações:

  • inserções;

  • exclusões;

  • splits de páginas;

  • movimentação de chaves;

  • páginas parcialmente vazias;

  • perda de organização;

  • inconsistência após determinadas falhas.

O REBUILD INDEX recria a estrutura.

Fluxo conceitual

Leitura dos dados ou das chaves
          |
          v
Ordenação das chaves
          |
          v
Criação de nova estrutura
          |
          v
Gravação das páginas do índice
          |
          v
Validação e disponibilização

Exemplo de comando Db2

REBUILD INDEX
  (DBFIN.IXCLIENT)
  SHRLEVEL REFERENCE
  SORTDEVT SYSDA
  SORTNUM 8
  STATISTICS

Explicando cada linha

REBUILD INDEX

Solicita a reconstrução de um índice.

(DBFIN.IXCLIENT)

Identifica o indexspace ou objeto que será reconstruído. A sintaxe exata pode variar conforme o tipo de objeto e a convenção utilizada.

SHRLEVEL REFERENCE

Permite determinado nível de acesso concorrente, geralmente leitura, enquanto restringe alterações durante partes da execução.

SORTDEVT SYSDA

Indica o tipo genérico de dispositivo a ser utilizado para arquivos temporários de sort.

SORTNUM 8

Solicita uma quantidade de datasets de trabalho para ordenação.

STATISTICS

Pede a coleta de estatísticas durante ou após o processo, quando suportado pela utility e configuração.


7. Exemplo completo de JCL para REBUILD INDEX

//RBIDX01  JOB (ACCT),'REBUILD INDEX',
//             CLASS=A,
//             MSGCLASS=X,
//             NOTIFY=&SYSUID
//*
//STEP01   EXEC PGM=DSNUTILB,
//             REGION=0M,
//             PARM='DB9G,RBIDX01'
//STEPLIB   DD DISP=SHR,DSN=DB2.V13.SDSNLOAD
//SYSPRINT  DD SYSOUT=*
//UTPRINT   DD SYSOUT=*
//SYSUDUMP  DD SYSOUT=*
//SORTDEVT  DD DUMMY
//SYSIN     DD *
  REBUILD INDEX
    (DBFIN.IXCLIENT)
    SHRLEVEL REFERENCE
    SORTDEVT SYSDA
    SORTNUM 8
/*
//

Agora vamos desmontar esse JCL como um engenheiro desmontaria um processador antigo.


7.1 JOB statement

//RBIDX01 JOB (ACCT),'REBUILD INDEX',

O nome do job é:

RBIDX01

Ele será exibido no JES2 e no SDSF.

(ACCT)

Representa informações contábeis ou administrativas. O formato depende da instalação.

'REBUILD INDEX'

É uma descrição humana da execução.


7.2 CLASS

//            CLASS=A,

A classe determina como o JES2 tratará o job.

Pode influenciar:

  • prioridade;

  • initiator;

  • ambiente de execução;

  • limite de recursos;

  • janela operacional.

Cada empresa configura suas classes.


7.3 MSGCLASS

//            MSGCLASS=X,

Define onde as mensagens e listagens do job serão direcionadas.

Normalmente controla a classe de saída no spool.


7.4 NOTIFY

//            NOTIFY=&SYSUID

Pede que o usuário seja notificado quando o job terminar.

&SYSUID é uma variável simbólica que representa o usuário que submeteu o job.


7.5 EXEC PGM=DSNUTILB

//STEP01 EXEC PGM=DSNUTILB,

Aqui está o programa que executa a utility.

DSNUTILB é o batch utility program do Db2 for z/OS.

Ele recebe os comandos, conversa com o subsistema Db2 e coordena a operação.


7.6 REGION=0M

//            REGION=0M,

Solicita que o step utilize a quantidade de memória permitida pelas políticas do sistema, sem um limite artificial pequeno definido no JCL.

Isso não significa memória infinita.

O z/OS, o WLM e as configurações de instalação continuam impondo limites.


7.7 PARM

//            PARM='DB9G,RBIDX01'

O primeiro parâmetro identifica o subsistema Db2:

DB9G

O segundo funciona como utility ID:

RBIDX01

A utility ID precisa ser administrada com cuidado.

Se uma utility falhar e permanecer registrada, uma nova execução com a mesma ID pode encontrar conflito ou tentar continuar uma execução anterior, dependendo dos parâmetros.


7.8 STEPLIB

//STEPLIB DD DISP=SHR,DSN=DB2.V13.SDSNLOAD

Aponta para a biblioteca onde se encontram os módulos executáveis do Db2.

DISP=SHR

Permite compartilhar a biblioteca com outros jobs.

Em algumas instalações, a biblioteca já está no LINKLIST ou definida em um procedimento catalogado. Nesse caso, o STEPLIB pode não ser necessário.


7.9 SYSPRINT

//SYSPRINT DD SYSOUT=*

Recebe as mensagens principais da utility.

É um dos primeiros lugares que você deve consultar no spool.

Ali podem aparecer:

  • parâmetros reconhecidos;

  • objetos processados;

  • fases executadas;

  • mensagens de erro;

  • return code;

  • estatísticas;

  • tempos de execução.


7.10 UTPRINT

//UTPRINT DD SYSOUT=*

Recebe mensagens relacionadas ao processamento da utility.

Dependendo do utilitário e da versão, pode conter informações adicionais importantes.


7.11 SYSUDUMP

//SYSUDUMP DD SYSOUT=*

Solicita um dump caso ocorra uma falha anormal.

Esse dump pode ser enorme, mas é muito útil para diagnóstico técnico.

Em ambientes de produção, dumps podem ser direcionados a datasets específicos ou sistemas de gerenciamento de dumps.


7.12 SYSIN

//SYSIN DD *

Aqui começam os comandos da utility.

O asterisco indica que os dados estão embutidos no próprio JCL.

  REBUILD INDEX
    (DBFIN.IXCLIENT)

O conteúdo termina com:

/*

Também seria possível armazenar os comandos em um membro de PDS:

//SYSIN DD DISP=SHR,
//          DSN=IBMUSER.WORKBOOK.DB2.ERG(ERGREBL)

Esse formato corresponde ao campo mostrado na imagem:

STATEMENT DATA SET
IBMUSER.WORKBOOK.DB2.ERG(ERGREBL)

8. STATEMENT DATA SET: separando o JCL do comando

Na tela aparece um dataset semelhante a:

IBMUSER.WORKBOOK.DB2.ERG(ERGREBL)

Esse é um membro de uma biblioteca particionada.

Podemos dividir o nome assim:

IBMUSER
WORKBOOK
DB2
ERG
ERGREBL

O trecho entre parênteses é o membro:

ERGREBL

Dentro dele provavelmente existe algo semelhante a:

REBUILD INDEX
  (DBFIN.IXCLIENT)
  SHRLEVEL REFERENCE
  SORTDEVT SYSDA
  SORTNUM 8

A vantagem de armazenar o comando separadamente é a reutilização.

O mesmo JCL pode apontar para comandos diferentes:

ERGREBL  - REBUILD
ERGREOG  - REORG
ERGRUNS  - RUNSTATS
ERGCOPY  - COPY

Isso também melhora o controle de mudanças.


9. RESTART: começando de novo ou retomando a jornada

Na imagem:

RESTART ==> NO

Utilitários Db2 podem ser longos.

Um REORG de um tablespace gigantesco pode durar horas. Durante esse tempo, podem ocorrer:

  • falha de energia;

  • cancelamento operacional;

  • falta de espaço;

  • erro de sort;

  • indisponibilidade de dataset;

  • falha de dispositivo;

  • interrupção do Db2;

  • timeout;

  • erro de autorização.

Para evitar que todo o trabalho seja perdido, algumas utilities mantêm pontos de controle.

As opções apresentadas incluem:

NO
CURRENT
PHASE
PREVIEW

NO

RESTART = NO

Indica uma nova execução.

Não deseja retomar uma execução anterior.

CURRENT

Tenta continuar a utility a partir do ponto atual registrado.

PHASE

Permite reiniciar a partir de uma fase específica suportada.

PREVIEW

Permite visualizar ou avaliar informações da execução sem realizar todo o processamento normal, dependendo da utility e do contexto.

Exemplo conceitual

Uma utility REORG pode passar por fases como:

UTILINIT
UNLOAD
RELOAD
SORT
BUILD
LOG
SWITCH
UTILTERM

Se houver falha durante BUILD, o restart pode evitar a repetição completa das fases anteriores.

Cuidado

Nunca altere parâmetros de restart aleatoriamente.

O estado registrado no Db2 precisa corresponder ao comando informado. Alterações incompatíveis podem impedir a retomada ou gerar resultados inesperados.


10. RUNSTATS: ensinando o otimizador a enxergar

Agora vamos falar de uma utility indispensável.

O otimizador do Db2 escolhe caminhos de acesso com base em estatísticas.

Ele precisa saber:

  • quantidade de linhas;

  • número de páginas;

  • cardinalidade das colunas;

  • distribuição dos valores;

  • quantidade de valores distintos;

  • organização dos dados;

  • níveis do índice;

  • clustering;

  • frequência de determinados valores.

Sem estatísticas atualizadas, o otimizador toma decisões com informações antigas.

Imagine que uma tabela possuía 10 mil registros quando o último RUNSTATS foi executado.

Hoje ela possui 500 milhões.

O catálogo ainda diz:

CARDF = 10000

O otimizador pode escolher um caminho de acesso adequado para uma pequena tabela, mas desastroso para uma tabela gigantesca.

Exemplo de JCL para RUNSTATS

//RUNST01  JOB (ACCT),'RUNSTATS',
//             CLASS=A,
//             MSGCLASS=X,
//             NOTIFY=&SYSUID
//STEP01   EXEC PGM=DSNUTILB,
//             REGION=0M,
//             PARM='DB9G,RUNST01'
//STEPLIB   DD DISP=SHR,DSN=DB2.V13.SDSNLOAD
//SYSPRINT  DD SYSOUT=*
//UTPRINT   DD SYSOUT=*
//SYSIN     DD *
  RUNSTATS TABLESPACE DBFIN.TSCLIENT
    TABLE(ALL)
    INDEX(ALL)
    SHRLEVEL CHANGE
    UPDATE ALL
    REPORT YES
/*
//

Explicação

RUNSTATS TABLESPACE DBFIN.TSCLIENT

Solicita estatísticas do tablespace.

TABLE(ALL)

Processa todas as tabelas relevantes existentes naquele tablespace.

INDEX(ALL)

Coleta estatísticas de todos os índices associados.

SHRLEVEL CHANGE

Permite que aplicações continuem alterando os dados, dentro das regras e limitações da utility.

UPDATE ALL

Atualiza as estatísticas correspondentes no catálogo.

REPORT YES

Solicita relatório das informações coletadas.


11. COPY: criando uma linha do tempo para recuperação

A utility COPY cria uma image copy de um tablespace ou indexspace.

Não pense nela apenas como um “backup de arquivo”.

Ela faz parte da estratégia de recuperação do Db2.

Fluxo simplificado:

Image Copy
    +
Active Logs
    +
Archive Logs
    =
Recuperação até um ponto desejado

Exemplo

//COPY01   JOB (ACCT),'COPY TABLESPACE',
//             CLASS=A,
//             MSGCLASS=X,
//             NOTIFY=&SYSUID
//STEP01   EXEC PGM=DSNUTILB,
//             REGION=0M,
//             PARM='DB9G,COPY01'
//STEPLIB   DD DISP=SHR,DSN=DB2.V13.SDSNLOAD
//SYSPRINT  DD SYSOUT=*
//UTPRINT   DD SYSOUT=*
//SYSIN     DD *
  COPY TABLESPACE DBFIN.TSCLIENT
    FULL YES
    SHRLEVEL CHANGE
    COPYDDN COPYDD
/*
//COPYDD   DD DSN=BACKUP.DBFIN.TSCLIENT.D20260713,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,
//            SPACE=(CYL,(500,100),RLSE),
//            DCB=(RECFM=FB,LRECL=4096,BLKSIZE=0)
//

FULL YES

Cria uma cópia completa.

SHRLEVEL CHANGE

Permite alterações concorrentes durante grande parte do processo.

COPYDDN COPYDD

Liga o comando Db2 ao DD statement chamado COPYDD.

DISP

DISP=(NEW,CATLG,DELETE)

Significa:

NEW    - o dataset será criado;
CATLG  - se o step terminar normalmente, será catalogado;
DELETE - se o step falhar, será excluído.

SPACE

SPACE=(CYL,(500,100),RLSE)

Solicita:

Unidade de alocação: cilindros
Primária: 500
Secundária: 100
RLSE: liberar espaço não utilizado

12. REORG TABLESPACE: colocando a casa em ordem

Com o tempo, os dados podem perder a organização física ideal.

Isso ocorre por:

  • inserts fora da sequência;

  • deletes;

  • updates que aumentam o tamanho da linha;

  • page splits;

  • crescimento irregular;

  • espaços vazios;

  • registros deslocados;

  • baixa correlação com o índice de clustering.

O REORG TABLESPACE reorganiza os dados.

Exemplo

//REORG01  JOB (ACCT),'REORG TABLESPACE',
//             CLASS=A,
//             MSGCLASS=X,
//             NOTIFY=&SYSUID
//STEP01   EXEC PGM=DSNUTILB,
//             REGION=0M,
//             PARM='DB9G,REORG01'
//STEPLIB   DD DISP=SHR,DSN=DB2.V13.SDSNLOAD
//SYSPRINT  DD SYSOUT=*
//UTPRINT   DD SYSOUT=*
//SYSIN     DD *
  REORG TABLESPACE DBFIN.TSCLIENT
    LOG YES
    SHRLEVEL CHANGE
    SORTDEVT SYSDA
    SORTNUM 12
    STATISTICS
      TABLE(ALL)
      INDEX(ALL)
/*
//

LOG YES

Registra as alterações necessárias nos logs conforme as regras do utilitário.

SHRLEVEL CHANGE

Busca manter o objeto disponível para leitura e alteração durante boa parte da execução.

Isso não significa ausência absoluta de impacto.

Pode existir uma fase curta de troca ou sincronização na qual bloqueios são necessários.

SORTNUM 12

Solicita até doze datasets de sort.

Mais datasets não significam automaticamente mais desempenho. É necessário considerar:

  • tamanho do objeto;

  • memória;

  • paralelismo;

  • configuração do DFSORT;

  • disponibilidade de discos;

  • limites do sistema.


13. LISTDEF: selecionando objetos por regras

Na imagem:

LISTDEF? ==> NO

LISTDEF permite definir uma lista de objetos de forma lógica.

Sem LISTDEF:

REORG TABLESPACE DB01.TS001
REORG TABLESPACE DB01.TS002
REORG TABLESPACE DB01.TS003
REORG TABLESPACE DB01.TS004

Com LISTDEF, você pode criar uma regra:

LISTDEF LISTFIN
  INCLUDE TABLESPACE DBFIN.*

Depois:

RUNSTATS LIST LISTFIN

ou, conforme a utility e sintaxe suportada:

COPY LIST LISTFIN

O grande benefício aparece em ambientes com centenas ou milhares de objetos.

Exemplo conceitual

LISTDEF LISTAPPL
  INCLUDE TABLESPACE DBAPP.*
  EXCLUDE TABLESPACE DBAPP.TSTEMP*

A lista inclui todos os tablespaces do banco DBAPP, exceto os temporários.

Isso permite automação sem manter uma lista manual interminável.


14. TEMPLATE: fabricando nomes de datasets automaticamente

Na imagem:

TEMPLATE? ==> NO

O TEMPLATE permite definir padrões para datasets utilizados pelas utilities.

Sem TEMPLATE, cada COPY precisa de um DD statement:

//COPY01 DD DSN=BACKUP.DB1.TS1...
//COPY02 DD DSN=BACKUP.DB1.TS2...
//COPY03 DD DSN=BACKUP.DB1.TS3...

Com TEMPLATE, o Db2 pode gerar os nomes dinamicamente.

Exemplo conceitual:

TEMPLATE COPYTMP
  DSN 'BACKUP.&DB..&TS..D&DATE..T&TIME.'
  UNIT SYSDA
  DISP (NEW,CATLG,DELETE)
  SPACE CYL
  PCTPRIME 20

Depois:

COPY LIST LISTFIN
  COPYDDN COPYTMP

Os símbolos podem representar elementos como:

  • database;

  • tablespace;

  • data;

  • hora;

  • partição;

  • utility ID;

  • sequência.

O resultado pode ser:

BACKUP.DBFIN.TSCLIENT.D20260713.T231500

Isso reduz drasticamente o tamanho do JCL.


15. CHECK INDEX e CHECK DATA: o exame médico do banco

CHECK INDEX verifica a consistência entre o índice e os dados.

Ele procura situações como:

  • chave no índice sem linha correspondente;

  • linha existente sem chave no índice;

  • problemas estruturais;

  • inconsistências lógicas.

Exemplo:

//CHKIDX01 JOB (ACCT),'CHECK INDEX',
//             CLASS=A,
//             MSGCLASS=X
//STEP01   EXEC PGM=DSNUTILB,
//             REGION=0M,
//             PARM='DB9G,CHKIDX01'
//STEPLIB   DD DISP=SHR,DSN=DB2.V13.SDSNLOAD
//SYSPRINT  DD SYSOUT=*
//UTPRINT   DD SYSOUT=*
//SYSIN     DD *
  CHECK INDEX
    (DBFIN.IXCLIENT)
/*
//

CHECK DATA verifica relacionamentos e consistência de dados, especialmente em situações envolvendo constraints e dependências.

Esses utilitários não devem ser confundidos com consultas SQL de validação funcional.

Eles atuam no nível estrutural e operacional do Db2.


16. LOAD e UNLOAD: a doca de carga do Db2

UNLOAD

Extrai dados de uma tabela ou tablespace para um dataset sequencial.

Exemplo conceitual:

UNLOAD TABLESPACE DBFIN.TSCLIENT
  FROM TABLE FINANCEIRO.CLIENTE
  UNLDDN SYSREC

JCL:

//SYSREC DD DSN=EXPORT.CLIENTE.D20260713,
//          DISP=(NEW,CATLG,DELETE),
//          UNIT=SYSDA,
//          SPACE=(CYL,(100,50),RLSE),
//          DCB=(RECFM=VB,LRECL=32756,BLKSIZE=0)

LOAD

Carrega grandes volumes de dados.

Exemplo:

LOAD DATA
  INDDN SYSREC
  INTO TABLE FINANCEIRO.CLIENTE

A utility LOAD é muito mais eficiente que executar milhões de comandos INSERT individualmente.

Mas ela exige planejamento.

Dependendo das opções utilizadas, pode:

  • substituir dados;

  • acrescentar dados;

  • deixar índices em estado pendente;

  • exigir reconstrução;

  • afetar constraints;

  • gerar ou não logs detalhados;

  • exigir cópia posterior.


17. RECOVER: quando o treinamento vira batalha real

RECOVER restaura um objeto usando image copies e logs.

Imagine que alguém executou:

DELETE FROM FINANCEIRO.CLIENTE;
COMMIT;

O ROLLBACK já não pode ajudar porque houve COMMIT.

Uma estratégia de recuperação pode utilizar:

Image Copy anterior
+
Logs posteriores
+
Ponto no tempo antes do erro

Exemplo conceitual:

RECOVER TABLESPACE DBFIN.TSCLIENT
  TORBA X'00000000123456789012'

ou outra opção de point-in-time recovery suportada no ambiente.

Essa não é uma operação improvisada.

Antes de recuperar, a equipe precisa responder:

  • Qual foi o horário do erro?

  • Há image copy válida?

  • Os archive logs estão disponíveis?

  • Existem objetos relacionados?

  • Há integridade referencial?

  • Outros tablespaces precisam voltar ao mesmo ponto?

  • Quais aplicações devem ser interrompidas?

  • Como os dados posteriores serão reconciliados?

Um recovery tecnicamente bem-sucedido pode ainda produzir inconsistência de negócio se objetos relacionados forem recuperados para momentos diferentes.


18. Como acompanhar o job no SDSF

Depois de submeter o JCL, você normalmente abre o SDSF.

Comandos comuns:

ST

Mostra jobs ativos e concluídos conforme seus filtros.

Localize:

RBIDX01

Abra o job com S.

Você verá DDs como:

JESMSGLG
JESJCL
JESYSMSG
SYSPRINT
UTPRINT
SYSUDUMP

JESMSGLG

Contém mensagens do JES e informações gerais da execução.

JESJCL

Mostra o JCL expandido.

É especialmente útil quando foram utilizados:

  • procedures catalogadas;

  • símbolos;

  • includes;

  • overrides.

JESYSMSG

Contém mensagens do sistema, alocações e término dos steps.

SYSPRINT

Normalmente contém a narrativa principal da utility Db2.


19. Return codes: nem todo zero conta a história completa

Os códigos de retorno mais comuns são:

RC=0000
RC=0004
RC=0008
RC=0012
RC=0016

RC 0000

Execução normal.

Mesmo assim, leia as mensagens.

RC 0004

Aviso.

A utility pode ter terminado, mas algo merece atenção.

RC 0008

Erro relevante.

Parte do processamento pode não ter ocorrido.

RC 0012 ou superior

Erro grave.

A operação provavelmente falhou ou foi interrompida.

Nunca analise apenas o número final.

Procure mensagens Db2 com prefixos como:

DSNU
DSN
IEC
IGD
ICE
ICH

Cada família pode indicar uma origem diferente:

  • Db2 utility;

  • sistema;

  • dataset;

  • SMS;

  • sort;

  • segurança.


20. Passo a passo seguro para o Padawan

Antes de executar uma utility, siga uma sequência disciplinada.

Passo 1 — Confirme o ambiente

Verifique:

SSID
LPAR
Usuário
Qualificador dos datasets
Banco
Tablespace
Índice

Passo 2 — Entenda o motivo

Não execute REORG apenas porque “sempre executamos”.

Pergunte:

  • Há fragmentação?

  • As estatísticas indicam necessidade?

  • Existe impacto de desempenho?

  • O objeto está em estado pendente?

  • Houve LOAD?

  • O índice está inconsistente?

  • Existe recomendação de manutenção?

Passo 3 — Estime o impacto

Considere:

  • tamanho do objeto;

  • duração;

  • CPU;

  • I/O;

  • espaço de sort;

  • logs;

  • concorrência;

  • bloqueios;

  • janela de manutenção.

Passo 4 — Confira a recuperação

Antes de uma operação destrutiva ou de grande impacto, confirme:

  • última image copy;

  • disponibilidade dos logs;

  • estratégia de rollback;

  • procedimento de restart;

  • contato da equipe responsável.

Passo 5 — Use EDITJCL

Revise o JCL gerado.

Passo 6 — Valide o SYSIN

Um pequeno erro no objeto muda tudo.

Compare:

DBFIN.TSCLIENT

com:

DBFIM.TSCLIENT

Uma letra pode apontar para outro banco ou causar falha.

Passo 7 — Submeta e acompanhe

Não envie o job e abandone a sessão.

Observe:

  • início;

  • consumo;

  • mensagens;

  • fases;

  • locks;

  • tempo;

  • espaço;

  • término.

Passo 8 — Valide o resultado

Depois da utility:

  • confira o return code;

  • leia o SYSPRINT;

  • valide estados pendentes;

  • confirme disponibilidade;

  • execute consultas funcionais;

  • atualize documentação;

  • registre duração e consumo.


21. Curiosidades e easter eggs do mundo Db2

A tela simples esconde um sistema distribuído de responsabilidades

O painel ISPF coleta parâmetros.

O JES2 agenda o job.

O z/OS gerencia memória e recursos.

O Db2 controla catálogo, logs e objetos.

O DFSORT pode ordenar dados.

O SMS aloca datasets.

O RACF valida autorizações.

O WLM decide prioridades.

Uma única execução de REORG pode envolver quase todo o ecossistema do mainframe.

DSNUTILB parece apenas um programa, mas é um maestro

Ele não “faz tudo sozinho”.

Ele coordena serviços do Db2, acessa objetos, solicita sort, gerencia fases e registra estados de restart.

O nome da utility ID é mais importante do que parece

Uma utility ID não é apenas uma etiqueta estética.

Ela pode estar associada ao controle de execução e restart.

Reutilizar IDs sem compreender o estado anterior pode gerar confusão.

REORG não é um ritual religioso

Em algumas empresas, utilities são executadas em calendários fixos herdados de décadas anteriores.

Por exemplo:

Todo sábado: REORG em tudo.

Isso pode ser desnecessário e caro.

A abordagem moderna deve considerar indicadores reais e políticas inteligentes.

RUNSTATS pode melhorar ou piorar um plano

Estatísticas novas ajudam o otimizador, mas também podem provocar mudança de access path.

Por isso ambientes críticos costumam combinar RUNSTATS com:

  • análise de EXPLAIN;

  • gerenciamento de packages;

  • avaliação de regressão;

  • controles de estabilidade;

  • monitoramento pós-implantação.


Conclusão: a Utility é a oficina do Db2

Para o programador COBOL Padawan, o Db2 começa com comandos como:

SELECT
INSERT
UPDATE
DELETE

Mas o banco de dados não sobrevive apenas de SQL.

Ele precisa de manutenção.

Precisa saber como os dados estão distribuídos.

Precisa reorganizar estruturas.

Precisa reconstruir índices.

Precisa criar cópias.

Precisa recuperar informações.

Precisa validar sua própria integridade.

É exatamente isso que as Db2 Utilities oferecem.

A tela mostrada parece modesta:

FUNCTION ==> EDITJCL
UTILITY  ==> REBUILD

Entretanto, por trás dela existe uma cadeia poderosa:

ISPF
  |
  v
JCL
  |
  v
JES2
  |
  v
DSNUTILB
  |
  v
Db2
  |
  v
Catálogo + Logs + Tablespaces + Índices

O grande aprendizado não é simplesmente decorar que REBUILD reconstrói um índice ou que RUNSTATS atualiza estatísticas.

O verdadeiro aprendizado é entender que cada utility participa de uma estratégia maior de disponibilidade, desempenho, integridade e recuperação.

No mainframe, a tela verde raramente conta toda a história.

Ela mostra apenas a porta.

Atrás dela existe uma engenharia construída durante décadas, refinada por milhões de execuções e responsável por manter sistemas bancários, governamentais, industriais e corporativos funcionando enquanto o restante do mundo dorme.

E quando o Padawan finalmente entende o JCL, as mensagens do spool, as fases da utility e o motivo de cada parâmetro, aquela velha tela deixa de parecer antiga.

Ela passa a parecer exatamente o que sempre foi:

um console de manutenção de uma das plataformas de dados mais resilientes do planeta.

segunda-feira, 18 de julho de 2022

Muito Além do IBM Z: A Anatomia Completa de um Datacenter Mainframe

 

Bellacosa Mainframe e a anatomia de um datacenter mainframe ibm z

☕ Um Café no Bellacosa Mainframe

Muito Além do IBM Z: A Anatomia Completa de um Datacenter Mainframe

O Guia Definitivo para um Programador COBOL Padawan Entender Como Cada Cabo, Tubo, Rack e Equipamento Trabalha em Harmonia para Manter Bancos, Cartões de Crédito e Bolsas de Valores Funcionando 24 Horas por Dia

"Um programa COBOL nunca executa sozinho. Antes que uma única instrução MOVE seja processada, existe um verdadeiro ecossistema de engenharia trabalhando silenciosamente para que tudo aconteça."


Introdução

Existe uma cena clássica em filmes de ficção científica: o herói entra em uma enorme sala repleta de luzes, armários metálicos, tubos coloridos, cabos grossos, ventiladores gigantes e quilômetros de equipamentos.

Para a maioria das pessoas aquilo parece apenas uma sala cheia de máquinas.

Para um programador COBOL experiente...

Aquilo é praticamente uma cidade.

A imagem que analisamos representa exatamente isso.

Embora seja uma renderização artística, ela retrata com bastante fidelidade como funciona a infraestrutura de um datacenter corporativo moderno onde vivem os grandes IBM Z.

Quando um programador COBOL escreve:

EXEC SQL
SELECT SALDO
FROM CONTA
END-EXEC

ele normalmente imagina apenas:

Programa → Banco de Dados

Mas, na realidade, essa simples consulta percorre dezenas de equipamentos.

Hoje faremos uma verdadeira visita guiada pelo coração de um datacenter IBM Mainframe.

Pegue seu café.

Vamos entrar.


Bellacosa Mainframe e um moderno cpd centro de processamento de dados

Vista Geral da Sala

Imagine que estamos entrando nesta sala.

A primeira impressão é de organização absoluta.

Nada está ali por acaso.

Cada tubo possui uma função.

Cada cabo tem identificação.

Cada rack possui redundância.

Cada equipamento conversa com dezenas de outros equipamentos.

É exatamente como um grande programa COBOL bem escrito.

Se retirar uma instrução importante...

todo o restante pode parar.


O Teto: Onde Começa a Engenharia

Muitos iniciantes olham apenas para os computadores.

Os veteranos olham primeiro para o teto.

Por quê?

Porque boa parte da infraestrutura passa justamente acima dos equipamentos.

Ali encontramos:

  • barramentos elétricos

  • fibra óptica

  • tubulações

  • sensores

  • detectores de fumaça

  • iluminação

  • sistema anti-incêndio

  • monitoramento ambiental

É praticamente um "JCL da infraestrutura".


Painéis de LED

Os painéis brancos não servem apenas para iluminar.

Eles possuem:

  • baixo consumo

  • pouca emissão de calor

  • longa vida útil

  • alimentação redundante

Em alguns datacenters críticos, até a iluminação possui dupla alimentação.

Se uma UPS falhar...

a sala continua iluminada.


As Grandes Bandejas Porta-Cabos

Observe aquelas estruturas metálicas horizontais.

Elas são chamadas de:

Cable Tray

ou

Cable Ladder.

Ali passam centenas de quilômetros de cabos.

Sim.

Quilômetros.

Em grandes bancos não é raro existir mais de 100 km de cabeamento.

Essas bandejas carregam:

  • fibra óptica

  • Ethernet

  • alimentação

  • gerenciamento

  • SAN

  • FICON

  • cabos de sincronismo

Existe uma regra importante:

Energia nunca deve viajar junto com dados.

Isso reduz interferências eletromagnéticas.


Os Barramentos Elétricos (Busway)

Ao invés de milhares de cabos grossos...

utiliza-se um grande barramento.

Imagine uma avenida principal.

Dela saem pequenas ruas alimentando cada rack.

Subestação

↓

UPS

↓

Busway

↓

Tap Box

↓

Rack IBM Z

É uma solução muito mais segura.


Os Tubos Coloridos

Talvez sejam o detalhe mais interessante da imagem.

Eles fazem parte do sistema hidráulico do datacenter.

Sim.

Existe hidráulica dentro da sala.

E muita.

Os tubos podem transportar:

Água gelada

Água de retorno

Água industrial

Água para trocadores de calor

Circuitos secundários

Em um IBM z17, centenas de quilowatts de calor precisam ser removidos continuamente.


Easter Egg Bellacosa ☕

Todo iniciante acredita que um computador "esquenta um pouco".

Na realidade...

Um único IBM Z pode dissipar mais calor do que dezenas de aparelhos de ar-condicionado domésticos funcionando simultaneamente.

Por isso existe uma verdadeira usina de refrigeração.


Os Flexíveis Pretos

Cada conjunto preto descendo até os racks provavelmente representa conduítes.

Dentro deles passam:

  • fibras ópticas

  • alimentação redundante A

  • alimentação redundante B

  • cabos de gerenciamento

  • sensores ambientais

Tudo separado.

Tudo identificado.

Tudo documentado.


Descidas Individuais

Nenhum rack recebe apenas um cabo.

Normalmente encontramos:

Energia A

Energia B

Fibra A

Fibra B

Rede administrativa

Rede de monitoramento

Aterramento

Tudo redundante.


O Piso Elevado

Embora não apareça na imagem...

quase certamente existe.

Imagine um piso falso com cerca de 60 centímetros.

Debaixo dele passam:

energia

fibras

água

aterramento

ar frio

É praticamente uma segunda cidade escondida.


Os Racks

Agora chegamos à parte mais visível.

Os gabinetes pretos.

Eles podem conter praticamente qualquer equipamento.

Em um datacenter IBM normalmente encontramos:

IBM z17

IBM z16

LinuxONE Emperor

Storage DS8900F

SAN Switch

OSA Express

Crypto Express

Open Systems Servers

Appliances

HMC


IBM z17

O protagonista.

Ali vivem:

CPs

zIIPs

zAAPs (histórico)

IFLs

SAPs

RAIM

Memória

Cache

Canal I/O

Processadores criptográficos

Tudo redundante.


Hardware Management Console (HMC)

Sem ela praticamente não existe IBM Z.

A HMC permite:

IPL

Shutdown

LPAR

Monitoramento

Capacity Planning

Firmware

Diagnóstico

É o painel de controle da nave espacial.


Storage IBM DS8900F

Ao lado do IBM Z quase sempre existe um storage.

Os dados não ficam "dentro" do mainframe.

Eles ficam aqui.

Dentro dele existem:

NVMe

Flash

Cache

RAID

Processadores próprios

Compressão

Deduplicação

Criptografia


SAN Directors

Eles são as grandes rotatórias do armazenamento.

Utilizam:

Fibre Channel

FICON

NVMe over FC

Conectam:

IBM Z

Storage

Backup

Tape


OSA Express

É a placa de rede do IBM Z.

Pode oferecer:

10 Gb

25 Gb

100 Gb

TCP/IP

IPv6

OSA-Express Integrated


Crypto Express

Pouca gente sabe...

O IBM Z possui placas dedicadas para criptografia.

Elas executam:

AES

RSA

ECC

SHA

TLS

PIN bancário

PIX

Open Banking

Tudo acelerado por hardware.


FICON

O COBOL acessa um arquivo VSAM.

O VSAM está no DS8900F.

Como chegam os dados?

Pelos canais FICON.

Eles substituíram os antigos ESCON.

São verdadeiras autoestradas ópticas.


Tape Library

Mesmo em 2026...

fitas continuam existindo.

IBM TS4500

TS7700

LTO

3592

Porque:

backup

retenção

compliance

baixo custo


UPS

Nenhum IBM Z fica ligado diretamente na concessionária.

Entre a rua e o computador existem:

UPS

Bancos de baterias

Inversores

Retificadores

Filtros

Transformadores


Geradores

Quando acaba a energia:

0 segundos

Baterias.

Poucos segundos depois:

Entram os geradores diesel.

O IBM Z nem percebe.


CRAH

Computer Room Air Handler.

Ele recebe água gelada.

Remove calor.

Empurra ar frio.

Tudo continuamente.


Chiller

Fica normalmente fora do prédio.

É o responsável por produzir água gelada.

Sem ele...

nenhum datacenter sobrevive.


Sensores

Espalhados pela sala existem centenas deles.

Temperatura

Umidade

Fumaça

Vibração

Água

Pressão

Energia

Fluxo de ar

Todos ligados ao BMS.


BMS

Building Management System.

É o "z/OS" do prédio.

Controla:

ar

energia

portas

alarmes

incêndio

temperatura

bombas

geradores


Sistema Anti-incêndio

Jamais utilize água.

Os sistemas modernos usam:

FM-200

Novec 1230

Inergen

Eles retiram o oxigênio suficiente para apagar o fogo sem danificar os equipamentos.


Detectores VESDA

Muito antes da fumaça aparecer...

eles detectam partículas microscópicas.

É um dos sistemas mais impressionantes de um datacenter.


Segurança Física

Cartão RFID

Biometria

Reconhecimento facial

Mantrap

CFTV

Guarda 24x7

Registro de acesso

Nada entra sem autorização.


O Caminho de um Simples Programa COBOL

Imagine que você executa:

JOB
 ↓
JES2
 ↓
z/OS
 ↓
COBOL
 ↓
Db2
 ↓
FICON
 ↓
SAN
 ↓
DS8900F
 ↓
SSD Flash
 ↓
Retorno

Tudo isso acontece em milissegundos.

Enquanto isso:

✔ CRAH remove calor

✔ UPS estabiliza energia

✔ Busway distribui alimentação

✔ Chiller produz água gelada

✔ HMC monitora processadores

✔ RMF coleta desempenho

✔ SMF registra estatísticas

✔ RACF protege acessos

✔ WLM prioriza cargas

✔ GDPS pode manter um site de contingência sincronizado

E o programador apenas vê:

DISPLAY "PROCESSAMENTO OK".

A Grande Lição para um Programador COBOL Padawan

Existe uma tendência natural entre iniciantes de acreditar que a programação começa e termina no editor de código. Porém, um sistema corporativo executado em um IBM Z depende de uma infraestrutura gigantesca: energia redundante, climatização de precisão, armazenamento de altíssimo desempenho, redes ópticas, segurança física, monitoramento ambiental e dezenas de componentes especializados trabalhando de forma sincronizada.

Compreender essa arquitetura transforma a maneira como enxergamos o desenvolvimento. Um SELECT no Db2, uma leitura em VSAM ou uma transação CICS percorrem uma cadeia sofisticada de hardware e software antes de retornar o resultado ao usuário.

Essa é uma das maiores lições do universo mainframe: programar bem significa entender o ecossistema completo. Quanto mais o programador COBOL conhece a infraestrutura que sustenta suas aplicações, mais preparado estará para escrever sistemas eficientes, diagnosticar problemas e dialogar com equipes de operações, redes, armazenamento e administração do z/OS.

No mundo IBM Mainframe, o código é apenas a ponta visível de um iceberg de engenharia construído para entregar disponibilidade, desempenho e confiabilidade ininterruptos. É essa combinação de software e infraestrutura que permite aos grandes bancos, seguradoras, companhias aéreas e bolsas de valores processarem milhões de transações por segundo, todos os dias, sem que a maioria das pessoas sequer perceba que um IBM Z está trabalhando silenciosamente nos bastidores.


domingo, 17 de julho de 2022

De C++ ao COBOL no IBM Z : Você Não Está Trocando de Linguagem. Está Descobrindo um Novo Conceito de Engenharia de Software.

 

Bellacosa Mainframe do c++ ao cobol no zos

☕ Um Café no Bellacosa Mainframe

De C++ ao COBOL no IBM Z

Você Não Está Trocando de Linguagem. Está Descobrindo um Novo Conceito de Engenharia de Software.

"Quem domina C++ já aprendeu a controlar memória, desempenho e arquitetura. Aprender COBOL no IBM Z significa descobrir como aplicar essa disciplina ao software que movimenta bancos, bolsas de valores, seguradoras, governos e companhias aéreas há mais de meio século."

Existe um mito que acompanha praticamente todo desenvolvedor C++ quando ouve a palavra COBOL.

"É uma linguagem antiga."

"Não tem orientação a objetos."

"Não tem templates."

"Não tem STL."

"Não tem RAII."

"Não tem ponteiros."

Curiosamente...

Nenhuma dessas características explica por que bilhões de transações financeiras continuam sendo processadas diariamente em IBM Z.

Porque o IBM Z nunca foi uma competição de linguagens.

Sempre foi uma competição de confiabilidade.

E esse é justamente o ponto onde muitos programadores C++ descobrem que já possuem muito mais em comum com o mundo Mainframe do que imaginavam.


O programador C++ já pensa como um engenheiro

Quem programa em C++ normalmente desenvolveu algumas virtudes raras.

Ele sabe que desempenho importa.

Ele entende custo de memória.

Conhece pilha (stack) e heap.

Sabe que concorrência é difícil.

Entende compilação.

Conhece linkedição.

Sabe que ABI existe.

Já ouviu falar em alignment.

Conhece cache.

Sabe otimizar algoritmos.

Entende estruturas de dados.

Aprendeu que software não é apenas escrever código.

É construir sistemas.

E adivinhe?

Essa filosofia é extremamente compatível com o IBM Z.


A maior diferença não é COBOL

A maior mudança será perceber que no Mainframe o protagonista não é a linguagem.

É o ambiente.

No Windows você pensa em:

  • aplicação

  • executável

  • DLL

  • usuário

No IBM Z você passa a pensar em:

  • Job

  • Dataset

  • Região

  • CICS

  • IMS

  • DB2

  • RACF

  • JES2

  • Workload

  • Segurança

  • Disponibilidade

Você deixa de desenvolver apenas programas.

Passa a desenvolver partes de um ecossistema gigantesco.


Bellacosa Mainframe c++ versus cobol no zos

C++ e COBOL possuem mais semelhanças do que parece

À primeira vista parecem opostos.

Mas compare.

Ambos são compilados

Não existe interpretação.

Existe compilador.

Existe otimização.

Existe geração de código objeto.

Existe linkedição.

Existe build.

Tudo isso será familiar.


Ambos valorizam desempenho

No desktop você mede milissegundos.

No Mainframe mede milhões de transações por hora.

A preocupação é a mesma.

Executar rapidamente.

Consumir poucos recursos.

Não desperdiçar CPU.


Ambos valorizam estabilidade

Em C++ um ponteiro inválido pode derrubar um processo.

No Mainframe um erro pode impedir milhões de pagamentos.

A consequência muda.

A responsabilidade também.


Ambos vivem muitos anos

Aplicações C++ frequentemente permanecem décadas.

O mesmo acontece com COBOL.

Você aprenderá rapidamente que software corporativo envelhece muito mais lentamente do que aplicações web.


Ambos exigem disciplina

C++ não perdoa descuidos.

COBOL também não.

A diferença é que os erros costumam aparecer em regras de negócio.

Não em segmentation faults.


Onde tudo muda

Agora começam as diferenças.


Memória

Em C++ você administra memória.

new

delete

smart pointers

RAII

ownership

No COBOL praticamente toda memória já está definida.

Você declara estruturas.

O runtime administra tudo.

Não existe malloc para o desenvolvedor comum.

Você passa menos tempo gerenciando memória.

E muito mais tempo modelando dados.


Dados são o centro do universo

No C++ muitos desenvolvedores começam pensando em objetos.

No COBOL começa-se pensando em registros.

Campos.

Layouts.

Arquivos.

Tabelas.

Copys.

Estruturas.

A pergunta muda.

Em vez de:

"Qual classe criar?"

Você pergunta:

"Como esse registro representa o negócio?"


Legibilidade acima de tudo

Em C++ frequentemente vemos código extremamente compacto.

Templates.

Metaprogramação.

Lambdas.

Concepts.

Operator overloading.

No COBOL o objetivo sempre foi outro.

Código que qualquer desenvolvedor consiga ler daqui vinte anos.

Você rapidamente perceberá que clareza vale ouro.


Regras de negócio

Aqui acontece uma mudança importante.

Grande parte do código COBOL não implementa algoritmos complexos.

Implementa decisões empresariais.

Calcular juros.

Validar CPF.

Fechar folha.

Liquidar títulos.

Atualizar contas.

Emitir boletos.

Processar seguros.

Calcular impostos.

É programação.

Mas profundamente ligada ao negócio.


Batch é uma mudança de mentalidade

Quem veio do Windows costuma pensar em aplicações interativas.

No Mainframe você aprende Batch.

Recebe arquivos.

Valida.

Ordena.

Consolida.

Atualiza bancos.

Gera relatórios.

Tudo cuidadosamente orquestrado.

Muitos iniciantes subestimam Batch.

Depois descobrem que ele continua sendo uma das maiores forças do IBM Z.


Online também existe

Não pense que tudo é Batch.

Você conhecerá o CICS.

Ali surgem conceitos familiares.

Sessões.

Transações.

Chamadas.

Programas.

Controle de fluxo.

Mas com disponibilidade muito maior do que normalmente encontramos em aplicações tradicionais.


Banco de Dados

Se você conhece PostgreSQL, SQL Server ou Oracle, já possui uma excelente base.

Aprender DB2 será muito mais simples.

Você encontrará:

SELECT

INSERT

UPDATE

DELETE

JOIN

CURSOR

COMMIT

ROLLBACK

Índices.

Plano de acesso.

A sintaxe muda pouco.

A engenharia por trás é impressionante.


Arquivos ainda são importantes

Enquanto muitos ambientes modernos vivem exclusivamente de bancos relacionais, o IBM Z continua dominando processamento de arquivos gigantescos.

VSAM.

Sequential Files.

GDG.

Flat Files.

Isso surpreende muitos desenvolvedores.

Mas faz sentido quando milhões de registros precisam ser processados continuamente.


Segurança não é um detalhe

Em muitos ambientes segurança aparece no fim do projeto.

No IBM Z ela nasce junto.

RACF.

Perfis.

Grupos.

Permissões.

Auditoria.

Controle de acesso.

Tudo extremamente integrado.


A melhor trilha para um programador C++

Se eu estivesse orientando um excelente desenvolvedor C++, faria exatamente este caminho.


Etapa 1

Não aprenda COBOL primeiro.

Aprenda IBM Z.

Entenda:

  • o que é um Mainframe

  • por que existe

  • quais problemas resolve

  • disponibilidade

  • redundância

  • processamento de missão crítica

Sem isso COBOL parecerá apenas uma linguagem antiga.


Etapa 2

Aprenda z/OS

Entenda:

  • Dataset

  • PDS

  • PDSE

  • Sequential

  • VSAM

  • Catalog

  • Volume

  • Job

  • Step

Esses conceitos aparecerão diariamente.


Etapa 3

Aprenda TSO/ISPF

Aprenda a navegar.

Editar.

Compilar.

Executar.

Comparar arquivos.

Pesquisar membros.

Como um programador Linux aprende Bash.


Etapa 4

Aprenda JCL

Esse é provavelmente o maior choque.

JCL não é linguagem de programação.

É descrição de execução.

Quem entende JCL entende o Mainframe.


Etapa 5

Agora sim...

COBOL.

Comece apenas com:

IDENTIFICATION DIVISION

DATA DIVISION

WORKING-STORAGE

PROCEDURE DIVISION

IF

PERFORM

EVALUATE

READ

WRITE

MOVE

COMPUTE

Nada mais.


Etapa 6

Arquivos

Aprenda:

Sequential

VSAM

KSDS

ESDS

READ

WRITE

START

REWRITE

DELETE


Etapa 7

SQL

COBOL + DB2.

Aqui você descobrirá onde grande parte dos sistemas corporativos realmente vivem.


Etapa 8

CICS

Aprenda:

COMMAREA

MAP

Pseudo Conversação

LINK

XCTL

RETURN

RESP

Depois Channels e Containers.


Etapa 9

Debug

SDSF

JES2

Spool

Abends

Dump

Mensagens

SYSOUT

SYSUDUMP

SYSABOUT

Aprenda a investigar problemas.


Etapa 10

Modernização

Somente depois disso avance para:

REST

JSON

XML

z/OS Connect

MQ

Kafka

Java

Python

OpenAPI

Git

VS Code

Zowe

Ansible

OpenShift

Porque agora você compreenderá onde essas tecnologias entram.


O que treinar diariamente

Sugiro uma rotina simples.

Segunda

Resolver pequenos exercícios COBOL.

Terça

Ler JCL.

Quarta

Executar Batch.

Quinta

SQL no DB2.

Sexta

Ler código legado.

Sábado

Refatorar programas COBOL.

Domingo

Estudar arquitetura IBM Z.

Em poucos meses você terá construído uma visão muito superior à de quem apenas decorou comandos.


O maior erro de quem vem do C++

O desenvolvedor tenta transformar COBOL em C++.

Não faça isso.

COBOL resolve outro tipo de problema.

Quanto antes aceitar isso, mais rápido aprenderá.


O maior desafio

Não será aprender comandos.

Será aprender o domínio bancário.

Seguros.

Cartões.

Folha.

Tributos.

Previdência.

Liquidação financeira.

No IBM Z, entender o negócio vale tanto quanto dominar a linguagem.


O que um programador C++ aprende com o Mainframe

Depois de algum tempo algo curioso acontece.

Você volta ao C++ diferente.

Mais disciplinado.

Mais cuidadoso.

Mais preocupado com rastreabilidade.

Mais atento à estabilidade.

Mais consciente do impacto de uma mudança.

Porque o IBM Z ensina uma lição rara.

Software não existe apenas para impressionar desenvolvedores.

Existe para manter empresas funcionando.

Existe para pagar salários.

Existe para processar aposentadorias.

Existe para autorizar cartões.

Existe para movimentar bolsas de valores.

Existe para garantir que um avião possa decolar porque milhares de reservas foram processadas corretamente.

Essa responsabilidade muda completamente a forma como enxergamos programação.


Conclusão

Se você domina C++, já possui uma base extraordinária.

Você entende algoritmos, compilação, desempenho e arquitetura. Agora chegou a hora de aprender algo que poucas universidades ensinam: como grandes organizações constroem sistemas capazes de operar 24 horas por dia, sete dias por semana, durante décadas, com confiabilidade quase absoluta.

COBOL no IBM Z não substitui o C++.

Ele complementa sua formação.

Você continuará pensando como engenheiro, mas passará a enxergar software por outra perspectiva: continuidade, governança, auditoria, integridade dos dados e estabilidade operacional.

No Bellacosa Mainframe costumo dizer que aprender IBM Z é como visitar uma usina hidrelétrica depois de anos construindo geradores portáteis.

Os dois produzem energia.

Mas em escalas completamente diferentes.

O mesmo vale para C++ e COBOL.

Você não está abandonando a programação moderna.

Está descobrindo onde muitos dos sistemas mais importantes do planeta aprenderam a nunca falhar.

E essa é uma experiência que transforma qualquer desenvolvedo

sábado, 16 de julho de 2022

Leadale no Daichi nite: O Sysprog que Voltou ao Ambiente de Produção Após 200 Anos — A Lição Definitiva sobre Sistemas Legados, Alta Disponibilidade e Evolução sem Administradores

 

Bellacosa Mainframe e o fantastico leadale no daichi nite

☕ Um Café no Bellacosa Mainframe

Leadale no Daichi nite (リアデイルの大地にて): O Sysprog que Voltou ao Ambiente de Produção Após 200 Anos — A Lição Definitiva sobre Sistemas Legados, Alta Disponibilidade e Evolução sem Administradores

"Existe uma fantasia comum entre profissionais de TI: encontrar um sistema perfeito. Leadale mostra algo muito mais interessante. Um sistema que continuou funcionando por dois séculos depois que seus administradores desapareceram."


Ficha Técnica

Título original: リアデイルの大地にて (Leadale no Daichi nite)

Título internacional: In the Land of Leadale

Autor (Light Novel): Ceez

Ilustrador: Tenmaso

Web Novel: 2010

Light Novel: Janeiro de 2019

Mangá: 2019

Anime: Janeiro de 2022

Estúdio: Maho Film

Direção: Yuji Yanase

Música: Kujira Yumemi

Episódios: 12

Gênero:

  • Isekai

  • Fantasia

  • Slice of Life

  • Aventura

  • Comédia

  • MMORPG

  • Slow Life

Classificação indicativa aproximada:
14 anos


Sinopse

Keina Kagami vive presa a uma cama de hospital devido às sequelas de um grave acidente. Seu único contato com o mundo exterior acontece através de um VRMMORPG chamado Leadale, onde controla Cayna, uma High Elf extremamente poderosa.

Após uma falha no equipamento que a mantém viva, Keina acredita ter morrido. Entretanto, desperta dentro do universo de Leadale.

Só que existe um detalhe inesperado.

Não é exatamente o mesmo jogo.

Duzentos anos se passaram.

As cidades mudaram.

Os reinos desapareceram.

Os NPCs construíram civilizações.

Os jogadores sumiram.

O mundo evoluiu sozinho.

Ela acorda como uma espécie de administradora esquecida observando um ambiente que continuou funcionando sem manutenção durante séculos.


Resumo da História

Ao contrário da maioria dos isekais, Leadale praticamente elimina o conflito tradicional.

Não existe um Rei Demônio.

Não há torneios.

Não existe uma guerra permanente.

O objetivo da protagonista é simplesmente...

...entender o que aconteceu.

Cada episódio representa uma descoberta:

  • antigas torres do jogo;

  • antigos sistemas mágicos;

  • NPCs que evoluíram;

  • filhos adotivos criados por eventos do jogo;

  • itens lendários esquecidos;

  • tecnologias antigas.

É uma jornada de redescoberta.


O Grande Diferencial

Grande parte dos isekais utiliza esta fórmula:

protagonista fraco → treinamento → evolução → salvar o mundo.

Leadale faz exatamente o contrário.

Cayna começa absurdamente poderosa.

Ela praticamente já terminou o jogo.

O anime pergunta:

"O que acontece quando alguém com privilégios administrativos retorna depois que ninguém mais lembra como o sistema foi construído?"

Essa mudança altera completamente o foco da narrativa.


A História Sob a Ótica Bellacosa Mainframe

Imagine um ambiente IBM Z.

Em 1985 um time desenvolveu um gigantesco sistema bancário.

Os desenvolvedores se aposentaram.

Os operadores mudaram.

As empresas mudaram.

Os bancos foram comprados.

Os analistas morreram.

Mas...

o sistema nunca parou.

Quarenta anos depois chega alguém que participou da implantação original.

Essa pessoa lembra:

  • onde ficam os módulos antigos;

  • quais parâmetros nunca devem ser alterados;

  • por que determinado JOB existe;

  • quem criou aquele catálogo;

  • como restaurar uma base perdida.

Essa pessoa é Cayna.

Ela conhece absolutamente tudo.

Os habitantes enxergam magia.

Ela enxerga arquitetura.


Cayna é praticamente um Sysprog

Na visão Bellacosa Mainframe, Cayna possui privilégios equivalentes a:

  • RACF SPECIAL

  • STORAGE ADMIN

  • SECURITY ADMIN

  • OPERATOR

  • APPLICATION OWNER

  • DATABASE ADMIN

Tudo ao mesmo tempo.

Ela conhece comandos que ninguém mais conhece.

Possui itens que ninguém consegue reproduzir.

Acessa áreas proibidas.

Entra em estruturas antigas.

É literalmente uma administradora do ambiente.


Os Personagens

Cayna

Extremamente poderosa.

Mas nunca arrogante.

Ela prefere resolver problemas pequenos.

Ajuda aldeões.

Conserta pontes.

Ensina magia.

Cuida das pessoas.

Seu verdadeiro poder é emocional.


Skargo

Sacerdote.

Filho adotivo de Cayna.

Provavelmente um dos personagens mais engraçados da série.

Seu excesso de reverência produz várias situações cômicas.


Mai-Mai

Diretora da Academia.

Especialista em magia.

Apesar da aparência elegante, possui personalidade extremamente imprevisível.


Kartatz

Anão.

Construtor.

É o mais racional dos três filhos.

Representa estabilidade.


Os NPCs

Talvez o aspecto mais interessante.

Eles deixaram de agir como personagens de jogo.

Agora possuem história própria.

Memórias.

Famílias.

Objetivos.

É como observar uma IA evoluindo por séculos.


Aventuras

Cada aventura serve mais para explorar o mundo do que para criar tensão.

Entre elas:

  • exploração das torres antigas;

  • reencontro com antigos conhecidos;

  • investigação sobre os Guardiões;

  • resolução de conflitos locais;

  • ajuda a comerciantes;

  • descoberta de ruínas;

  • visitas às cidades reconstruídas;

  • compreensão da nova política mundial.

É um anime onde viajar importa mais do que lutar.


Temáticas

Segunda oportunidade

Keina teve uma vida extremamente limitada.

Leadale oferece aquilo que ela nunca teve.

Liberdade.


Solidão

Ela percebe que todos os jogadores desapareceram.

É possivelmente a última sobrevivente daquela geração.

Existe uma melancolia silenciosa em diversos episódios.


Tempo

O tempo muda tudo.

Pessoas.

Cidades.

Civilizações.

Mesmo aquilo que parecia permanente desaparece.


Família

Os filhos adotivos nasceram como mecânica do jogo.

Agora são pessoas reais.

Isso gera uma discussão interessante:

Quando uma inteligência artificial deixa de ser apenas código?


Legado

Nenhum criador permanece para sempre.

Mas sua obra continua.


Mensagens Ocultas

Todo sistema evolui

Mesmo sem seus desenvolvedores.

Essa talvez seja a maior metáfora da série.


O conhecimento desaparece

As torres que Cayna construiu agora são ruínas.

Ninguém lembra sua finalidade.

É exatamente o que acontece em sistemas legados.

A documentação some.

Os especialistas se aposentam.

As novas gerações apenas utilizam.


Poder não significa responsabilidade

Embora tenha poder absoluto, Cayna evita interferir no destino das pessoas.

Ela entende que um bom administrador modifica apenas aquilo que realmente precisa ser modificado.

É uma filosofia muito próxima da administração de ambientes críticos.


O Estúdio Maho Film

A Maho Film nunca esteve entre os gigantes da indústria como Kyoto Animation, MAPPA, ufotable ou Bones.

Mesmo assim tornou-se conhecida por adaptar obras de fantasia confortável (iyashikei fantasy).

Outras produções incluem:

  • I'm Standing on a Million Lives

  • The World's Finest Assassin Gets Reincarnated in Another World as an Aristocrat

  • Kami-tachi ni Hirowareta Otoko (By the Grace of the Gods)

Sua principal característica é priorizar personagens simpáticos, cenários acolhedores e uma narrativa relaxante em vez de grandes sequências de ação. Em Leadale, essa abordagem combina perfeitamente com a proposta da obra.


Qualidade da Animação

Visualmente, Leadale não impressiona pela complexidade técnica.

As batalhas são simples.

Os efeitos mágicos são competentes.

Os cenários cumprem seu papel.

O verdadeiro destaque está na direção de arte.

As cidades parecem realmente habitadas.

A iluminação transmite conforto.

A trilha sonora reforça constantemente a sensação de aventura tranquila.

É um anime feito para relaxar.


Impacto Cultural

Leadale não foi um fenômeno como Sword Art Online, Overlord ou Mushoku Tensei.

Ainda assim consolidou um subgênero cada vez mais popular:

o Slow Life Isekai.

Nele, o foco deixa de ser "salvar o mundo" e passa a ser viver nele. Esse estilo influenciou e caminhou ao lado de obras como By the Grace of the Gods, I've Been Killing Slimes for 300 Years and Maxed Out My Level e Farming Life in Another World, mostrando que o público também aprecia histórias de conforto, convivência e reconstrução.


Houve censura?

Não houve registros relevantes de censura durante sua exibição no Japão ou em lançamentos internacionais.

Isso ocorre porque:

  • violência moderada;

  • praticamente nenhuma cena de gore;

  • fan service discreto;

  • linguagem leve;

  • ausência de temas políticos sensíveis.

A adaptação do anime também permaneceu bastante fiel ao tom da light novel, realizando apenas cortes naturais para condensar a história em 12 episódios, sem alterações motivadas por censura.


Curiosidades

  • O nome "Leadale" deriva da combinação de elementos ligados ao mundo virtual criado para o jogo.

  • Os "filhos" de Cayna eram originalmente um recurso do MMORPG, mas o salto temporal faz com que se tornem indivíduos completos, criando situações tão emocionantes quanto divertidas.

  • O conceito de um mundo persistente por séculos sem jogadores lembra a ideia de servidores que continuam ativos mesmo após o abandono de seus administradores.


Veredicto Bellacosa Mainframe

Se Overlord representa um superusuário assumindo o controle de um datacenter abandonado, Leadale no Daichi nite mostra algo ainda mais raro: o retorno da arquiteta original ao ambiente de produção depois de dois séculos de operação contínua.

Cayna não precisa provar sua força. Seu verdadeiro desafio é compreender como um sistema complexo evoluiu sem seus administradores, preservando serviços, criando novas regras de negócio e formando uma sociedade inteira sobre a infraestrutura que ela ajudou a construir.

Para quem trabalha com IBM Z, COBOL, CICS, DB2 ou z/OS, a metáfora é irresistível. Quantos sistemas corporativos permanecem em operação há décadas, sustentando milhões de transações, enquanto seus criadores já se aposentaram? Assim como Cayna, o especialista em mainframe frequentemente retorna a um ambiente vivo, onde o código original foi expandido por inúmeras gerações de desenvolvedores.

No fim, Leadale no Daichi nite deixa uma mensagem poderosa: o software pode sobreviver aos seus autores, mas o conhecimento sobre sua arquitetura é o verdadeiro tesouro. Em um mundo de tecnologia em constante mudança, preservar esse conhecimento é tão importante quanto manter o sistema funcionando. É uma lição que vale tanto para um reino de fantasia quanto para qualquer ambiente IBM Z que continua processando negócios críticos décadas após sua implantação.


sexta-feira, 15 de julho de 2022

☕💥 A Jornada do Sysprog Padawan – ACEE : Anatomia do Crachá Mágico do Reino IBM Z - Parte II

 

Bellacosa Mainframe apresenta o ACEE Parte II

☕💥 A Jornada do Sysprog Padawan – Parte 2

ACEE – Anatomia do Crachá Mágico do Reino IBM Z

O que realmente existe dentro de um ACEE?

"Todo Sysprog olha para um dump. O Sysprog Jedi conversa com os control blocks."

Bellacosa Mainframe


Introdução

Na Parte 1 descobrimos que o ACEE é praticamente o crachá encantado do Reino IBM Z.

Mas afinal...

O que existe dentro dele?

Ele possui apenas o userid?

Possui senha?

Está criptografado?

Pode ser alterado?

Quem consegue enxergá-lo?

Quanto espaço ocupa?

É isso que vamos explorar.


Antes de tudo

O ACEE é um Control Block do RACF.

Ele é criado em memória.

Não é VSAM.

Não é DB2.

Não é Dataset.

Não é USS File.

Ele simplesmente nasce, vive durante a sessão e desaparece ao final dela.


Onde mora o ACEE?

Depende.

Pode estar associado a:

TCB

Task Control Block


ASCB

Address Space Control Block


SRB

Service Request Block


OMVS Process


DB2 Thread


CICS Task


IMS Region


Started Task


Anatomia simplificada

Podemos imaginar o ACEE como uma estrutura lógica.

+--------------------------------+
| ACEE HEADER                    |
+--------------------------------+
| USERID                         |
+--------------------------------+
| GROUPS                         |
+--------------------------------+
| SPECIAL FLAGS                  |
+--------------------------------+
| UID / GID                      |
+--------------------------------+
| CERTIFICATES                   |
+--------------------------------+
| MFA                            |
+--------------------------------+
| SECURITY LABELS                |
+--------------------------------+
| CUSTOM ATTRIBUTES              |
+--------------------------------+
| POINTERS                       |
+--------------------------------+

Naturalmente a IBM não documenta tudo detalhadamente para programação de aplicações comuns.

Mas Sysprogs adoram estudar essas estruturas.


Campo 1 — USERID

O mais conhecido.

Exemplo

VBELLACO

Pode possuir até oito caracteres.


Ele representa:

Quem você é.


Mas atenção.

Senha NÃO fica armazenada.


Passphrase também não.


Hash de senha também não.


Segurança agradece.


Campo 2 — Nome do Grupo

Exemplo

SYS1

ou

MQADMIN

Grupo primário.


Grupo conectado.


Grupo default.


Campo 3 — Connected Groups

Pode haver dezenas.

Exemplo

DBA

SYSOPER

MQADM

IMSADM

DEVOPS

SECURITY

Essas informações permitem decisões rápidas.


Sem voltar ao banco RACF.


Campo 4 — Special Attributes

Muito importante.


Flag SPECIAL

Administrador.


OPERATIONS

Super usuário RACF.


AUDITOR

Auditoria.


CLAUTH

Gerencia Classes.


ROAUDIT

Read-only.


Curiosidade Bellacosa ☕

SPECIAL é praticamente:

A chave mestra do castelo.


OPERATIONS

É o passe VIP.


AUDITOR

É o fiscal do reino.


Campo 5 — OMVS Segment

Chegamos ao USS.


UID

Exemplo

1000

GID

100

HOME

/u/vbellaco

PROGRAM

/bin/sh

Campo 6 — Certificados

Muito usado hoje.


Digital Certificate


PKI


TLS


SSH


MQ


zOS Connect


API Gateway


Open Banking


PIX


Pode existir referência ao certificado associado ao usuário.


Campo 7 — MFA

Nos ambientes modernos.


RSA


TOTP


Smartcard


Passkey


FIDO


Token Context


Campo 8 — Labels

Pouco utilizados.

Mas interessantes.


MLS

Mandatory Access Control


Exemplos

PUBLIC


CONFIDENTIAL


SECRET


TOPSECRET

Muito comum em:

Defesa

Governo

Militar


Campo 9 — ACEE Tokens

Pouco comentado.

Muito poderoso.


Permitem passar contexto.


CICS utiliza.


DB2 utiliza.


MQ utiliza.


Subsystems utilizam.


Cross-memory utiliza.


Campo 10 — Ponteiros

Sysprog gosta.


Ponteiro para:

TCB

ASCB

Groups

Security Labels

OMVS

Certificates


É um verdadeiro mini ecossistema.


Quanto memória consome?

Pergunta clássica.


Resposta curta.

Depende.


Usuário simples

Alguns KB.


Usuário com muitos grupos

Mais.


Certificados

Mais.


MFA

Mais.


Custom Attributes

Mais.


Na prática.

Centenas.

Milhares.

De ACEEs.

Não representam um problema.


O impacto em CPU

Muito pequeno.


Comparado ao custo de consultar RACF.


ACEE economiza:

CPU

I/O

Locks

ENQ

Contention


Em um banco.

100 mil sessões.

Economia enorme.


z/OS 3.1

Novidade interessante.


Custom Fields.


Permitem aplicações modernas.

Consultar contexto.


Sem voltar ao RACF.


Menos latência.


Menos I/O.


Mais escalabilidade.


O que NÃO existe no ACEE?

Senha.


Passphrase.


Hash.


Histórico.


Dataset profiles.


Banco RACF completo.


Quem pode enxergar um ACEE?

Usuário comum?

Não.


COBOL?

Normalmente não.


Sysprog?

Sim.


IPCS

Sim.


Dumps

Sim.


Ferramentas IBM

Sim.


IPCS

Nosso sabre de luz.


Dump

IPCS

VERBX

Interpretar ACEE


Ferramentas comerciais ajudam bastante.


zSecure


Security Server utilities


IBM Support Tools


Easter Egg Bellacosa ☕

Se você abrir um dump e encontrar:

TCB

ASCB

ACEE

UID

SPECIAL

CERT


Parabéns.

Você acabou de entrar no clube dos Sysprogs que começam a conversar com os control blocks.


Analogia Bellacosa

Imagine novamente o castelo.


No crachá mágico existem:

Nome

Guilda

Permissões

Passaporte

Cartão diplomático

Etiqueta de segurança

Passe do metrô USS

Certificado digital

Token MFA


Tudo em um único objeto.


E o melhor.

O guarda SAF apenas olha para ele.


Não precisa voltar ao cartório RACF.


Economizando tempo.

CPU.

E trabalho.


Resumo para guardar

CampoFunção
USERIDIdentidade
GROUPSGrupos
SPECIALAdministração
UIDUSS
GIDUSS
CERTTLS
MFAAutenticação
LABELMLS
TOKENContexto
POINTERSLigações internas

☕💥 Continua na Parte 3

O Nascimento do ACEE

Como ele é criado no TSO, CICS, IMS, Batch, Started Tasks, USS, MQ e DB2, incluindo RACROUTE VERIFY, SAF, FASTAUTH, diagramas passo a passo e exemplos reais de fluxo de autenticação.


quinta-feira, 14 de julho de 2022

☕💥 Arrays em COBOL: O Poder Oculto do OCCURS, SSRANGE e a Guerra Contra a Invasão de Memória

 

Bellacosa Mainframe e as tabelas internas no COBOL occurs e arrays

☕💥 Arrays em COBOL: O Poder Oculto do OCCURS, SSRANGE e a Guerra Contra a Invasão de Memória

Ou como evitar transformar seu Address Space em um filme de terror para Sysprogs



Introdução

Existe um momento na vida de todo desenvolvedor COBOL júnior em que ele descobre duas verdades universais:

A primeira é que OCCURS parece simples até deixar de ser simples.

A segunda é que existe uma entidade maligna chamada:

SSRANGE

capaz de transformar uma manhã tranquila em uma reunião emergencial envolvendo desenvolvimento, suporte, infraestrutura, DBA, operador e um sysprog segurando uma caneca de café já fria.

E tudo isso por causa de um pequeno detalhe:

MOVE WS-NOME(9999)

quando a tabela possui apenas:

OCCURS 100 TIMES.

Bem-vindo ao fascinante mundo das tabelas COBOL.


Capítulo 1 – O que é OCCURS?

OCCURS é o mecanismo utilizado pelo COBOL para criar estruturas repetitivas.

Em linguagens modernas chamaríamos isso de:

  • Array

  • Vetor

  • Lista fixa

  • Matriz

Exemplo:

01 CLIENTES.

   05 CLIENTE OCCURS 10 TIMES.

      10 NOME PIC X(30).
      10 IDADE PIC 99.

Memória:

CLIENTE(1)
CLIENTE(2)
CLIENTE(3)
...
CLIENTE(10)

COBOL simplesmente reserva um bloco contínuo.


A origem histórica

Década de 60.

Memória era absurdamente cara.

IBM 1401

4 KB

IBM System/360

256 KB

370

1 MB

Não existia:

  • Java Collections

  • Python List

  • C++ Vector

Era necessário reservar memória antecipadamente.

Daí nasceu:

OCCURS

Curiosidade histórica

Os engenheiros da IBM chamavam essas estruturas de:

Table Handling

Muito antes da expressão Array Processing se popularizar.


Capítulo 2 — Como a memória é organizada

Exemplo:

01 TAB.

   05 ITEM OCCURS 5 TIMES.

      10 CODIGO PIC 9(5).

Cada item ocupa:

5 bytes

Total

25 bytes

Layout:

0000 ITEM(1)
0005 ITEM(2)
0010 ITEM(3)
0015 ITEM(4)
0020 ITEM(5)

Acesso:

MOVE ITEM(3) TO WS-X

COBOL faz:

Base + ((3-1)*5)

Capítulo 3 – O Terror do Out of Bounds

Tabela:

05 CLIENTE OCCURS 100 TIMES.

Código:

MOVE NOME(101)

Problema.

A posição não existe.


Antigamente

Compilador:

NOSSRANGE

Padrão.

Nenhuma verificação.

Resultado:

Leitura aleatória.

Sobrescrever memória.

Corrupção.


O verdadeiro vilão

Imagine:

01 TABELA.

05 DADOS OCCURS 100 TIMES.

05 FLAG-FINAL PIC X.

Erro:

MOVE "S" TO DADOS(101)

Na prática:

FLAG-FINAL = S

ou pior.

Modifica outra estrutura.


Isso é invasão de memória?

Sim.

Tecnicamente:

Buffer overflow

Memory overwrite

Storage corruption


Capítulo 4 — Address Space

No zOS cada Job possui.

Address Space.

Exemplo

JOB1234



Private Area


LSQA


SWA


Subpools


Heap


Stack

Seu programa COBOL vive ali.


Se escrever fora da tabela:

pode corromper:

Working Storage

Heap

LE Runtime

Control Blocks


Em casos extremos:

S0C4

S878

U4038


Capítulo 5 — SSRANGE

A melhor invenção desde o café expresso.

Compilação:

SSRANGE

ou

CBL SSRANGE

Exemplo

MOVE WS-NOME(101)

Resultado:

Abend imediato.

Mensagem:

IGZxxxx

Subscript out of range


Excelente para:

Homologação

Teste

QA


Produção?

Normalmente:

NOSSRANGE

Performance melhor.


Dica Bellacosa

Desenvolvimento

SSRANGE

Produção

NOSSRANGE


Capítulo 6 — Índices

Ruim:

77 WS-I PIC 999.

Melhor:

05 CLIENTE OCCURS 100 TIMES
   INDEXED BY IDX.

SET

SET IDX TO 1

Próximo

SET IDX UP BY 1

Anterior

SET IDX DOWN BY 1

Por que índice é melhor?

Subscript:

CLIENTE(I)

Cálculo toda vez.


Index

Endereço pronto.

Ponteiro interno.

Mais rápido.


Capítulo 7 – Navegação

Crescente

SET IDX TO 1


PERFORM UNTIL IDX > MAX

PROCESSA

SET IDX UP BY 1

END-PERFORM

Decrescente

SET IDX TO MAX


PERFORM UNTIL IDX = 0


PROCESSA


SET IDX DOWN BY 1


END-PERFORM

Muito usado em:

Compressão

Ordenação

Rollback


Capítulo 8 — SEARCH

Busca sequencial.

SEARCH CLIENTE


AT END


DISPLAY "NAO ACHOU"


WHEN ID = WS-ID


DISPLAY NOME

END-SEARCH

Complexidade

O(n)


100 mil registros.

50 mil leituras médias.


SEARCH ALL

Arma secreta.

Busca binária.


Tabela obrigatoriamente ordenada.

SEARCH ALL CLIENTE


WHEN ID(IDX)=WS-ID


DISPLAY "ACHOU"

END-SEARCH

Complexidade

O(log n)


1000000 itens.

Comparações:

~20


Magia matemática.


Capítulo 9 — OCCURS DEPENDING ON

Tabela variável.

05 QTDE PIC 9(4).


05 CLIENTE OCCURS 1 TO 1000 TIMES

DEPENDING ON QTDE.

Muito usado em:

MQ

Copybooks

APIs

Arquivos


Capítulo 10 — Bidimensional

Exemplo.

Agência x Dia

05 MOVIMENTO.

10 AG OCCURS 100.

15 DIA OCCURS 31.

20 TOTAL PIC 9(10).

Uso:

TOTAL(10,15)

Agência 10.

Dia 15.


Tridimensional

ANO

MES

DIA
VENDAS(2026,6,23)

N dimensões

Teoricamente ilimitado.

Exemplo.

Banco.

País

Estado

Agência

Conta

Produto

Dia


Capítulo 11 — Ordenação

Tabela ordenada.

ASCENDING KEY

Muito útil para:

SEARCH ALL

Caches

Lookup


Capítulo 12 – Quando usar tabela

Excelente:

Parâmetros

Cache

Código UF

Tabela IR

CEP

Conversões


Ruim:

Milhões registros.


Melhor:

DB2

VSAM

IMS


Capítulo 13 – Performance

SEARCH

O(n)

SEARCH ALL

O(log n)

Index

Muito rápido

Subscript

Mais lento

SSRANGE

Seguro

NOSSRANGE

Rápido


Easter Egg COBOL

Existe uma lenda entre veteranos de mainframe.

Diz-se que em algum datacenter esquecido dos anos 80 existe um programa COBOL compilado com:

NOSSRANGE
OPT(2)
FASTSRT
ARITH(EXTEND)

executando desde 1987.

Ninguém sabe exatamente o que ele faz.

Ninguém possui o código-fonte.

Ninguém ousa recompilar.

Mas toda madrugada, às 02h17, ele produz um relatório financeiro perfeito, movimenta bilhões de dólares e desaparece novamente nas profundezas do JES2.

Os sysprogs apenas observam o spool, tomam um gole de café e repetem o antigo mantra do reino z/OS:

"Se está funcionando há 39 anos, não toque."


Conclusão

OCCURS é muito mais do que um simples array.

É uma das construções mais antigas, elegantes e eficientes já criadas para processamento em lote de grande volume.

Dominar:

  • OCCURS

  • INDEXED BY

  • SET

  • SEARCH

  • SEARCH ALL

  • SSRANGE

  • OCCURS DEPENDING ON

  • Tabelas multidimensionais

  • Navegação UP e DOWN

  • Layout de memória

  • Address Space do z/OS

é um dos marcos que separam o Padawan COBOL do Cavaleiro do Batch Jedi Council.

Porque no universo do Mainframe existe uma verdade absoluta:

"DB2 pode falhar, CICS pode reciclar, VSAM pode corromper, mas um OCCURS acessado fora dos limites sempre encontrará uma maneira criativa de arruinar o dia de alguém."

quarta-feira, 13 de julho de 2022

☕💣⏳ OS 10 ANIMES QUE HERDARAM O CÓDIGO-FONTE DE YU-NO — VIAGEM NO TEMPO, MULTIVERSOS E O DEBUG DA REALIDADE

 

Bellacosa Mainframe e animes com viagem no tempo

☕💣⏳ OS 10 ANIMES QUE HERDARAM O CÓDIGO-FONTE DE YU-NO — VIAGEM NO TEMPO, MULTIVERSOS E O DEBUG DA REALIDADE

Introdução

Existe um momento na carreira de todo profissional de tecnologia em que ele percebe uma verdade inconveniente:

Se eu pudesse voltar no tempo, teria evitado aquele erro em produção.

Quem trabalha com mainframe conhece bem essa sensação.

Um JCL enviado errado.

Um UPDATE sem WHERE.

Uma alteração em COBOL que parecia inocente.

Um restore que deveria ter sido feito antes.

Infelizmente, a vida não possui:

BACKOUT
UNDO
RESTORE POINT
GDG(-1)

Mas os animes adoram imaginar um mundo onde isso é possível.

E poucos fizeram isso de forma tão influente quanto YU-NO: A Girl Who Chants Love at the Bound of This World.

Muito antes de Steins;Gate se tornar fenômeno mundial e antes de Re:Zero transformar loops temporais em sofrimento psicológico, YU-NO já brincava com conceitos de universos paralelos, linhas temporais divergentes e consequências imprevisíveis das escolhas humanas.

Seu legado pode ser visto em dezenas de obras modernas.

Algumas herdaram o conceito de viagem temporal.

Outras exploraram o multiverso.

Outras transformaram a repetição temporal em uma ferramenta narrativa.

E algumas foram além, criando verdadeiros ambientes distribuídos de realidades alternativas.

Para um mainframeiro, essas histórias possuem um charme especial.

Cada protagonista parece um operador tentando recuperar um ambiente de produção.

Cada salto temporal lembra um restart de JOB.

Cada linha temporal parece uma geração diferente de um GDG cósmico.

E cada decisão equivocada gera um ABEND existencial.

Se você terminou YU-NO e ficou com aquela sensação de vazio pós-anime, prepare seu terminal ISPF imaginário.

A seguir estão dez obras que compartilham o DNA narrativo de YU-NO e que, de uma forma ou de outra, exploram o maior sonho da humanidade:

corrigir o passado sem derrubar o futuro.


1. STEINS;GATE

Título Original

Steins;Gate

Ano

2011

Personagem Principal

Rintarou Okabe

Sinopse

Um grupo de estudantes descobre acidentalmente uma forma de enviar mensagens para o passado.

O problema?

Cada alteração cria novas linhas temporais.

Curiosidade

É considerado por muitos o sucessor espiritual mais próximo de YU-NO.

Bellacosa Mainframe

MSG PARA O PASSADO
=
UPDATE DIRETO NA BASE DA REALIDADE

2. RE:ZERO

Título Original

Re:Zero kara Hajimeru Isekai Seikatsu

Ano

2016

Personagem Principal

Subaru Natsuki

Sinopse

Sempre que morre, Subaru retorna a um ponto anterior do tempo.

Curiosidade

Transformou o conceito de loop temporal em sofrimento psicológico.

Bellacosa Mainframe

ABEND
↓
RESTART
↓
ABEND
↓
RESTART

3. SUMMERTIME RENDER

Título Original

Summer Time Rendering

Ano

2022

Personagem Principal

Shinpei Ajiro

Sinopse

Após retornar à sua ilha natal, Shinpei descobre uma conspiração envolvendo duplicatas humanas e loops temporais.

Curiosidade

Um dos melhores animes de mistério da década de 2020.

Bellacosa Mainframe

Pense em CICS, DB2 e fantasmas rodando simultaneamente.


4. ERASED

Título Original

Boku dake ga Inai Machi

Ano

2016

Personagem Principal

Satoru Fujinuma

Sinopse

Um homem retorna à infância para impedir uma série de assassinatos.

Curiosidade

Mistura viagem temporal com suspense policial.

Bellacosa Mainframe

ROLLBACK
PARA 18 ANOS ATRÁS

5. HIGURASHI NO NAKU KORO NI

Título Original

Higurashi no Naku Koro ni

Ano

2006

Personagem Principal

Keiichi Maebara

Sinopse

Uma pequena vila esconde um ciclo de mortes que se repete continuamente.

Curiosidade

Inspirou inúmeras histórias de loops temporais.

Bellacosa Mainframe

O JES2 reiniciando o mesmo desastre infinitamente.


6. THE GIRL WHO LEAPT THROUGH TIME

Título Original

Toki wo Kakeru Shoujo

Ano

2006

Personagem Principal

Makoto Konno

Sinopse

Uma estudante adquire a capacidade de saltar no tempo.

Curiosidade

Um dos filmes mais importantes da ficção temporal japonesa.

Bellacosa Mainframe

O equivalente anime de um botão "UNDO".


7. NOEIN

Título Original

Noein: Mou Hitori no Kimi e

Ano

2005

Personagem Principal

Haruka Kaminogi

Sinopse

Universos paralelos entram em colisão.

Curiosidade

Mistura física quântica e drama adolescente.

Bellacosa Mainframe

GDGs de realidades alternativas entrando em conflito.


8. ORANGE

Título Original

Orange

Ano

2016

Personagem Principal

Naho Takamiya

Sinopse

Uma garota recebe cartas enviadas por ela mesma do futuro.

Curiosidade

Um dos romances temporais mais emocionantes dos animes.

Bellacosa Mainframe

E-mail enviado para a própria LPAR do passado.


9. RASCAL DOES NOT DREAM OF BUNNY GIRL SENPAI

Título Original

Seishun Buta Yarou wa Bunny Girl Senpai no Yume wo Minai

Ano

2018

Personagem Principal

Sakuta Azusagawa

Sinopse

Fenômenos temporais e quânticos afetam adolescentes.

Curiosidade

Apesar do título estranho, possui excelente ficção científica.

Bellacosa Mainframe

Problemas de sincronização entre ambientes emocionais.


10. LINK CLICK

Título Original

Shiguang Dailiren

Ano

2021

Personagem Principal

Cheng Xiaoshi

Sinopse

Dois jovens entram em fotografias para alterar eventos passados.

Curiosidade

Produção chinesa que surpreendeu o mundo dos animes.

Bellacosa Mainframe

BACKUP = FOTO
RESTORE = ENTRAR NELA

☕💣 Classificação Bellacosa Mainframe

AnimeViagem TemporalMultiversoMistérioNota
Steins;Gate⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐10/10
Re:Zero⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐10/10
Summertime Render⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐10/10
Erased⭐⭐⭐⭐⭐⭐⭐⭐⭐9/10
Higurashi⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐9/10
Toki wo Kakeru Shoujo⭐⭐⭐⭐⭐⭐⭐9/10
Noein⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐9/10
Orange⭐⭐⭐⭐⭐⭐8/10
Bunny Girl Senpai⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐9/10
Link Click⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐⭐10/10

Conclusão

Se YU-NO é o mainframe ancestral do multiverso, então essas dez obras são os sistemas que herdaram seu código-fonte.

Algumas aprimoraram o mecanismo de rollback.

Outras reinventaram a navegação entre linhas temporais.

E algumas criaram arquiteturas tão complexas que fariam um arquiteto de sistemas do z/OS pedir documentação adicional.

Mas todas compartilham a mesma pergunta fundamental:

Se você pudesse reexecutar sua vida quantas vezes quisesse, em qual execução finalmente encontraria a resposta correta? ☕💣⏳


 

Vagner Renato Bellacosa, IBM Champion e especialista em IBM Mainframe
IBM Z17 SYSTEM ONLINE
Sobre o autor

Vagner Renato Bellacosa

IBM Champion 2026 • Especialista em IBM Mainframe

Vagner Renato Bellacosa trabalha com IBM Mainframe desde 1988 , é IBM Champion e especialista em COBOL, CICS, Db2, z/OS e IBM Z. Compartilha experiências profissionais, conhecimento técnico, história da computação e práticas do universo mainframe para aproximar novas gerações das tecnologias que sustentam empresas, bancos e governos ao redor do mundo.

IBM Champion IBM Z COBOL CICS Db2 z/OS Mainframe desde 1988
GitHub LinkedIn
Inicializando conteúdo...