Home / JCL Library

📋 AKOM.JCL — JCL Library

Membros JCL prontos para uso em ambiente z/OS. Copie, adapte e execute.

IEBUPDTE

2 membros
UPDTADD
ADD — Adicionar Membros a PDS
▶

Adiciona novos membros a um PDS usando IEBUPDTE com PARM=NEW (dataset novo) ou PARM=MOD (adicionar a existente). Usa cartões ./ ADD para delimitar membros.

Código JCL

UPDTADD.jcl 
//UPDTADD  JOB (ACCT),'IEBUPDTE ADD',CLASS=A,MSGCLASS=X,
//         MSGLEVEL=(1,1),NOTIFY=&SYSUID
//*------------------------------------------------------------*
//* UPDTADD - IEBUPDTE: ADICIONA MEMBROS AO PDS               *
//*------------------------------------------------------------*
//UPDTSTEP EXEC PGM=IEBUPDTE,PARM=MOD
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DSN=AKOM.SOURCE.PDS,DISP=SHR
//SYSUT2   DD DSN=AKOM.SOURCE.PDS,DISP=SHR
//SYSIN    DD *
./ ADD NAME=NEWMEMBR
//NEWMEMBR JOB ...
//* Conteudo do novo membro
./ ENDUP
/*
Ver Detalhes →
UPDTCHG
CHANGE — Alterar Linhas de Membro ⚠ CUIDADO
▶

Altera linhas específicas de um membro PDS por número de sequência usando cartões ./ CHANGE e ./ DELETE. Útil para patches em JCL de produção.

⚠ Esta operação requer atenção especial. Revise os parâmetros antes de executar.

Código JCL

UPDTCHG.jcl 
//UPDTCHG  JOB (ACCT),'IEBUPDTE CHG',CLASS=A,MSGCLASS=X,
//         MSGLEVEL=(1,1),NOTIFY=&SYSUID
//*------------------------------------------------------------*
//* UPDTCHG - IEBUPDTE: ALTERA LINHAS POR NUMERO DE SEQUENCIA *
//*------------------------------------------------------------*
//CHNGSTEP EXEC PGM=IEBUPDTE,PARM=MOD
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DSN=AKOM.SOURCE.PDS,DISP=SHR
//SYSUT2   DD DSN=AKOM.SOURCE.PDS,DISP=SHR
//SYSIN    DD *
./ CHANGE NAME=MEMBRO1
         NOVA LINHA SUBSTITUINDO SEQUENCIA 010000        010000
./ ENDUP
/*
Ver Detalhes →