📌 Descrição
O comando PEND (procedure end) indica o fim da definição de uma procedure embutida no próprio JCL. Ele marca o encerramento do bloco iniciado por PROC, permitindo que o job principal continue com outras instruções ou a chamada da procedure.
🧠 Sintaxe
// PEND
🔍 Características
| Elemento | Descrição |
|---|---|
PEND |
Deve ser escrito isoladamente em uma linha, precedido por //. |
| Não possui parâmetros | Apenas finaliza o bloco da procedure iniciada por PROC. |
✅ Exemplo
//COPIA PROC
//STEP01 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=ARQ.IN,DISP=SHR
//SYSUT2 DD DSN=ARQ.OUT,DISP=(NEW,CATLG),SPACE=(TRK,(1,1))
//SYSIN DD DUMMY
// PEND
⚠️ Observações
-
O
PENDé obrigatório ao final de uma procedure interna (embutida). -
Se for omitido, o JCL será rejeitado com erro de sintaxe.
-
Não é utilizado em procedures externas (armazenadas em bibliotecas JCL referenciadas por
JCLLIB).