Curso de Job Control Language (JCL)

...

JOB Identifica o início de um job. É obrigatório. Deve ser o primeiro comando de JCL de um job.

OUTPUT Define opções de processamento para uma saída de programa.

PEND Marca o fim de uma procedure in-stream (isto é, dentro do job).

PROC Identifica o início de uma procedure in-stream – um conjunto de comandos de JCL que pode ser executado várias vezes.

SET Atribui valores a parâmetros simbólicos de JCL.

THEN Faz parte do grupo IF-THEN-ELSE – exec. condicional de steps.

XMIT Transmite registros para um nó. Obs: normalmente, este comando não é utilizado na CEF.

Todos os comandos acima têm o formato:

//nome operador operando(s) comentário

Nas colunas 1 e 2 deve haver obrigatoriamente duas barras inclinadas, como no exemplo:

//TESTE JOB SUPORTE,TIME=1 TESTE

(nome) (operador) (operandos, ou parâmetros) coment

Além dos listados acima, há ainda comandos de JCL:

• para submeter comandos de operador, como no exemplo:

// D R,L exibe mensagens pendentes.

• usados apenas como comentários, como no exemplo:

//* – Este formato indica um comentário.

• usados para marcar explicitamente o fim de dados (o que pode ser feito implicitamente com um subseqüente comando de JCL). Formato:

/*

• usados para marcar explicitamente o fim do job (implicitamente, o último comando, ou então um outro comando JOB, indicam o fim do job). Formato:

//

Todos os comandos citados acima são de JCL. Há, ainda, os comandos de JECL – Job Entry Control Language, ou linguagem de controle de entrada de jobs. Os comandos de JECL também são chamados de JES Control Statements (comandos do JES), e servem para passar ao JES (Job Entry Subsystem) informações relacionadas ao job, no momento da entrada do mesmo no sistema.

Os comandos de JECL têm o formato:

/*Comando Parâmetros

Exemplos de comandos de JECL:

/*JOBPARM PROCLIB=PROC02 -Especifica bibliot. de procedures

/*ROUTE PRINT CPRDF3 -Diz onde deve ficar a saída do job

/*ROUTE XEQ CPRDF1 -Diz qual CPU deve executar o job.

/*XEQ CPRDF1 -Diz qual CPU deve executar o job.

/*$SI1-9 -ativa Initiators de 1 a 9. O $ indica um comando de JES.

3. Comandos CNTL e ENDCNTL

Permitem a inclusão de comandos para subsistemas. Obs: na CEF, estes comandos não são utilizados.

No exemplo abaixo, é incluído um comando de controle para um subsistema de impressão:

//JOB2 JOB

//ETAPA1 EXEC PGM=IMPRIME

//DEFINE CNTL *

//ARGCNTL PRINTDEV BUFNO=2,PIMSG=YES,DATACK=BLOCK

//FIM ENDCNTL

…

//SAIDA DD CNTL=*.DEFINE

4. Comando COMMAND

O comando COMMAND permite a emissão de comandos do sistema ou do JES. É muito pouco utilizado. Exemplo:

//JOB1 JOB

// COMMAND ‘S CICS’ - Ativa (“Start”) o subsistema CICS

OBS: Na CEF, mais especificamente na REROPBR, os CICS têm denominações como H0ACICPJ, ou H0ACICD1, onde P indica que o CICS está executando em uma Partição Lógica (LPAR) de Produção, e D indica que é uma Partição Lógica de Desenvolvimento.

5. O comando DD

O comando DD é muito utilizado no dia-a-dia. Tem dezenas de operandos, descritos no manual IBM JCL Reference. Ocasionalmente, a IBM cria algum novo operando de comando DD, em especial para acompanhar o surgimento e o desenvolvimento de periféricos. Por exemplo, os seguintes operandos são relativamente novos:

BLKSZLIM -limita o tam. bloco, se BLKSIZE não é informado;

CHARS -especifica o nome de uma fonte, p/impressora AFP;

DATACLAS -especifica classe p/criação de dados sob o SMS;

SPIN -disponibiliza para processamento um arquivo de saída de um step ainda não terminado.

Normalmente, há um (ou mais) comando DD para cada arquivo usado no programa. Só excepcionalmente é que um programador faz a chamada alocação dinâmica, que dispensa a codificação de comandos DD para um arquivo a ser usado.

Por meio do comando DD o programador especifica o nome do arquivo, a unidade de entrada ou saída, o volume a ser utilizado, o comprimento do registro, a sua blocagem, etc.

Como mencionado acima, o comando DD tem o formato:

//nome DD operando(s) comentário

Do conjunto de operandos disponíveis no comando DD, vamos descrever apenas os mais utilizados no dia-a-dia. Note-se que cada operando pode ter um ou vários suboperandos, todos também detalhados no manual IBM JCL Reference.

Obs: na CEF, é utilizado o produto SMS, que controla e administra a alocação de arquivos. No comando DD, três operandos se referem especificamente ao SMS:

DATACLAS – refere-se à Data Class, que contém os atributos relacionados à alocação do arquivo referenciado.

MGMTCLAS – refere-se à Management Class, que contém os atributos