Jcl Error 165
error JES, JES2, JCL utilities, IDCAMS, Compile & Run JCLs, PROCs etc... Post a reply Previous topic • Next topic • 12 posts • Page 1 of 2 • 1, 2 JCL error by Bjoern » Wed Nov 28, 2007 10:21 pm Hi,I use the x3270 emulator. My problem is that I get an error message for my very simple jcl script. I don't know what is wrong on my jcl script and the error message doesn't help me. The error code is "JCL" and this means: "A JCL error was recognized after the job or started task began to execute, or a JCL error was recognized after syntax checking in the internal reader."I get this line after I execute the SUB command:Select all18.46.40 JOB03724 $HASP165 USERID2C ENDED AT N1 - JCL ERROR CN(INTERNAL)Could it be that the error is in the cobol code?I would like to compile cobol code. This code is in one of the members at the PDS USERID.CICS.COB(SQUARE1). The record format is FB. The compiled code shall write the jcl script to the PDS USERID.CICS.LOAD. The record format is U.Here is the jcl code:Select all==MSG> -Warning- The UNDO command is not available until you change ==MSG> your edit profile using the command RECOVERY ON. 000100 //USERID2C JOB (),CLASS=A,MSGCLASS=M,MSGLEVEL=(1,1),NOTIFY=&SYSUID,000200 // REGION=4M 000300 //STEP1 EXEC IGYWCL 000400 //COBOL.SYSIN DD DSN=&SYSUID..CICS.COB(SQUARE1),DISP=SHR 000500 //LKED.SYSLMOD DD DSN=&SYSUID..CICS.LOAD,DISP=SHR 000600 //LKED.SYSIN DD * 000700 NAME SQUARE1(R) 000800 /* Thanks RegardsBjörn Bjoern Posts: 27Joined: Mon Oct 08, 2007 7:16 pm Hasthanked: 0 time Beenthanked: 0 time Top Re: JCL error Top Re: JCL error by CICS Guy » Wed Nov 28, 2007 11:01 pm Can you post the JESJCL to show the expantion?BTW, nice post and use of the code wrappers....... CICS Guy Posts: 255Joined: Wed Jun 20, 2007 4:08 am Hasthanked: 0 time Beenthanked: 0 time Top Re: JCL error by Bjoern &
here for a quick overview of the site Help Center Detailed answers to any questions you might have Meta Discuss the workings and policies of this site About Us Learn more about Stack Overflow the company Business Learn more about hiring developers or posting ads with us Stack Overflow Questions Jobs Documentation Tags Users Badges Ask Question x Dismiss Join the Stack Overflow Community Stack Overflow is a community of 4.7 million programmers, just like you, helping each other. Join them; it only takes a minute: Sign up IBM DB2 Obscure Error Code up vote http://www.ibmmainframeforum.com/jcl/topic228.html 0 down vote favorite When I try to precompile my COBOL application, using by running SUB on a JCL file, I get this error: 19.30.05 JOB08639 $HASP165 ZUSER13A ENDED AT SVSCJES2 - JCL ERROR CN(INTERNAL) I've tried looking online with no success. Does anyone know what this is referring to? Here is my JCL file 000001 //ZUSER13A JOB NOTIFY=&SYSUID 000002 //*--------------------------------------------------------------------* 000003 //* PRECOMP - PRECOMPILE http://stackoverflow.com/questions/5214896/ibm-db2-obscure-error-code THE COBOL PROGRAM * 000004 //* YOU SHOULD CHANGE ZUSER26 TO YOUR OWN TSO USERID * 000005 //* YOU SHOULD CUSTOMIZE THE FOLLOWING LIBRARIES WITH HELP OF TEACHER * 000006 //*--------------------------------------------------------------------* 000007 //*--------------------------------------------------------------------* 000008 //* THE FOLLOWING 8 SYMBOLIC PARAMETERS SHOULD BE SET BY YOURSELF * 000009 //* ? (1) DB2LOAD - THE DB2 LOAD LIBRARY * 000010 //* ? (2) WSPC - THE SIZE FOR TEMPARARY DATA SET * 000011 //* ? (3) DASD - THE UNIT VALUE FOR DASD * 000012 //* ? (4) SRC - THE COBOL SOURCE PROGRAM LIBRARY * 000013 //* ? (5) CPY - THE COBOL COPYBOOK LIBRARY * 000014 //* ? (6) DBRM - THE DBRM LIBRARY FOR DB2 BIND PROCESS * 000015 //* ? (7) MID - THE MODIFIED COBOL SOURCE CODE LIBRARY * 000016 //* ? (8) TRAN - THE TRANSACTION/FUNCTION MODULE NAME * 000017 //*--------------------------------------------------------------------* 000018 // SET DB2LOAD=ZUSER13.DB2.LOAD 000019 // SET WSPC=500 000020 // SET DASD=SYSDA 000021 // SET SRC=ZUSER13.DB2.SRC 000022 // SET CPY=ZUSER13.DB2.CPY 000023 // SET DBRM=ZUSER13.DB2.DBRM 000024 // SET MID=ZUSER13.DB2.MID 000025 // SET TRAN=OPACCT 000026 //*------------------------------------------------------------------* 000027 //* PRECOMPILE THE COBOL PROGRAM * 000028 //* RETURN CODE SHOULD BE 4 OR LESS * 000029 //*-------
did that. -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of https://www.mail-archive.com/ibm-main@bama.ua.edu/msg71795.html David Andrews Sent: Wednesday, April 09, 2008 8:18 AM To: IBM-MAIN@BAMA.UA.EDU http://www.mainframegurukul.com/ibmmainframeforums/Error-post4792.html Subject: Re: JOB00045 $HASP165 IBMUSERB ENDED AT N1 - JCL ERROR CN(INTERNAL) On Wed, 2008-04-09 at 15:20 +0200, Fabio D'Alfonso wrote: > The job is a simple logrec format and previously worked. On Wed, 2008-04-09 at 15:57 +0200, Fabio D'Alfonso wrote: > //STEP1 EXEC jcl error PGM=IFCDIP00 > //SERERDS DD DSN=sys1.logrec, > // DISP=SHR This job previously worked with a lowercase dsname? Curious. -- David Andrews A. Duda and Sons, Inc. [EMAIL PROTECTED] ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN jcl error 165 subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html Previous message View by thread View by date Next message JOB00045 $HASP165 IBMUSERB ENDED AT N1 - JCL ERROR C... Fabio D'Alfonso Re: JOB00045 $HASP165 IBMUSERB ENDED AT N1 - JC... Gary Green Re: JOB00045 $HASP165 IBMUSERB ENDED AT N1 ... Fabio D'Alfonso Re: JOB00045 $HASP165 IBMUSERB ENDED AT... Rob Scott Re: JOB00045 $HASP165 IBMUSERB ENDE... Binyamin Dissen Re: JOB00045 $HASP165 IBMUSERB ENDED AT... Myers, Edouard (OCTO) Re: JOB00045 $HASP165 IBMUSERB ENDED AT... David Andrews Re: JOB00045 $HASP165 IBMUSERB ENDE... David Logan Re: JOB00045 $HASP165 IBMUSERB ENDED AT N1 - JC... Gary Green Re: JOB00045 $HASP165 IBMUSERB ENDED AT N1 - JC... Lizette Koehler Reply via email to Search the site The Mail Archive home ibm-main - all messages ibm-main - about the list Expand Previous message Next message The Mail Archive home Add your mailing list FAQ Support Privacy 003501c89a4d$0084c680$018e5380$@net
Log in MAINFRAME - TIP OF THE DAY : All available storage is assigned to the job or jobstep, If REGION is coded 0K or 0M Web mainframegurukul.com Programmers Voted for below topics. Please Vote for good Posts. Votes Salutes Topic Title Votes Salutes EJECT Verb in COBOL 22 Cobol Multiple Choice Questions By Shravan Wipro 18 what is index or subscript in cobol. please give me brief ex 15 jcl sort to add leading zeroes 13 SOC 7 abend - interview question 13 what is static or dynamic call in cobol 13 How to resolve soc7? 12 Hexadecimal to decimal conversion - SORT JCL INREC OUTREC 12 Infosys Training Program for freshers 11 HOW TO FIND LINKAGE LENGTH 10 VSAM File status 23 ,but records are present in the file 7 Changes in copybook 6 splitting of records using cobol 6 JOIN UNPAIRED,F1,F2,ONLY 6 Endevor 6 Difference Between XCTL and LINK 5 Frequently used commands in FileAid. 5 Interview questions - 3 years Exp - BOA, HCL and CTS 4 Various Locking mechanism for cursors and other SQL? 4 GDG interview question 4 Comparing two files 4 JCL return codes 4 COBOL Program performance tuning tips 4 JOIN UNPAIRED,F1,F2,ONLY 3 3 alphanumeric to numeric value padding with ZEROS in COBOL 3 3 How to Display COMP-3 value in report 3 3 JCL to Purge All Held output? 3 IKJ56500I COMMAND DSN NOT FOUND 3 S322 abend while sorting records 3 Call & Execute a COBOL-DB2 from a COBOL program? 3 compare two files using SORT 3 Submit a JCL thru Cobol - sysout=(INTRDR,*) 3 Comparing 2 files based on Acct number without using tables 3 Sort fields difference 3 Sending an Email from JCL with attachment 3 Control flow from one STEP to another 3 Recently faced mainframe cobol Interview Questions. 3 RESTART - Executing 2 and 3 rd step in 5 step jcl 3 sort two files with same sort condition 3 static and dynamic calls 3 What are the issues related with correlated subqueries? 3 restart question 3 Eliminate duplicate records in file 3 What is the difference between Copy and Include? 3 JCL SORT - Count number of records in a file 3 Regarding TSQ 3 What is the difference b