2.13 - Mosca Branca

Tem além do cartao JOB, do DD e do EXEC (que falam que sao os únicos que existem de verdade) tem os que fazem parte do JOBGROUP mas não pergunta muito porque tudo que sei foi quando fiz um exercício no Master the Mainframe, mas basicamente é um “Jobão” que roda determinados JOBS de acordo com as afinidades criadas nesse tal de JOBGROUP. Muito mais simples usar o Control-M que a galera já conhece e domina.

Também tem um JOB com varios outros JOBs juntos esse também não costumam existir muito por ai, é algo como **:

//AU04500 JOB 1,NOTIFY=&SYSUID,TYPRUN=HOLD
// SCHEDULE JOBGROUP=G2212
//J00 EXEC PGM=IEFBR14
//AU04510 JOB 1,NOTIFY=&SYSUID
// SCHEDULE JOBGROUP=G2212
//J10 EXEC FSOP010
//AU04520 JOB 1,NOTIFY=&SYSUID
// SCHEDULE JOBGROUP=G2212
//J20 EXEC FSOP020
//AU04530 JOB 1,NOTIFY=&SYSUID
// SCHEDULE JOBGROUP=G2212
//J30 EXEC FSOP030
//AU04511 JOB 1,NOTIFY=&SYSUID
// SCHEDULE JOBGROUP=G2212
//J11 EXEC FSOP011
//AU04521 JOB 1,NOTIFY=&SYSUID
// SCHEDULE JOBGROUP=G2212
//J21 EXEC FSOP021
//AU04531 JOB 1,NOTIFY=&SYSUID
// SCHEDULE JOBGROUP=G2212
//J31 EXEC FSOP031
//AU04512 JOB 1,NOTIFY=&SYSUID
// SCHEDULE JOBGROUP=G2212
//J12 EXEC FSOP012
//AU04522 JOB 1,NOTIFY=&SYSUID
// SCHEDULE JOBGROUP=G2212
//J22 EXEC FSOP022
//AU04532 JOB 1,NOTIFY=&SYSUID
// SCHEDULE JOBGROUP=G2212
//J32 EXEC FSOP032
//AU04540 JOB 1,NOTIFY=&SYSUID
// SCHEDULE JOBGROUP=G2212
//J40 EXEC FSOP040
//AU04541 JOB 1,NOTIFY=&SYSUID
// SCHEDULE JOBGROUP=G2212
//J41 EXEC FSOP041

Que roda em sintonia com o tal do JOBGROUP

//G2212 JOBGROUP
//-------------------------------------------------------
// DEPENDENCY RELATIONSHIP
//*
//* AU04500==AU04510==AU04511==AU04512====|
//* | |
//* |======AU04520==AU04521==AU04522====|
//* | |
//* |======AU04530==AU04531==AU04532==AU04540==AU04541
//*
//*-------------------------------------------------------
//AU04500 GJOB
//AU04510 GJOB
// AFTER NAME=AU04500
//AU04520 GJOB
// AFTER NAME=AU04500
//AU04530 GJOB
// AFTER NAME=AU04500
//AU04511 GJOB
// AFTER NAME=AU04510
//AU04521 GJOB
// AFTER NAME=AU04520
//AU04531 GJOB
// AFTER NAME=AU04530
//AU04512 GJOB
// AFTER NAME=AU04511
//AU04522 GJOB
// AFTER NAME=AU04521
//AU04532 GJOB
// AFTER NAME=AU04531
//AU04540 GJOB
// AFTER NAME=(AU04512,AU04522,AU04532)
//AU04541 GJOB
// AFTER NAME=AU04540
//G2212 ENDGROUP

**Direitos da IBM e/ou afiliados, Master the Mainframe 2017. http://mtm2017.mybluemix.net/part_two/part_two_ch14.html ou https://goo.gl/rnZaey link quebrou, e nao achei mais nada sobre a competição de 2017, mas tem no manual do JCL se voce tiver curiosidade sobre o JOBGROUP

Last updated