TSO JCL STEP ERRORS

In this Mainframe Forum - You can post your queries on JCL, OS/390 JCL, MVS JCL, z/OS JCL, JES2 & JES3

Moderators: Frank Yaeger, DikDude, Moderator Group

Post Reply
dneedhelp
Member
Posts: 1
Joined: Thu Jul 19, 2012 7:46 pm

TSO JCL STEP ERRORS

Post by dneedhelp » Thu Jul 19, 2012 8:24 pm

Help, I inherited this program and I am trying to troubleshoot an error,

The Gloss step fails because it does not meet the conditions of the BQL step, all others steps dowm strem fails as well.


***** ***************************** Top of Data *****************************
000001 //XXX0001I JOB (C342099100),'VW',CLASS=F,MSGCLASS=X,
000002 // NOTIFY=XXX0001
000003 /*JOBPARM ROOM=1A
000004 /*ROUTE XEQ MEM3
000005 //*--------------------------------------------------------------------
000006 //BQL EXEC PGM=BQL,REGION=4096K
000007 //STEPLIB DD DSN=ANS2.LOAD,DISP=SHR
000008 //$QUERY DD DSN=&QUERY,DISP=(,PASS),UNIT=DISK,
000009 // SPACE=(TRK,(5,2),RLSE),
000010 // DCB=(BLKSIZE=27920,LRECL=1370,RECFM=FB)
000011 //$SOURCE DD DUMMY,DCB=(BLKSIZE=27920,LRECL=1370,RECFM=FB)
000012 //$TEMP DD UNIT=DISK,
000013 // SPACE=(TRK,(6,3)),
000014 // DCB=(BLKSIZE=27920,LRECL=1370,RECFM=FB)
000015 //$GLOSS DD DSN=&GLOSS,DISP=(,PASS),UNIT=DISK,
000016 // SPACE=(TRK,2),DCB=(BLKSIZE=27920,LRECL=1370,RECFM=FB)
000017 //SYSPRINT DD SYSOUT=X
000018 //SYSIN DD DSN=BRIDGE.XXX0001.MYDATA.DATA.PRISM.MC011,
000019 // DISP=SHR
000020 //*---------------------------------------------------------------
000021 //GLOSS EXEC PGM=MARKIV,REGION=4096K,
000022 // COND=((0,EQ,BQL),(2,EQ,BQL),(4,LT,BQL))
000023 //STEPLIB DD DSN=ANS2.LOAD,DISP=SHR
000024 //M4LIB DD DSN=ANS2.M4LIB,DISP=SHR
000025 //M4INPUT DD DSN=&GLOSS,DISP=(OLD,DELETE)
000026 //M4LIST DD SYSOUT=X


COMMAND ===> SCROLL ===> CURSOR
--JOBNAME--JOBID----STATUS---RAN/RECEIVED------DAY-------DEST------------------
XXX0001I J007200 OUTPUT 4:43 7/19/2012 TODAY XXX0
--RC--PGM----------------STEP------------PRSTEP---PROC-----COMMENTS---------------------------
0 BQL
* GLOSS NOT EXECUTED
8 G PRO
* SORT NOT EXECUTED
* RPT NOT EXECUTED
* G TEP905 NOT EXECUTED
* DELPDS NOT EXECUTED
0 RECOPY
--------DDNAME---STEP-----STAT-ACT-GRP-C-D---RECORDS-COPIES-DEST---------------
_ 1 LOG * HELD 1 X H 24 XXX0
_ 2 JCL * HELD 1 X H 205 XXX0
_ 3 MESSAGES * HELD 1 X H 170 XXX0
_ 4 SYSPRINT BQL HELD 1 X H 58 XXX0
_ 5 M4LIST G HELD 1 X H 2 XXX0
COMMAND ===> SCROLL ===> CURSOR
******************************* Top of Data

_ 5 M4LIST presents this error
***********************************
JUL 19, 2012 04.38.30
* MK4DC03 TYPE 1 LRECL DISCREPANCY M4INPUT -- LRECL OF 1370 FROM DD/HEADER
******************************* Bottom of Data ********************************

User avatar
dbzTHEdinosauer
Moderator
Posts: 981
Joined: Mon Oct 02, 2006 8:31 pm

Post by dbzTHEdinosauer » Thu Jul 19, 2012 8:49 pm

well, let us start with this:
000022 // COND=((0,EQ,BQL),(2,EQ,BQL),(4,LT,BQL))

what are you trying to achieve?

you may want to look at the COND discussion in this websites Tutorials
Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.

DikDude
Moderator
Posts: 1001
Joined: Fri Jul 22, 2011 8:39 am
Location: usa

Post by DikDude » Thu Jul 19, 2012 11:48 pm

The following is a Mark IV message (iirc).
* MK4DC03 TYPE 1 LRECL DISCREPANCY M4INPUT -- LRECL OF 1370 FROM DD/HEADER

What does pgm BQL do? What condition code did it issue?

The messsage indicates the DD for M4INPUT has a problem, but it is only named in the GLOSS step . . . :?
Have a good one

Anuj Dhawan
Moderator
Posts: 1625
Joined: Sat Aug 09, 2008 9:02 am
Location: Mumbai, India

Post by Anuj Dhawan » Fri Jul 20, 2012 4:34 pm

It's tough to follow what are you asking:

1. First, you did not use BBcode tags, to make your code more readable.
2. Second, from your post I see this
GLOSS NOT EXECUTED
but you said "all others steps dowm strem fails as well "along with it??"" Bold text added by me. So what exactly do you mean?

A failure is not equal to "step not executed", having said that, yes, what RC was generated, unless we know that - predicting why COND might behave differently than what you think, is tough to answer.
Regards,
Anuj

User avatar
dbzTHEdinosauer
Moderator
Posts: 981
Joined: Mon Oct 02, 2006 8:31 pm

Post by dbzTHEdinosauer » Fri Jul 20, 2012 5:35 pm

Code: Select all

--RC--PGM----------------STEP------------PRSTEP---PROC-----COMMENTS---------------------------
0 BQL
* GLOSS NOT EXECUTED
8 G PRO
* SORT NOT EXECUTED
* RPT NOT EXECUTED
* G TEP905 NOT EXECUTED
* DELPDS NOT EXECUTED
0 RECOPY
Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others