- Postagens: 1
- Obrigados Recebidos: 1
Scripts de Job Control Language (JCL) e automação no mainframe.
Dificuldade em fazer submit com o JCL
- ezequielfc
- Autor do Tópico
- Desconectado
- Novato
-
Less
Mais
3 semanas 5 dias atrás - 3 semanas 5 dias atrás #91
por ezequielfc
Dificuldade em fazer submit com o JCL foi criado por ezequielfc
Sou novo no mundo de mainframe no geral.
Estou tentando fazer um CRUD com Intercomm no Hércules TK5, mas há problemas quando eu vou dar um submit no JCL, e não sei se é algum erro de sintaxe ou qual a causa do erro. Tem alguma forma de eu ver os logs ou alguém verificar para mim se há algum erro?
RFEEDIT HERC01.JCL.CNTL(COMPCRU1) - 1.10 COLUMNS 1 72
Command ===> Scroll ===> CSR
****** ****ZAP****AUTOSAVE********** TOP OF DATA ******************************
000001 //HERC01C JOB (COBOL,CRU1),MSGLEVEL=(1,1),CLASS=A,
000002 // MSGCLASS=X,NOTIFY=HERC01
000003 01*******************************************************
000004 //* COMPILE E LINK-EDIT DO PROGRAMA CRUDPGM PARA INTERCOMM
000005 //*******************************************************
000006 //STEP1 EXEC PGM=IGYCRCTL,
000007 // PARM='OBJ,NODECK,LIB,RENT'
000008 //SYSPRINT DD SYSOUT=*
000009 //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
000010 //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
000011 //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
000012 //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
000013 //SYSLIN DD DSN=&&OBJSET,DISP=(NEW,PASS),UNIT=SYSDA,
000014 // SPACE=(TRK,(1,1)),DCB=(BLKSIZE=3200)
000015 //*
000016 //STEP2 EXEC PGM=IEWL,
000017 // PARM='RMODE(ANY),AMODE(31),LIST,LET'
000018 //SYSLIN DD DSN=&&OBJSET,DISP=(OLD,DELETE)
000019 DD DSN=SYS1.INTERCOM.LOADLIB,DISP=SHR
000020 //SYSPRINT DD SYSOUT=*
000021 //SYSLMOD DD DSN=HERC01.INTERCOMM.LOADLIB,
000022 // DISP=SHR,MEMBER=CRUDPGM
000023 //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
000024 //
000025 /*
****** ****ZAP****AUTOSAVE********* BOTTOM OF DATA ****************************
6812K FREE
Estou tentando fazer um CRUD com Intercomm no Hércules TK5, mas há problemas quando eu vou dar um submit no JCL, e não sei se é algum erro de sintaxe ou qual a causa do erro. Tem alguma forma de eu ver os logs ou alguém verificar para mim se há algum erro?
RFEEDIT HERC01.JCL.CNTL(COMPCRU1) - 1.10 COLUMNS 1 72
Command ===> Scroll ===> CSR
****** ****ZAP****AUTOSAVE********** TOP OF DATA ******************************
000001 //HERC01C JOB (COBOL,CRU1),MSGLEVEL=(1,1),CLASS=A,
000002 // MSGCLASS=X,NOTIFY=HERC01
000003 01*******************************************************
000004 //* COMPILE E LINK-EDIT DO PROGRAMA CRUDPGM PARA INTERCOMM
000005 //*******************************************************
000006 //STEP1 EXEC PGM=IGYCRCTL,
000007 // PARM='OBJ,NODECK,LIB,RENT'
000008 //SYSPRINT DD SYSOUT=*
000009 //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
000010 //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
000011 //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
000012 //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
000013 //SYSLIN DD DSN=&&OBJSET,DISP=(NEW,PASS),UNIT=SYSDA,
000014 // SPACE=(TRK,(1,1)),DCB=(BLKSIZE=3200)
000015 //*
000016 //STEP2 EXEC PGM=IEWL,
000017 // PARM='RMODE(ANY),AMODE(31),LIST,LET'
000018 //SYSLIN DD DSN=&&OBJSET,DISP=(OLD,DELETE)
000019 DD DSN=SYS1.INTERCOM.LOADLIB,DISP=SHR
000020 //SYSPRINT DD SYSOUT=*
000021 //SYSLMOD DD DSN=HERC01.INTERCOMM.LOADLIB,
000022 // DISP=SHR,MEMBER=CRUDPGM
000023 //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
000024 //
000025 /*
****** ****ZAP****AUTOSAVE********* BOTTOM OF DATA ****************************
6812K FREE
Ultima edição: 3 semanas 5 dias atrás por ezequielfc.
Os seguintes usuário(s) disseram Obrigado: bopnet
Por favor Entrar ou Registrar para participar da conversa.
- bopnet
-
- Desconectado
- Administrador
-
- I'm free!
Less
Mais
- Postagens: 43
- Obrigados Recebidos: 4
3 semanas 3 dias atrás #92
por bopnet
COBOL is not DEAD!
Respondido por bopnet no tópico Dificuldade em fazer submit com o JCL
Pelo que estou vendo está tentando compilar um programa COBOL. tenho um JOB de compilação aqui nesse topico:
forum.coboldicas.com.br/index.php/forum/...mulador-de-mainframe
forum.coboldicas.com.br/index.php/forum/...mulador-de-mainframe
COBOL is not DEAD!
Por favor Entrar ou Registrar para participar da conversa.