IBM Mainframe Forum

by **manthos** » Sun Nov 15, 2009 3:10 pm

Hello guys,
I am new to jcl and stuck with the following code. I can't understand how to fix these two errors.
code:

000100 //ASM1964 JOB 1,NOTIFY=&SYSUID
000200 //**************************************************
000300 //* COMPILE ASSEMBLER PROGRAM
000400 //**************************************************
000500 //CMPLNK EXEC PROC=HLASMCL
000600 //C.SYSIN DD DSN=&SYSUID..SOURCE(ASMCNT),DISP=SHR
000700 //L.SYSLMOD DD DSN=&SYSUID..LOAD(ASMCNT),DISP=SHR,
000800 // IF RC=0 THEN
000900 //**************************************************
001000 //* EXECUTE ASSEMBLER PROGRAM
001100 //**************************************************
001200 //EXECUTE EXEC PGM=ASMCNT
001300 //STEPLIB DD DSN=&SYSUID..LOAD,DISP=SHR
001400 //PRTLINE DD DSN=&SYSUID..&SYSUID..COMPETE.PARTTWO(ASMCNT),
001500 // DISP=SHR,OUTLIM=1000

here's the jes2 job log

Select all

J E S 2 J O B L O G -- S Y S T E M S 0 W 1 -- N O D E

03.28.15 JOB06107 ---- SUNDAY, 15 NOV 2009 ----
03.28.15 JOB06107 IRR010I USERID IBM1964 IS ASSIGNED TO THIS JOB.
03.28.15 JOB06107 IEFC452I ASM1964 - JOB NOT RUN - JCL ERROR 197
------ JES2 JOB STATISTICS ------
15 CARDS READ
58 SYSOUT PRINT RECORDS
0 SYSOUT PUNCH RECORDS
4 SYSOUT SPOOL KBYTES
0.00 MINUTES EXECUTION TIME
1 //ASM1964 JOB 1,NOTIFY=&SYSUID
//**************************************************
//* COMPILE ASSEMBLER PROGRAM
//**************************************************
IEFC653I SUBSTITUTION JCL - 1,NOTIFY=IBM1964
2 //CMPLNK EXEC PROC=HLASMCL
3 XXASMACL PROC
XX*
XX*** ASMACL
XX*
XX* THIS PROCEDURE RUNS THE HIGH LEVEL ASSEMBLER, LINK-EDITS THE
XX* NEWLY ASSEMBLED PROGRAM.
XX*
4 XXC EXEC PGM=ASMA90
5 XXSYSLIB DD DSN=SYS1.MACLIB,DISP=SHR
6 XXSYSUT1 DD DSN=&&SYSUT1,SPACE=(4096,(120,120),,,ROUND),
XX DCB=BUFNO=1,UNIT=SYSALLDA
7 XXSYSPRINT DD SYSOUT=*
8 XXSYSLIN DD DSN=&&OBJ,SPACE=(3040,(40,40),,,ROUND),
XX DISP=(MOD,PASS),UNIT=SYSALLDA,
XX DCB=(BLKSIZE=3040,LRECL=80,RECFM=FBS,BUFNO=1)
9 //C.SYSIN DD DSN=&SYSUID..SOURCE(ASMCNT),DISP=SHR
IEFC653I SUBSTITUTION JCL - DSN=IBM1964.SOURCE(ASMCNT),DISP=SHR
10 XXL EXEC PGM=HEWL,PARM='MAP,LET,LIST,NCAL',COND=(8,LT,C)
11 XXSYSLIN DD DSN=&&OBJ,DISP=(OLD,DELETE)
12 XX DD DDNAME=SYSIN
13 XXSYSLMOD DD DISP=(,PASS),UNIT=SYSDA,SPACE=(CYL,(1,1,1)),
XX DSN=&&GOSET(GO)
14 XXSYSUT1 DD DSN=&&SYSUT1,SPACE=(1024,(120,120),,,ROUND),
XX DCB=BUFNO=1,UNIT=SYSALLDA
15 XXSYSPRINT DD SYSOUT=*
16 //L.SYSLMOD DD DSN=&SYSUID..LOAD(ASMCNT),DISP=SHR,
// IF RC=0 THEN
//**************************************************
//* EXECUTE ASSEMBLER PROGRAM
//**************************************************
IEFC653I SUBSTITUTION JCL - DSN=IBM1964.LOAD(ASMCNT),DISP=SHR,IF
17 //EXECUTE EXEC PGM=ASMCNT
18 //STEPLIB DD DSN=&SYSUID..LOAD,DISP=SHR
IEFC653I SUBSTITUTION JCL - DSN=IBM1964.LOAD,DISP=SHR
19 //PRTLINE DD DSN=&SYSUID..&SYSUID..COMPETE.PARTTWO(ASMCNT),
// DISP=SHR,OUTLIM=1000
IEFC653I SUBSTITUTION JCL - DSN=IBM1964.IBM1964.COMPETE.PARTTWO(ASMCNT),DISP=SHR,OUTLIM=1000
STMT NO. MESSAGE
2 IEFC001I PROCEDURE HLASMCL WAS EXPANDED USING SYSTEM LIBRARY VENDOR.PROCLIB
16 IEFC006I POSITIONAL PARAMETERS MUST BE SPECIFIED BEFORE KEYWORD PARAMETERS

by **dick scherrer** » Sun Nov 15, 2009 11:07 pm

Hello,

First - you need to talk with the people who support the compile/assemble/link jcl for your system and learn which is the standard jcl for what you need to do. People should not generate their own jcl to do this. I won't go into the problems this can cause, but understand that if people do this, the system often becomes unsuppoprtable. . .

This line (16) specifies a continuation:
//L.SYSLMOD DD DSN=&SYSUID..LOAD(ASMCNT),DISP=SHR,
There is no continuation. . .

by **dick scherrer** » Sun Nov 15, 2009 11:08 pm

Add on. . .

Actually that may well be the standard jcl. . .

If it is, my apology :oops:

d

by **Anuj Dhawan** » Sun Nov 22, 2009 12:23 pm

IEFC452I text - JOB NOT RUN - JCL ERROR

IBM Mainframe Forum

IEFC001I and IEFC006I

IEFC001I and IEFC006I

Re: IEFC001I and IEFC006I

Re: IEFC001I and IEFC006I

Re: IEFC001I and IEFC006I