Rexx Calling Cobol Programs

IBM MAINFRAME: S04E abend with COBOL DB2 IMS program ->:::: Author Message EnjoyMF New User Joined: 27 May 2005 Posted: Sat Sep 24, 2005 12:30 pm Post subject: S04E abend with COBOL DB2 IMS program I am working with COBOL DB2 IMS program. When i submit my RunJCL.my pgram is getting abend with S04E ie.At the point of SQL statement it is getting abended ( till the SQl satement steps it is working fine' I suppose it is DB2 internal abend BUT HOW CAN I RESOLVE THIS S04E Error, plz reply me as early as possible Cheers.Prasad. Ikumar New User Joined: 02 Aug 2005 Posted: Sun Sep 25, 2005 8:15 pm Post subject: Re: S04e abend Can you give us any spool displays.So that we can help you more. Kanak Moderator Joined: 12 Mar 2005 Location: India Posted: Mon Sep 26, 2005 11:55 am Post subject: As per my manual: Explanation: When the system detects an error in internal IBM DATABASE 2 (DB2(TM)) processing, it will abnormally end a connected user task (TCB) or one of its own internal tasks. For information about the reason codes associated with this abend code, see DB2 Messages and Codes. Sophisticated Rick Ross Download Hulk on this page.

Sample Cobol Programs

Jim Barry's Rexx Tutor Part. I mean you of course) are going back to look at some more complex comparisons, if you want to do some clever IF instructions you will. Sample code to call COBOL program from REXX. The below code snippet explains how to call a COBOL program from a REXX program. /*Rexx*/ address tso 'call 'MY.COBOL.LOADLIB(TEST1234)' 'ABCDE' * COBOL Program Code: LINKAGE SECTION. 01 VAR1 PIC X(05). PROCEDURE DIVISION USING VAR1. REXX does -NOT- use LE under the covers, which is why a 'higher level' COBOL program is used to call REXX, before REXX calls other COBOL modules. Definitions The factorial of 0 (zero) is defined as being 1 (unity). The Factorial Function of a positive integer, n, is defined as the.

System Action: The system abnormally ends the connected user task or the DB2 internal task. Programmer Response: Check register 15 of the SDWA section 'General Purpose Registers at Time of Error', and locate the accompanying reason code. In addition, check the information displayed at the user's terminal, and in the corresponding logrec data set entry. Wedding Dvd Covers Psd Free Download.

MSreelatha Guest Posted: Mon Sep 26, 2005 3:18 pm Post subject: s04e Abend Prasad S04E error means Duplicate utility id has been created. The Big Bang Simon Singh Pdf Free. If your job abends in your run it creates a duplicate utility id.

If you submit the same job again without terminating the duplicate utility id then you get so4e error. You can terminate this utility id in two ways 1. By writing Utility termination step in your jcl (or) 2. In Tso Db2 --select--BMC Administrative Products for DB2 --catalog manager for db2--db2 commands--go for utility termination option --but this access may only have db2 dba. Thanks Sreelatha mlp New User Joined: 23 Sep 2005 Posted: Fri Nov 16, 2007 6:27 pm Post subject: Re: s04e Abend The Abend can also occur when there is some problem in the index space. By rebuilding the index space the problem can be resolved.

We also faced similar problem and it was resolved by rebuilding the index space. Athul009 New User Joined: 09 Oct 2007 Location: US Posted: Thu May 01, 2008 10:06 pm Post subject: Re: s04e Abend MSreelatha wrote: So4e error means Duplicate utility id has been created. If your job abends in your run it creates a duplicate utility id. If you submit the same job again without terminating the duplicate utility id then you get so4e error. You can terminate this utility id in two ways 1. By writing Utility termination step in your jcl (or) I am using DSNUPROC utility to Unload the Db2 table.

And, I got SB37 Error. I increased the SPACe for the Data file; and submitted the job again. And, I got S04E error (Duplicate utility id )!

How do I write Utility termination step in the JCL? Can anyone show me an example? I have attached the JCL for my Unload utility here. Topic edited to delete the attachment ( useless anyhow for the problem determination and resolution of the current issue ) nest time, please, do not post a jpeg, a simple plain text cut and paste with the Code: tags is more than enough umasankarmf New User Joined: 08 Sep 2008 Location: india Posted: Fri Aug 21, 2009 7:45 pm Post subject: Abend Code S04E Hi guyes, If u have Abend Code S04E then something is wrong at the DB2 data.

Verify the data then submit the job. Anuj Dhawan Senior Member Joined: 22 Apr 2006 Location: Mumbai, India Posted: Mon Aug 24, 2009 4:40 pm Post subject: Reply to: S04e abend with COBOL+DB2+IMS program It's been just 4-years when the original question was posted, hope OP still follow up his posts. Rakesha.hg Active User Joined: 21 Mar 2008 Location: bangalore Posted: Wed Aug 26, 2009 4:15 pm Post subject: Reply to: S04e abend with COBOL+DB2+IMS program Anuj, i'm following it. I had one today. This post helped Anuj Dhawan Senior Member Joined: 22 Apr 2006 Location: Mumbai, India Posted: Thu Aug 27, 2009 6:50 pm Post subject: Great. Balamurugan3 Currently Banned New User Joined: 02 Sep 2009 Location: chennai Posted: Tue Sep 29, 2009 4:05 pm Post subject: Hi Msreelatha, I got the same error S04E while unloading the data from table, for the same reason duplicate utility. It showed error msg 'LOAD UTILITY WITH UTILID = IZLOAD1 ENDED IN PHASE = REPORT, WILL ATTEMPT TO RESTART(CURRENT) DSNUGUTC - UTILITY 'LOAD' INCONSISTENT WITH LAST INVOCATION ' So i tried for the solution given by u.